GetAsDocument (NotesCalendarNotice - LotusScript®)

カレンダー通知を含む文書を取得します。

定義位置

構文

Set notesDocument = notesCalendarNotice.GetAsDocument( )

戻り値	説明
`NotesDocument`	文書。

例

このエージェントは、会議招集の基礎となる文書を取得します。

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
	Dim doc As NotesDocument
	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)
		Set doc = invite.Getasdocument()
		MessageBox doc.Getitemvalue("subject")(0),, "Invite"
	End If
End Sub

クロスリファレンス

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