Lotus Domino, LotusScript
Use a barcode in Lotus Domino with LotusScript

Using the barcode control in a LotusScript agent


This is a script example to run under IBM's Lotus Domino as a LotusScript agent:

Option Public
Option Declare

Sub Initialize()
Dim MyObject As variant
Set MyObject = CreateObject("ACTIVEBARCODE.BarcodeCtrl.1")
MyObject.text = "Example"
MyObject.typename = "Code 128"
MyObject.SaveAsBySize "c:\example.bmp", 400, 100
End Sub