LOTUSSCRIPT/COM/OLE CLASSES

Examples: Values property
This script displays the first value of the composite application selected by the property broker.

Dim s As New NotesSession
Dim pb As NotesPropertyBroker
Set pb = s.GetPropertyBroker("com.ibm.compositeapps.samples")
Dim pbInputProperty As NotesProperty
Dim pbContext As Variant
pbContext = pb.InputPropertyContext
Set pbInputProperty = pbContext(0)
Dim pbValueArray As Variant
pbValueArray = pbInputProperty.Values
FirstValue$ = pbValueArray(0)
Messagebox "First Property value is " + FirstValue$, MB_OK, "Value"