Examples: Parent property (NotesDocumentCollection - LotusScript®)

This script gets the parent database of a collection. Since db and parentDb represent the same database, this script prints the title of MOTHER.NSF twice.

Sub Click(Source As Button)
  Dim db As New NotesDatabase( "", "mother.nsf" )
  Dim parentDb As NotesDatabase
  Dim collection As NotesDocumentCollection
  Set collection = db.AllDocuments
  Set parentDb = collection.Parent
  Messagebox( db.Title )
  Messagebox( parentDb.Title )
End Sub