LOTUSSCRIPT/COM/OLE CLASSES

Examples: FindFreeTimeDialog method
This action opens the Free Time dialog box using the names in the SendTo field of the current UI document, and the dates in the StartDateTime and EndDateTime fields.

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

See Also