Skip to main content

Examples: LastRun property (NotesSession - LotusScript)

  1. This agent script gets the date that the agent was last run, and puts it into runDate. For example, if the agent last ran on August 15, 1996, at 11:09:20 AM, LastRun returns 8/15/96 11:09:20 AM. If this is the first time that the agent has run, LastRun returns 11/30/1899.
Sub Initialize
Dim session As New NotesSession
Dim runDate As Variant
runDate = session.LastRun
End Sub
  1. This agent script checks if the current database's full-text index has been updated since the agent last ran. If not, it updates the index.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
If ( session.LastRun > db.LastFTIndexed ) Then
Call db.UpdateFTIndex( False )
End If
End Sub