例: Description property

このスクリプトは、Property Broker の最初の入力プロパティの名前と説明を表示します。

このスクリプトは、Notes フォームまたはビューアクションから出てきます。Property Broker は、複合アプリケーションの別のコンポーネントによって発行されたプロパティ変更を受け取るとこのスクリプトを呼び出すため、このスクリプトが実行されます。スクリプトは、Property Broker に変更されたプロパティを尋ね、そのプロパティの名前と説明を表示します。

注: このスクリプトは常に同じメッセージを表示します。名前と説明を含む入力プロパティは、このアプリケーションの Wiring Properties 設計要素で定義された WSDL アクションに関連しているためです。プロパティを公開したコンポーネントは別の名前と説明を使用する場合がありますが、その情報を取り出す方法はありません。

Dim s As New NotesSession
Dim pb As NotesPropertyBroker
Set pb = s.GetPropertyBroker()
Dim pbInputProperty As NotesProperty
Dim pbContext As Variant
pbContext = pb.InputPropertyContext
Dim InputPropertyName As String
Dim InputPropertyDesc As String
Set pbInputProperty = pbContext(0)
InputPropertyName = pbInputProperty.Name
InputPropertyDesc = pbInputProperty.Description
Messagebox "Property " + InputPropertyName + " is " + InputPropertyDesc, MB_OK, "Name"