例: Domino ログを作成する

次の例では、エージェントを実行するたびに、ローカルの Domino データディレクトリにある AGENT4.LOG に日付と「Agent 4 invoked」というメッセージを追加します。

Sub Initialize
  Dim agentLog As New NotesLog("Agent 4 log")
  Call agentLog.OpenFileLog("AGENT4.LOG")
  Call agentLog.LogAction("Agent 4 invoked")
End Sub