LOTUSSCRIPT/COM/OLE CLASSES
Dim session As New NotesSession Dim db As NotesDatabase Dim view As NotesView Dim nav As NotesViewNavigator Set db = session.CurrentDatabase Set view = db.GetView( "Sales Records" ) Set nav = view.CreateViewNavFromAllUnread()