ByteScout BarCode Generator SDK – VBScript – Custom PDF417 Configuration

Home
/
Articles
/
ByteScout BarCode Generator SDK – VBScript – Custom PDF417 Configuration

printable version:
ByteScout-Barcode-SDK-VBScript-Custom-PDF417-Configuration.pdf

custom pdf417 configuration in VBScript with ByteScout Barcode SDK

Write code in VBScript to make custom pdf417 configuration with this How-To tutorial

We’ve created and updating regularly our sample code library so you may quickly learn custom pdf417 configuration and the step-by-step process in VBScript. ByteScout Barcode SDK was made to help with custom pdf417 configuration 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.

The SDK samples like this one below explain how to quickly make your application do custom pdf417 configuration in VBScript with the help of ByteScout Barcode SDK. Follow the instruction from the scratch to work and copy and paste code for VBScript into your editor. Enhanced documentation and tutorials are available along with installed ByteScout Barcode SDK if you’d like to dive deeper into the topic and the details of the API.

Free trial version of ByteScout Barcode SDK is available on our website. Get it to try other 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)

SetCustomPDF417Configuration.vbs

      
Set bc = CreateObject("Bytescout.BarCode.Barcode")

' set symbology to PDF417
bc.Symbology = 13 ' 13 = PDF417 barcode type

' set barcode value to encode
bc.Value = "12345678901234567890"

' by default the SDK tries to make the barcode size as small as possible
' if we need it then we can set manual number of rows and columns

bc.Options.PDF417UseManualSize = true ' enable manual size mode
bc.Options.PDF417ColumnCount = 7 ' set max number of columns
bc.Options.PDF417RowCount = 50 ' set max number of rows

bc.CutUnusedSpace = False ' you can set it to True to cut unused space

bc.SaveImage "result.png"

Set bc = Nothing

' Open the output file in default app
Set shell = CreateObject("WScript.Shell")
shell.Run "result.png", 1, false
Set shell = Nothing