LOTUSSCRIPT/COM/OLE CLASSES

Examples: CreateViewNav method
This script creates a view navigator for all of the entries in the By Category view and puts the second entry in a folder called My Favorites.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim nav As NotesViewNavigator
Dim entryA As NotesViewEntry
Dim entryB As NotesViewEntry
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView("By Category")
Set nav = view.CreateViewNav()
Set entryA = nav.GetFirst
Set entryB = nav.GetNext(entryA)
Set doc = entryB.Document
Call doc.PutInFolder("My Favorites")

See Also