LOTUSSCRIPT/COM/OLE CLASSES

Examples: FTIndexFrequency property
This agent cycles the update frequency for a database with a full-text index.

Sub Initialize
 Dim session As New Notessession
 Dim db As NotesDatabase
 Set db = session.CurrentDatabase
 If db.IsFTIndexed Then
   If db.FTIndexFrequency = FTINDEX_DAILY Then
     db.FTIndexFrequency = FTINDEX_HOURLY
     Messagebox "Frequency set to hourly",, "FT index"
   Elseif db.FTIndexFrequency = FTINDEX_HOURLY Then
     db.FTIndexFrequency = FTINDEX_IMMEDIATE
     Messagebox "Frequency set to immediate",, "FT index"
   Elseif db.FTIndexFrequency = FTINDEX_IMMEDIATE Then
     db.FTIndexFrequency = FTINDEX_SCHEDULED
     Messagebox "Frequency set to scheduled",, "FT index"
   Else
     db.FTIndexFrequency = FTINDEX_DAILY
     Messagebox "Frequency set to daily",, "FT index"
   End If
 End If
End Sub

See Also