例: Parent property (NotesACLEntry - LotusScript®)

次のスクリプトは、エントリの親のアクセス制御リストを取得します。

Dim db As New NotesDatabase( "", "parent.nsf" )
Dim acl As NotesACL
Dim parentACL As NotesACL
Dim entry As NotesACLEntry
Set acl = db.ACL
Set entry = acl.GetFirstEntry
Set parentACL = entry.Parent ' acl and parentACL are same