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("Christmas") view.AutoUpdate = False Set vc = view.GetAllEntriesByKey("craft projects") Call vc.RemoveAllFromFolder("Christmas") Call vc.PutAllInfolder("Leisure time")
See Also