ByteScout Barcode Suite – VBScript – Read barcode from pdf with barcode reader sdk

Home
/
Articles
/
ByteScout Barcode Suite – VBScript – Read barcode from pdf with barcode reader sdk

printable version:
ByteScout-Barcode-Suite-VBScript-Read-barcode-from-pdf-with-barcode-reader-sdk.pdf

How to read barcode from pdf with barcode reader sdk in VBScript with ByteScout Barcode Suite

Learn to read barcode from pdf with barcode reader sdk in VBScript

On this page you will learn from code samples for programming in VBScript.Writing of the code to read barcode from pdf with barcode reader sdk in VBScript can be executed by programmers of any level using ByteScout Barcode Suite. ByteScout Barcode Suite can read barcode from pdf with barcode reader sdk. It can be applied from VBScript. ByteScout Barcode Suite is the set that includes three different SDK products to generate barcodes, read barcodes and read and write spreadsheets: Barcode SDK, Barcode Reader SDK and Spreadsheet SDK.

Want to save time? You will save a lot of time on writing and testing code as you may just take the VBScript code from ByteScout Barcode Suite for read barcode from pdf with barcode reader sdk below and use it in your application. Follow the instructions from scratch to work and copy the VBScript code. Want to see how it works with your data then code testing will allow the function to be tested and work properly.

If you want to try other source code samples then the free trial version of ByteScout Barcode Suite is available for download from our website. Just try other source code samples for VBScript.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

TestBarcodeReadingFromPDF.vbs

      Set bc = CreateObject("Bytescout.BarCodeReader.Reader")

' Limit search to 1D barcodes only (exclude 2D barcodes to speed up the search).
' Change to bc.BarcodeTypesToFind.SetAll() to scan for all supported 1D and 2D barcodes 
' or select specific type, e.g. bc.BarcodeTypesToFind.PDF417 = True
bc.BarcodeTypesToFind.SetAll1D()

' Reading barcode from PDF
bc.ReadFromFile "example.pdf"

' Iterate throuhg all found barcodes
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