ByteScout Barcode Suite – VBScript – Add barcodes to new pdf with barcode sdk

Home
/
Articles
/
ByteScout Barcode Suite – VBScript – Add barcodes to new pdf with barcode sdk

printable version:
ByteScout-Barcode-Suite-VBScript-Add-barcodes-to-new-pdf-with-barcode-sdk.pdf

How to add barcodes to new pdf with barcode sdk in VBScript using ByteScout Barcode Suite

This code in VBScript shows how to add barcodes to new pdf with barcode sdk with this how to tutorial

The code displayed below will guide you to install an VBScript app to add barcodes to new pdf with barcode sdk. ByteScout Barcode Suite is the set that includes three different SDK products to generate barcodes, read barcodes and read and write spreadsheets: Barcode SDK, Barcode Reader SDK and Spreadsheet SDK. It can be applied to add barcodes to new pdf with barcode sdk using VBScript.

The SDK samples given below describe how to quickly make your application do add barcodes to new pdf with barcode sdk in VBScript with the help of ByteScout Barcode Suite. This VBScript sample code is all you need for your app. Just copy and paste the code, add references (if needs to) and you are all set! If you want to use these VBScript sample examples in one or many applications then they can be used easily.

ByteScout provides the free trial version of ByteScout Barcode Suite along with the documentation and 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)

AddBarcodeToPdfDocument.vbs

      ' Create barcode object and register it
Set barcode = CreateObject("Bytescout.BarCode.Barcode")
barcode.RegistrationName = "demo"
barcode.RegistrationKey = "demo"

' set symbology to DataMatrix
barcode.Symbology = 15 ' 15 = DataMatrix symbology type

' set barcode value to encode
barcode.Value = "Sample barcode" 

' Place barcode at top-right corner of every document page
barcode.DrawToNewPDF "barcode.pdf", 595,842, 500, 50

' Open the output file in default PDF viewer.
Set shell = CreateObject("WScript.Shell")
shell.Run "barcode.pdf", 1, false
Set shell = Nothing

Set barcode = Nothing