Examples: GetPropertyBroker method

  1. This script displays the name of an input property to a composite application action selected by the property broker.
    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 InputPropertyName As String
    InputPropertyName = pbInputProperty.Name
    Messagebox "Property Name is " + InputPropertyName, MB_OK, "Name"
  2. This script publishes the property value of "Track" in the selected property broker.
    Dim s As New NotesSession
    Dim pb As NotesPropertyBroker
    Set pb = s.GetPropertyBroker()
    Call pb.setPropertyValue("Track",newCategory$)
    Call pb.Publish()