例: Remove メソッド

次のスクリプトは現在のデータベースの ACL で、Shelly McPhail のエントリを検索して削除します。削除後は、Shelly は ACL には登録されてなく、-Default- のアクセス権を持ちます。

Dim session As New NotesSession
Dim db As NotesDatabase
Dim acl As NotesACL
Dim entry As NotesACLEntry
Set db = session.CurrentDatabase
Set acl = db.ACL
Set entry = acl.GetEntry( "Shelly McPhail/East/ACME" )
Call entry.Remove
Call acl.Save