Examples: Parent property (NotesAgent - LotusScript®)

This script gets the parent database of the current agent. For example, if this agent is running in the database WHOAMI.NSF, then the db object represents WHOAMI.NSF.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim agent As NotesAgent
Set agent = session.CurrentAgent
Set db = agent.Parent