Getting Started in VBScript (as ActiveX)ByteScout Barcode Reader SDK

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