Writing of the code to batch barcode generation in VBScript can be done by developers of any level using ByteScout Barcode SDK. ByteScout Barcode SDK was made to help with batch barcode generation in VBScript. ByteScout Barcode SDK is the fully featured library to generate barcodes. Supports QR Code, Code 39, Code 128, UPC, GS1, GS-128, PDF417, Datamatrix and many other barcode types. Includes various options for barcode generation to ensure output quality, add barcodes to new or existing pdf files and images.
VBScript, code samples for VBScript, developers help to speed up the application development and writing a code when using ByteScout Barcode SDK. To do batch barcode generation in your VBScript project or application you may simply copy & paste the code and then run your app! Code testing will allow the function to be tested and work properly with your data.
Trial version can be downloaded from our website. Source code samples for VBScript and documentation are included.
On-demand (REST Web API) version:
Web API (on-demand version)
On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)
' HOW TO USE: save this file as "GenerateMultipleBarcodes.vbs' ' change parameters below to your parameters required ' the script wlil generate barcodes into the same folder ' output images are named using encoded value, for example: 100.png represents barcode with encoded value "100" ' TO RUN: install BarCode SDK and in Windows Explorer double-click on "MultipleBarcodes.vbs" ' BEGIN OF BARCODE BATCH GENERATION PARAMETERS BarCodeType = 16 ' 16 = qr code, for full list of available barcode types see this link: https://bytescout.com/files/help/BytescoutBarCodeSDK/source/html/T_Bytescout_BarCode_SymbologyType.htm StartValue = 1 ' starting value StepValue = 2 ' incrementing step for each new barcode NumberOfBarcodes = 100 ' number of barcodes to generate BarCodeSDKLicenseName = "demo" BarCodeSDKLicenseSerial = "demo" ' END OF BARCODE BATCH GENERATION PARAMETERS ' do not change below this line ' initialize barcode library Set bc = CreateObject("Bytescout.BarCode.Barcode") bc.RegistrationName = BarCodeSDKLicenseName bc.RegistrationKey = BarCodeSDKLicenseSerial ' set barcode type to generate bc.Symbology = BarCodeType ' now make list of barcodes For i = StartValue to (StartValue + NumberOfBarcodes)*StepValue Step StepValue bc.Value = CStr(i) bc.SaveImage CStr(i) & ".png" Next j = (StartValue + NumberOfBarcodes)*StepValue Msgbox "Done: saved " & NumberOfBarcodes & " barcodes in PNG format with values starting from " & CStr(StartValue) & " to " & CStr(j) & " (including) with step by " & CStr(StepValue) ' deinitialize barcode sdk Set bc = Nothing
60 Day Free Trial or Visit ByteScout Barcode SDK Home Page
Explore ByteScout Barcode SDK Documentation
Explore Samples
Sign Up for ByteScout Barcode SDK Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
60 Day Free Trial or Visit ByteScout Barcode SDK Home Page
Explore ByteScout Barcode SDK Documentation
Explore Samples
Sign Up for ByteScout Barcode SDK Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
also available as: