Lotus Domino Designer 8 ヘルプ - 例:OpenMailLog メソッド

LOTUSSCRIPT /COM/OLE のクラス

例:OpenMailLog メソッド
1 次のエージェントスクリプトはメールログを開きます。Close メソッドが呼び出されると、[Subject] に「Here's the Linguist Log」を含むメールメモが Thalia Ruben に送られます。アクションとエラーはメモの Body に含まれます。

Sub Initialize
Dim currentLog As NotesLog
Set currentLog = New NotesLog( "Linguist Log" )
Call currentLog.OpenMailLog _
( "Thalia Ruben", "Here's the Linguist Log" )
'...log some actions and errors...
currentLog.Close
End Sub

2 次のエージェントスクリプトはメールログを開きます。メールログは現在のエージェントの所有者に送られます。たとえば、Susanna Tallan が Project Histories データベースの Archiving エージェントの所有者であるとき、[Subject] に「Archiving Agent in Project Histories」を含むメモが Susanna に送られます。アクションとエラーはメモの Body に含まれます。

Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set db = session.CurrentDatabase
Set agent = session.CurrentAgent
Dim currentLog As NotesLog
Set currentLog = New NotesLog( agent.Name )
Call currentLog.OpenMailLog _
( agent.Owner, agent.Name & " in " & db.Title )
'...log some actions and errors...
Call currentLog.Close
End Sub

関連項目

OpenMailLog メソッド

用語集

フィードバック ヘルプ または プロダクトユーザビリティ?

ヘルプの使い方

すべてのヘルプ項目

用語集