Examples: OpenMailLog method

  1. This agent script opens up a mail log. When the Close method is called, the mail memo gets sent to Thalia Ruben, with "Here's the Linguist Log" in the Subject. Actions and errors are in the Body of the memo.
    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. This agent script opens up a mail log that gets sent to the owner of the current agent. For example, if Susanna Tallan owns the Archiving Agent in the Project Histories database, the memo gets sent to Susanna, with "Archiving Agent in Project Histories" in the Subject. Actions and errors are in the Body of the memo.
    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