On this page you will learn from code samples for programming in VBScript.Writing of the code to generate barcode with barcode sdk in VBScript can be executed by programmers of any level using ByteScout Premium Suite. Want to generate barcode with barcode sdk in your VBScript app? ByteScout Premium Suite is designed for it. ByteScout Premium Suite is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.
These VBScript code samples for VBScript guide developers to speed up coding of the application when using ByteScout Premium Suite. Follow the instructions from scratch to work and copy the VBScript code. This basic programming language sample code for VBScript will do the whole work for you to generate barcode with barcode sdk.
Our website gives trial version of ByteScout Premium Suite for free. It also includes documentation and source code samples.
Set bc = CreateObject("Bytescout.BarCode.Barcode") ' display information about Code39 symbology msgbox "Encoding '012345' using Code39 symbology" & vbCRLF & bc.GetValueRestrictions(0) ' 0 = Code39 symbology ' set symbology to Code39 bc.Symbology = 1 ' 1 = Code39 symbology type ' set barcode value to encode bc.Value = "012345" msgbox "Saving Code39 barcode to 'Code39.png'" bc.SaveImage "Code39.png" ' Open the output file in default app Set shell = CreateObject("WScript.Shell") shell.Run "code39.png", 1, false Set shell = Nothing msgbox "Encoding '012345' using Aztec symbology" ' set symbology to Aztec (2D) bc.Symbology = 17 ' 17 = Aztec ' set barcode value to encode bc.Value = "012345" ' display information about Aztec symbology msgbox "Encoding '012345' using Aztec symbology" & vbCRLF & bc.GetValueRestrictions(17) ' 17 = Code39 symbology bc.SaveImage "Aztec.png" ' Open the output file in default app Set shell = CreateObject("WScript.Shell") shell.Run "aztec.png", 1, false Set shell = Nothing Set bc = Nothing