UID (NotesCalendarEntry - LotusScript®)

読み込み専用。 iCalendar 形式の、カレンダーエントリのグローバル固有識別子。

定義位置

NotesCalendarEntry

データ型

String

構文

取得する場合: uid$ = notesCalendarEntry.UID

使用法

エントリを作成すると、次の形式で UID が生成されます。

UID:F0A3694E4E7E20938525790F004D370A-Lotus_Notes_Generated

例

このエージェントは、現在のユーザーのメールデータベースの ($Calendar) ビューから、文書の UNID を使用してカレンダーエントリを取得し、その UID を環境変数に書き込みます。

Sub Initialize
	Dim session As New NotesSession
	Dim maildb As New NotesDatabase("", "")
	Dim calview As NotesView
	Dim caldoc As NotesDocument
	Dim unid As String
	Dim cal As NotesCalendar
	Dim cale As NotesCalendarEntry
	Dim s As String
	Dim n As Long
	REM Get calendar for current user
	Call maildb.Openmail()
	Set cal = session.getCalendar(maildb)
	REM Get number of calendar entry
	s = InputBox("Enter an integer", "calentry", 1)
	If IsNumeric(s) Then
		n = Clng(s)
	Else
		MessageBox "Not numeric: " & s,, "Error"
		Exit sub
	End If
	REM Get calendar entry and post UID to environment variable
	Set calview = maildb.Getview("($Calendar)")
	Set caldoc = calview.Getnthdocument(n)
	If caldoc Is Nothing Then
		MessageBox "Calendar entry out of range",, "Error"
		Exit sub
	Else
		unid = caldoc.Universalid
		Set cale = cal.Getentrybyunid(unid)
		Call session.Setenvironmentvar("currentuid", cale.Uid)
	End If
End Sub

クロスリファレンス

Java™ NotesCalendarEntry クラスの UID プロパティ