- This form action refreshes the embedded scheduler for all participants.
%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")
Call uis.GetScheduleData
End Sub
- This form action refreshes the embedded scheduler for all participants
not previously refreshed.
%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")
Call uis.GetScheduleData(2)
End Sub