ByteScout Barcode Reader SDK – VBScript – Read barcode From PDF With OrientationType

Home
/
Articles
/
ByteScout Barcode Reader SDK – VBScript – Read barcode From PDF With OrientationType

printable version:
ByteScout-BarCode-Reader-SDK-VBScript-Read-barcode-From-PDF-With-OrientationType.pdf

How to read barcode from PDF with orientationtype in VBScript and ByteScout BarCode Reader SDK

Step-by-step tutorial on how to read barcode from PDF with orientationtype in VBScript

These source code samples are assembled by their programming language and functions they apply. ByteScout BarCode Reader SDK can read barcode from PDF with orientationtype. It can be applied from VBScript. ByteScout BarCode Reader SDK is the SDK for barcode decoding. Can read all popular types from Code 128, GS1, UPC and Code 39 to QR Code, Datamatrix, PDF417. Images, pdf, TIF images and live web camera are supported as input. Designed to handle documents with noise and defects. Includes optional splitter and merger for pdf and tiff based on barcodes. Batch mode is optimized for high performance with multiple threads. Decoded values can be exported to XML, JSON, CSV or into custom data format.

This prolific sample source code in VBScript for ByteScout BarCode Reader SDK contains various functions and other necessary options you should do calling the API to read barcode from PDF with orientationtype. Simply copy and paste in your VBScript project or application you and then run your app! Use of ByteScout BarCode Reader SDK in VBScript is also described in the documentation included along with the product.

Trial version of ByteScout BarCode Reader SDK is available for free. Source code samples are included to help you with your VBScript app.

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")

' Set Barcode Types to Find
bc.BarcodeTypesToFind.PatchCode = True

' Add vertical orientations to analysis
bc.Orientation = 17 Or 2 Or 32768

' Reading barcode from image file
bc.ReadFromFile "PatchCode.png"

' Iterate throuhg all found barcodes
For i = 0 To bc.FoundCount - 1
     Msgbox "Found barcode with type " & Cstr(bc.GetFoundBarcodeType(i)) & " and value " & bc.GetFoundBarcodeValue(i)
Next

Set bc = Nothing