例: LastFTIndexed property (NotesDatabase - LotusScript®)

  1. 次のスクリプトは現在のデータベースで最後に全文索引が作成された日時を取得します。例えば、LastFTIndexed プロパティは 10/30/95 6:36:18 PM のように返します。
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim indexDate As Variant
    Set db = session.CurrentDatabase
    indexDate = db.LastFTIndexed
  2. 次のスクリプトは現在のデータベースが最後に全文索引を作成されてから更新されているかどうかを調べます。更新されている場合、スクリプトは全文索引を更新します。
    Dim session As New NotesSession
    Dim db As NotesDatabase
    Set db = session.CurrentDatabase
    If ( db.LastModified > db.LastFTIndexed ) Then
      Call db.UpdateFTIndex( False )
    End If