LOTUSSCRIPT/COM/OLE CLASSES

Examples: GetSchedulerObject method
This form action displays the required and optional people on an embedded scheduled.

%INCLUDE "lsconst.lss"

Sub Click(Source As Button)
 Dim ws As NotesUIWorkspace
 Dim uid As NotesUIDocument
 Dim uis As NotesUIScheduler
 Set ws = New NotesUIWorkspace
 Set uid = ws.CurrentDocument
 Set uis = uid.GetSchedulerObject("Main")
 attendees = uis.GetAttendees( _
 REQUIRED_PEOPLE + OPTIONAL_PEOPLE)
 displayList = ""
 Forall attendee In attendees
   If displayList = "" Then
     displayList = attendee
   Else
     displayList = displayList & Chr(13) & attendee
   End If
 End Forall
 If displayList <> "" Then
   Messagebox displayList,, "List of attendees"
 End If
End Sub

See Also