Vbscript VB脚本-邮箱权限查找器

我遇到了以下设置，并试图找出AceFlag值18的含义，上下文如下：

dn = "LDAP://" & replace(rs.Fields("distinguishedName").Value,"/","\/")
    set objuser = getobject(dn)
Set oSecurityDescriptor = objuser.Get("msExchMailboxSecurityDescriptor")
Set dacl = oSecurityDescriptor.DiscretionaryAcl
Set ace = CreateObject("AccessControlEntry")

For Each ace In dacl
if ace.AceFlags <> 18 then
end if

dn=“LDAP://”&replace（rs.Fields（“distrignifiedname”）.Value，“/”，“\/”）
set objuser=getobject（dn）
设置oSecurityDescriptor=objuser.Get（“msExchMailboxSecurityDescriptor”）
设置dacl=oSecurityDescriptor.DiscretionaryAcl
设置ace=CreateObject（“AccessControlEntry”）
对于dacl中的每个ace
如果ace.ace18那么
如果结束

---

有人有什么想法吗？

这意味着ACE是一个继承的容器ACE（0x10+0x02）。看