LOTUSSCRIPT/COM/OLE CLASSES
Dim s As New NotesSession Dim pb As NotesPropertyBroker Set pb = s.GetPropertyBroker() 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"