Lotus Domino, LotusScript
Utilizar un código de barras en Lotus Domino con LotusScript

Uso del control de código de barras en un agente de LotusScript

Este es un ejemplo de script para ejecutarse bajo Lotus Domino de IBM como 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