ByteScout Barcode Suite – VBScript – Custom pdf417 configuration with barcode sdk

Home
/
Articles
/
ByteScout Barcode Suite – VBScript – Custom pdf417 configuration with barcode sdk

printable version:
ByteScout-Barcode-Suite-VBScript-Custom-pdf417-configuration-with-barcode-sdk.pdf

custom pdf417 configuration with barcode sdk in VBScript using ByteScout Barcode Suite

Learn custom pdf417 configuration with barcode sdk in VBScript

The samples of source code documentation give a quick and simple method to apply a required functionality into your application. ByteScout Barcode Suite was made to help with custom pdf417 configuration with barcode sdk in VBScript. ByteScout Barcode Suite is the bundle that privides 3 SDK products to generate barcodes (Barcode SDK), read barcodes (Barcode Reaer SDK) and read and write spreadsheets (Spreadsheet SDK).

If you want to quickly learn then these fast application programming interfaces of ByteScout Barcode Suite for VBScript plus the guideline and the VBScript code below will help you quickly learn custom pdf417 configuration with barcode sdk. If you want to know how it works, then this VBScript sample code should be copied and pasted into your application’s code editor. Then just compile and run it. Check these VBScript sample code examples to see if they acknowledge to your needs and requirements for the project.

ByteScout Barcode Suite free trial version is available for download from our website. Free trial also includes programming tutorials along with source code samples.

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