Represents a Domino® calendar notice.
AcceptCounter (NotesCalendarNotice - LotusScript)
Counter (NotesCalendarNotice - LotusScript)
Decline (NotesCalendarNotice - LotusScript)
DeclineCounter (NotesCalendarNotice - LotusScript)
Delegate (NotesCalendarNotice - LotusScript)
GetAsDocument (NotesCalendarNotice - LotusScript)
GetOutstandingInvitations (NotesCalendar - LotusScript)
Read (NotesCalendarNotice - LotusScript)
RemoveCancelled (NotesCalendarNotice - LotusScript)
RequestInfo (NotesCalendarNotice - LotusScript)
Notices include invitations, reschedules, information updates, confirmations, cancellations, counterproposals, requests for information, acceptances, declines, and tentative acceptances received from another user and not yet processed. You can treat a notice as a NotesCalendarEntry object to apply the following methods: accept, cancel, counter, decline, delegate, remove, requestInfo, and tentativelyAccept. The NotesCalendarEntry methods have scope and recurid parameters, which the corresponding NotesCalendarNotice methods do not. Application of other NotesCalendarEntry methods to a notice causes an exception.
Sub Initialize
Dim session As New NotesSession
Dim maildb As New NotesDatabase("", "")
Dim cal As NotesCalendar
Dim dt1 As NotesDateTime
Dim dt2 As NotesDateTime
Dim invites As Variant
Call maildb.Openmail()
Set cal = session.getCalendar(maildb)
Set dt1 = session.createdatetime("01/01/2012 00:00 AM")
Set dt2 = session.createdatetime("Yesterday 00:00 AM")
invites = cal.Getnewinvitations(dt1, dt2)
If IsEmpty(invites) Then
MessageBox "No invitation",, "Nothing"
Else
Dim invite As NotesCalendarNotice
Set invite = invites(0)
MessageBox invite.Read(),, "Invite"
End If
End Sub