次のコードはエージェント内で実行すべきコードで、出力用にエージェントログを開き、アクションメッセージを書き込みます。
Dim agentLog As New NotesLog("Agent log") Call agentLog.OpenAgentLog Call agentLog.LogAction("Action one") Call agentLog.Close