LOTUSSCRIPT /COM/OLE のクラス

例:FindFreeTimeDialog メソッド
次のアクションは、現在の UI 文書の [SendTo] フィールドに入っている名前と [StartDateTime] および [EndDateTime] フィールドの日時を使用して、[空き時間の検索] ダイアログボックスを開きます。

Sub Click(Source As Button)
 Dim workspace As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Set uidoc = workspace.CurrentDocument
 Call uidoc.Refresh
 If Not uidoc.EditMode Then uidoc.EditMode = True
 Call uidoc.FindFreeTimeDialog _
 ("SendTo", "", "", "", "", "", "", _
 "StartDateTime","EndDateTime")
End Sub

関連項目