LOTUSSCRIPT/COM/OLE CLASSES
Example: Searching for entries in a view entry collection
This example searches for up to 10 user-defined view entries and places them in a folder.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim vc As notesViewEntryCollection
Dim entry As NotesViewEntry
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView("By Category")
Set vc = View.GetAllEntriesByKey("Schools")
Set entry = view.GetEntryByKey("Schools")
Set doc = entry.Document
Call vc.FTSearch(Inputbox$("Entry name?"), 10)
Call vc.PutAllInFolder("Education")
End Sub
Véase también
Searching for entries in a view entry collection
Glosario
¿Desea opinar sobre la Ayuda?
Ayuda sobre la Ayuda
Abrir la Ayuda en pantalla completa
Glosario
¿Desea opinar sobre la Ayuda?
Ayuda sobre la Ayuda
Abrir la Ayuda en pantalla completa