AutoSendNotices (NotesCalendar - LotusScript®)
Read-write. Indicates whether to automatically send information to participants when creating and updating meetings.
Defined in
NotesCalendarData type
BooleanSyntax
To get: flag = notesCalendar.AutoSendNotices
To set: notesCalendar.AutoSendNotices = flag
Legal value | Description |
---|---|
true |
(default) automatically sends information such as invitations and reschedules to participants |
false |
does not automatically send information to participants |
Examples
This agent creates a meeting calendar entry for today at 1600 UTC, with no notices being sent, and posts its UID to an environment variable.Sub Initialize
Dim session As New NotesSession
Dim maildb As New NotesDatabase("", "")
Dim cal As NotesCalendar
Dim calentry As NotesCalendarEntry
Dim icale As String
Dim tday As String
REM Get calendar for current user and create entry
Call maildb.Openmail()
Set cal = session.getCalendar(maildb)
tday = Format(Today, "yyyymmdd")
icale = |BEGIN:VCALENDAR
BEGIN:VEVENT
DTSTART:| & tday & |T160000Z
DTEND:| & tday & |T170000Z
ATTENDEE;ROLE=CHAIR;PARTSTAT=ACCEPTED;CN="Roberta Person/Westford/IBM";
RSVP=FALSE:mailto:roberta_person@us.ibm.com
ATTENDEE;ROLE=REQ-PARTICIPANT
;CN="Doc Test/Bedford/IBM";RSVP=TRUE:mailto:doctest@us.ibm.com
SUMMARY:Sample Meeting
ORGANIZER;CN="Roberta Person/Westford/IBM"
:mailto:roberta_person@us.ibm.com
END:VEVENT
END:VCALENDAR|
cal.Autosendnotices = false
Set calentry = cal.Createentry(icale)
Call session.Setenvironmentvar("currentuid", calentry.Uid)
MessageBox "UID = " & calentry.Uid,, "Created calendar entry"
End Sub