ByteScout BarCode Generator SDK – VBScript – Add Barcodes To Image

Home
/
Articles
/
ByteScout BarCode Generator SDK – VBScript – Add Barcodes To Image

printable version:
ByteScout-Barcode-SDK-VBScript-Add-Barcodes-To-Image.pdf

How to add barcodes to image in VBScript using ByteScout Barcode SDK

How to code in VBScript to add barcodes to image with this step-by-step tutorial

Learn how to add barcodes to image in VBScript with this source code sample. What is ByteScout Barcode SDK? It 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. It can help you to add barcodes to image in your VBScript application.

VBScript code samples for VBScript developers help to speed up coding of your application when using ByteScout Barcode SDK. Follow the instructions from the scratch to work and copy the VBScript code. Code testing will allow the function to be tested and work properly with your data.

Trial version of ByteScout Barcode SDK can be downloaded for free from our website. It also includes source code samples for VBScript and other programming languages.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

AddBarcodeToImage.vbs

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

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

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

' Place barcode at bottom-right corner of the image
barcode.DrawToImage "..\wikipedia.png", -1, 400, 900, "result.png"

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

Set barcode = Nothing