Decline (NotesCalendarNotice - LotusScript®)

会議を辞退します。

定義位置

NotesCalendarNotice

構文

Call notesCalendarNotice.Decline( comments$ , [ keepinformedBoolean ] )
パラメータ 説明
comments String 型。会議の変更に関するコメント。
keepinformed Boolean 型。会議に関する通知を引き続き受け取るには、true を指定します。
可能性のある例外 (lsxbeerr.lss) テキスト 説明
lsERR_NOTES_ERR_UNSUPPORTEDACTION 4811 サポートされないアクション メソッドが、エントリに対して無効なアクションを適用しようとしています。
lsERR_NOTES_ERR_OVERWRITEDISALLOWED 4813 個人の変更を上書きすることになるため、このアクションは実行できません アクションを確認した後、上書きフラグを設定して再実行してください。
lsERR_NOTES_ERR_IDNOTFOUND 4814 ID が見つかりません NotesCalendarNotice オブジェクトの識別子がカレンダーの通知を示していません。

このエージェントは会議を辞退します。
Sub Initialize
	Dim session As New NotesSession
	Dim maildb As New NotesDatabase("", "")
	Dim unid As String
	Dim cal As NotesCalendar
	Dim caln As NotesCalendarNotice
	REM Get calendar for current user
	Call maildb.Openmail()
	Set cal = session.getCalendar(maildb)
	REM Get notice and decline
	unid = session.Getenvironmentstring("noticeunid")
	Set caln = cal.Getnoticebyunid(unid)
	Call caln.Decline("Will be out", True)
End Sub

クロスリファレンス

Java™ NotesCalendarNotice クラスの decline メソッド