例: IsServer property

次のスクリプトは、エントリがサーバーエントリであるかどうかを調べます。

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("Jaba/East/ACME")
If entry.IsServer Then
  Messagebox entry.Name & " is a server."
Else
  Messagebox entry.Name & " is not a server."
End If
Call acl.Save