ByteScout Premium Suite – VBScript – Barcode reading profiles with barcode reader sdk

Home
/
Articles
/
ByteScout Premium Suite – VBScript – Barcode reading profiles with barcode reader sdk

printable version:
ByteScout-Premium-Suite-VBScript-Barcode-reading-profiles-with-barcode-reader-sdk.pdf

barcode reading profiles with barcode reader sdk in VBScript using ByteScout Premium Suite

Learn to code barcode reading profiles with barcode reader sdk in VBScript: How-To tutorial

These source code samples are assembled by their programming language and functions they use. ByteScout Premium Suite helps with barcode reading profiles with barcode reader sdk in VBScript. ByteScout Premium Suite is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

This rich and prolific sample source code in VBScript for ByteScout Premium Suite contains various functions and options you should do calling the API to implement barcode reading profiles with barcode reader sdk. Just copy and paste this VBScript sample code to your VBScript application’s code editor, add a reference to ByteScout Premium Suite (if you haven’t added yet) and you are ready to go! Use of ByteScout Premium Suite in VBScript is also described in the documentation included along with the product.

On our website you may get trial version of ByteScout Premium Suite for free. Source code samples are included to help you with your VBScript application.

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

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

Profiles.vbs

      ' This example demonstrates the use of profiles. Profiles are set of properties 
' allowing to apply them to Reader in any combination quickly. You can use 
' predefined profiles or create you own in JSON format like in this example.

' Create Bytescout.PDFExtractor.TextExtractor object
Set reader1 = CreateObject("Bytescout.BarCodeReader.Reader")
reader1.RegistrationName = "demo"
reader1.RegistrationKey = "demo"

' Apply predefined profiles:
' enable Code39;
' enable EAN-13;
' render PDF at 150 DPI resoultion.
reader1.Profiles = "code39, ean13, pdf150dpi"

' Decode and show barcodes from sample1.pdf
reader1.ReadFromFile "sample1.pdf"
For i = 0 To reader1.FoundCount - 1
    WScript.Echo "Found type " & reader1.GetFoundBarcodeType(i) & " barcode with value " & reader1.GetFoundBarcodeValue(i) & """"
Next


Set reader2 = CreateObject("Bytescout.BarCodeReader.Reader")
reader2.RegistrationName = "demo"
reader2.RegistrationKey = "demo"

' Load and apply custom profiles
reader2.LoadProfiles "profiles.json"
reader2.Profiles = "negative-distorted-datamatrix"

' Decode and show barcodes from sample2.png
reader2.ReadFromFile "sample2.png"
For i = 0 To reader2.FoundCount - 1
    WScript.Echo "Found type " & reader2.GetFoundBarcodeType(i) & " barcode with value " & reader2.GetFoundBarcodeValue(i) & """"
Next