このスクリプトは、Property Broker によって選択されたアクションへの入力プロパティの名前を表示します。
このスクリプトは、Notes フォームまたはビューアクションから出てきます。Property Broker は、複合アプリケーションの別のコンポーネントによって発行されたプロパティ変更を受け取るとこのスクリプトを呼び出すため、このスクリプトが実行されます。スクリプトは、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"