複合アプリケーション - 設計と管理
NotesSession
プロパティブローカーの形式 (LSX に対して) は、次のとおりです。
プロパティ発行用の新しい LotusScript APISub Click(Source As Button) Dim s As New NotesSession
...
Dim pb As NotesPropertyBroker
Set pb = s.GetPropertyBroker()
Call pb.setPropertyValue("Track", newTrack$)
Call pb.Publish()
End Sub
プロパティ取得用の新しい LotusScript APISub Click(Source As Button) Dim s As New notessession
Dim pbInputProperty As NotesProperty
Dim pbContext As Variant
pbContext = pb.InputPropertyContext
Set pbInputProperty = pbContext(0)
Dim InputPropertyName As String
Dim NameSpace As String
InputPropertyName = pbInputProperty.Name
NameSpace = pbInputProperty.NameSpace
Dim pbValue As Variant
pbValue = pb.getPropertyValue(InputPropertyName,NameSpace)
cName$ = pbValue(0)
関連項目