Lotus Domino, LotusScript
Use um código de barras no Lotus Domino com LotusScript

Usando o controle de código de barras em um agente LotusScript

Este é um exemplo de script para ser executado no Lotus Domino da IBM como um agente LotusScript:

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