LOTUSSCRIPT /COM/OLE のクラス

例:CreateFTIndex メソッド
次のエージェントは、現在のデータベースに全文索引を作成、または再作成します。

Sub Initialize
 Dim session As New Notessession
 Dim db As NotesDatabase
 Set db = session.CurrentDatabase
 options& = FTINDEX_ALL_BREAKS + FTINDEX_CASE_SENSITIVE
 If db.IsFTIndexed Then
   Call db.CreateFTIndex(options&, True)
   Messagebox "Database index recreated",, "FT index"
 Else
   Call db.CreateFTIndex(options&, False)
   Messagebox "New database index created",, "FT index"
 End If
End Sub

関連項目