Command Line Use - VBScript and VB6
QR Code SDK sample in VBScript and VB6 demonstrating ‘Command Line Use’
GenerateQRCode.vbs
if WScript.Arguments.Count < 1 Then
WScript.Echo "Set barcode value as command line parameter: " & vbCRLF & vbCRLF & "GenerateQRCode.vbs <value>"
WScript.Quit 0
End If
' Create and activate QRCode instance
Set barcode = CreateObject("Bytescout.BarCode.QRCode")
barcode.RegistrationName = "demo"
barcode.RegistrationKey = "demo"
' Set barcode value from the command line parameter
barcode.Value = WScript.Arguments(0)
' Save barcode image to file
barcode.SaveImage("result.png")
Set barcode = Nothing
run.bat
REM running from the command line
cscript.exe GenerateQRCode.vbs "ABCDEFGHIJKLMNOP1234567890"
pause