LOTUSSCRIPT/COM/OLE CLASSES
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 PropNameSpace As String PropNameSpace = pbInputProperty.NameSpace Messagebox "Property NameSpace is " + PropNameSpace, MB_OK, "NameSpace"