例: LastRun property (NotesAgent - LotusScript®)

次のスクリプトは、現在のエージェントが最後に実行された日時を取得します。例えば、エージェントが最後に実行された日時が 1996 年 8 月 15 日の午前 11 時 9 分 20 秒の場合、LastRun プロパティは日時値 8/15/96 11:09:20 AM を含む Variant を返します。
```
Dim session As New NotesSession
Dim agent As NotesAgent
Dim lasttime As Variant
Set agent = session.CurrentAgent
lasttime = agent.LastRun
```
次のスクリプトは現在のエージェントが最後に実行されてから、現在のデータベースの全文索引が更新されたかどうかを調べます。更新されていないときは、スクリプトは全文索引を更新します。
```
Dim session As New NotesSession
Dim agent As NotesAgent
Dim db As NotesDatabase
Set agent = session.CurrentAgent
Set db = session.CurrentDatabase
If ( agent.LastRun > db.LastFTIndexed ) Then
  Call db.UpdateFTIndex( False )
End If
```