ByteScout Premium Suite – VBScript – Read barcode from webcam or scanner with barcode reader sdk

Home
/
Articles
/
ByteScout Premium Suite – VBScript – Read barcode from webcam or scanner with barcode reader sdk

printable version:
ByteScout-Premium-Suite-VBScript-Read-barcode-from-webcam-or-scanner-with-barcode-reader-sdk.pdf

How to read barcode from webcam or scanner with barcode reader sdk in VBScript using ByteScout Premium Suite

Learn to read barcode from webcam or scanner with barcode reader sdk in VBScript

The code displayed below will guide you to install an VBScript app to read barcode from webcam or scanner with barcode reader sdk. What is ByteScout Premium Suite? It is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording. It can help you to read barcode from webcam or scanner with barcode reader sdk in your VBScript application.

The SDK samples given below describe how to quickly make your application do read barcode from webcam or scanner with barcode reader sdk in VBScript with the help of ByteScout Premium Suite. Simply copy and paste in your VBScript project or application you and then run your app! Check VBScript sample code samples to see if they respond to your needs and requirements for the project.

All these programming tutorials along with source code samples and ByteScout free trial version are available for download from our website.

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

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

AcquireImagesFromWebCam.vbs

      Set wia = CreateObject("Bytescout.BarCodeReader.WIAImageScanner")

wia.OutputFileNameTemplate = "BarCodeReader-scanned"
wia.OutputFolder = "." ' set output folder to current folder
wia.OutputImageFormat = 1 ' = WiaImageFormatType.PNG
wia.ImageQuality = 131072 ' = 0x00020000 = WiaImageBias.MaximizeQuality
wia.ImageIntent = 0 ' = WiaImageIntent.UnspecifiedIntent
wia.ShowDeviceSelectionDialog = True

If wia.Acquire() Then ' acquire images from device
	
	outputFiles = wia.OutputFilesCOM ' get names of acquire image files
	Msgbox outputFiles(0) ' display first file name 
	
End If

Set wia = Nothing