Link Search Menu Expand Document

Getting Started in VBScript (as ActiveX)

The following sample demonstrates how to read barcodes from image in VBScript (.VBS) using Bytescout BarCode Reader SDK

VB
Set bc = CreateObject("Bytescout.BarCodeReader.Reader")
bc.BarcodeTypesToFind.Code39 = True

bc.ReadFromFile "BarcodePhoto.jpg"

For i = 0 To bc.FoundCount - 1
     Msgbox "Found barcode on page #" & CStr(bc.GetFoundBarcodePage(i)) & " with type " & Cstr(bc.GetFoundBarcodeType(i)) & " and value " & bc.GetFoundBarcodeValue(i)
Next

Set bc = Nothing