LOTUSSCRIPT/COM/OLE CLASSES
Dim session As New NotesSession Dim db As NotesDatabase Dim view As NotesView Dim vc As NotesViewEntryCollection Set db = session.CurrentDatabase Set view = db.GetView("By Category") Set vc = view.GetAllEntriesByKey("Books") Call vc.FTSearch("Best Sellers", 10) Call vc.PutAllInFolder("Search Results")
See Also