LOTUSSCRIPT/COM/OLE CLASSES
Dim session As New NotesSession Dim db As NotesDatabase Dim agent As NotesAgent Set agent = session.CurrentAgent Set db = agent.Parent
See Also