LOTUSSCRIPT/COM/OLE CLASSES
Dim session As New NotesSession Dim db As NotesDatabase Dim view As NotesView Dim entryA As NotesViewEntry Dim entryB As NotesViewEntry Dim nav As NotesViewNavigator Set db = session.CurrentDatabase Set view = db.GetView("By Category") view.AutoUpdate = False Set nav = view.CreateViewNav Set entryA = nav.GetLastDocument Set entryB = nav.GetPrevDocument(entryA) Messagebox entryB.UniversalID
See Also