LS中针对存取控制权限acl的相关操作和判读(二)
来源:互联网 发布:人工智能行业分析报告 编辑:程序博客网 时间:2024/06/07 07:43
Sub Initialize()
On Error GoTo a
Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.Currentdatabase
'从数据库ACL中获取具备[manager]角色的用户(个人)
Dim acl As NotesACL
Dim aclEntry As NotesACLEntry
Set acl = db.acl
Set aclEntry = acl.GetFirstEntry
While Not aclEntry Is Nothing
'判断Entry中用户类型为“个人”的则:
If aclEntry.IsPerson Then
'循环找到的Entry中的所以角色
ForAll strRoles In aclEntry.Roles
'判断找到的角色是否为“管理员”
If strRoles="[管理员]" Then
Dim strTmp As Variant
strTmp = aclEntry.Name
Exit ForAll
End If
End ForAll
End If
Set aclEntry = acl.getNextEntry(aclEntry)
Wend
'Call aclEntry.enableRole( "[manager]" ) '使当前角色生效
'Call acl.Save() '保存当前的acl
Exit Sub
a:
MsgBox "错误在代理agent_acl2的第" & Erl & "行,描述:---" & Error
End Sub
- LS中针对存取控制权限acl的相关操作和判读(二)
- LS中针对存取控制权限acl的相关操作和判读(一)
- 文件的权限和访问控制列表(ACL)
- 数据库存取控制详细(ACL)
- Domino数据库存取控制列表(ACL)
- ZooKeeper通过Auth和ACL完成节点的权限控制。
- Ls中操作XML的方法二
- Linux 基础命令(四)—— 文件的权限和访问控制列表(ACL)
- 权限管理之基于ACL的实现:针对需求做分析和设计
- acl和rbac权限控制区别
- Domino数据库存取控制列表(ACL)基本知识
- domino数据库存取控制列表(acl)基本知识_lotus notes
- Domino数据库存取控制列表(ACL)基本知识
- Zookeeper(四)Acl权限控制
- acl权限控制详解
- linux ACL权限控制
- Zookeeper ACL权限控制
- linux ACL权限控制
- javascript读取文件
- LS中针对存取控制权限acl的相关操作和判读(一)
- 浅谈http代理服务器的穿透(2)
- android NDK 的进阶实验
- 指针与数组
- LS中针对存取控制权限acl的相关操作和判读(二)
- 不务正业
- 自旋锁的应用条件
- 我的烦恼
- 答复文档的判断和创建
- 外围系统通过数据中心与SAP做接口
- javascript 页面输入内容的检查与判断方法
- Repeater和TreeView
- ClamAV编译安装及使用(二)