Source code documentation samples give simple and easy method to install a needed feature into your application. ByteScout Barcode Suite can set bar code size in inches with barcode sdk. It can be applied from 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).
The following code snippet for ByteScout Barcode Suite works best when you need to quickly set bar code size in inches with barcode sdk in your VBScript application. Simply copy and paste in your VBScript project or application you and then run your app! Applying VBScript application mostly includes various stages of the software development so even if the functionality works please test it with your data and the production environment.
You can download free trial version of ByteScout Barcode Suite from our website to see and try many others source code samples for VBScript.
Set bc = CreateObject("Bytescout.BarCode.Barcode") ' Set symbology to PDF417 bc.Symbology = 13 ' 13 = PDF417 barcode type ' Set barcode value to encode bc.Value = "012345" ' Set barcode size by specifying a square the barcode will be fitted into 5x2 inches square ' Last parameter is the Measure Unit: Inch (2) Specifies the inch as the unit of measure. bc.FitInto_3 5, 2, 2 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