LOTUSSCRIPT /COM/OLE のクラス
例:Level プロパティ
1 次の例は、データベースの第 1 番目のエントリについてのメッセージを表示します。db というエントリは NotesDatabase オブジェクトです。
Set acl = db.ACL
Set entry = acl.GetFirstEntry
If ( entry.Level = ACLLEVEL_READER ) Then
Messagebox( "The first entry has Reader access.")
End If
2 次のスクリプトは現在のデータベースの ACL にあるサーバー Brussels のエントリを取得し、そのアクセスレベルを ［設計者］ に変更します。
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( "Brussels/Europe/ACME" )
If Not ( entry Is Nothing ) Then
entry.Level = ACLLEVEL_DESIGNER
Call acl.Save
End If
関連項目
Level プロパティ
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
?
ヘルプの使い方
すべてのヘルプ項目
用語集