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 プロパティ
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集