ByteScout Premium Suite - VBScript - Simple barcode reading with barcode reader sdk - ByteScout

ByteScout Premium Suite – VBScript – Simple barcode reading with barcode reader sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Premium Suite – VBScript – Simple barcode reading with barcode reader sdk

simple barcode reading with barcode reader sdk in VBScript and ByteScout Premium Suite

Learn to code in VBScript to make simple barcode reading with barcode reader sdk with this simple How-To tutorial

The example source codes on this page will display you how to make simple barcode reading with barcode reader sdk in VBScript. ByteScout Premium Suite was made to help with simple barcode reading 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.

If you want to quickly learn then these fast application programming interfaces of ByteScout Premium Suite for VBScript plus the guideline and the VBScript code below will help you quickly learn simple barcode reading with barcode reader sdk. To use simple barcode reading with barcode reader sdk in your VBScript project or application just copy & paste the code and then run your app! Enjoy writing a code with ready-to-use sample VBScript codes to implement simple barcode reading with barcode reader sdk using ByteScout Premium Suite.

Trial version can be downloaded from our website for free. It contains this and 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)

TestBarcodeReading.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() 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) & vbCRLF & " and confidence=" & Cstr(bc.GetFoundBarcodeConfidence(i)) Next Set bc = Nothing

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next