sub initialize()
on error goto a
dim session as new notessession
dim db as notesdatabase
set db = session.currentdatabase
'定義當前資料庫的acl
dim acl as notesacl
dim entry as notesaclentry
set acl = db.acl
set entry = acl.getfirstentry
'迴圈查詢當前資料庫中的entry(就是default那一欄的都是entry)
while not (entry is nothing)
'如果找到的其中乙個entry的角色是「[管理員]」的則執行:
if (entry.isroleenabled("[管理員]")) then
'找到角色為管理員的使用者然後進行相關的操作
end if
set entry = acl.getnextentry(entry)
wend
exit sub
a:msgbox "錯誤在**agent_acl的第" & erl & "行,描述:---" & error
end sub
ACL訪問控制許可權
給指定的使用者分配許可權 setfacl m u gest rw folder m表示設定許可權,x表示刪除許可權 u代表使用者,g也可以指定組設定許可權,後面指定組名即可 gest使用者名稱 rw表示許可權 folder表示目錄 getfacl folder file folder owner t...
C 訪問控制許可權
第一 private,public,protected 訪問標號的訪問範圍,在沒有繼承的情況下 private 只能由1.該類中的函式 2.其友元函式訪問。不能被任何其他訪問,該類的物件也不能訪問。protected 可以被1.該類中的函式 2.子類的函式 以及3.其友元函式訪問。但不能被該類的物件...
檔案訪問控制許可權
設定許可權列表 裝置許可權列表載入 facl filesystem access control list 利用檔案擴充套件屬性儲存額外的訪問控制許可權 普通使用者無法修改檔案屬主與屬組 對於檔案的許可權進行附加補充說名的乙個許可權設定方式 有兩個普通使用者tom jerry,當tom由乙個檔案只想...