LOTUSSCRIPT/COM/OLE CLASSES

Examples: RemoveAll method
This example deletes all the documents collected by the FTSearch method if the number of documents in the collection does not equal 2.

Sub Click(Source As Button)
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim collection As NotesDocumentCollection

  Set db = session.CurrentDatabase
 Set collection = db.FTSearch("Annual reports", 10)
 If collection.Count <> 2 Then
   Call collection.RemoveAll(False)
 End If
End Sub

See Also