| Platform SDK: Exchange Server |
The following Visual Basic, Scripting Edition (VBScript) example demonstrates how to use an instance of the ACLObject COM class to read the entries in a folder's access control list. Assume we have retrieved a folder in a previous part of the script, and we've stored the interface to the folder in a variable called fldr. Error handling has been removed for clarity.
set acl = createobject("MSExchange.aclobject")
set acl.cdoitem = fldr ' previously retrieved CDO folder object
For Each ace in acl.Aces
strID = ace.Id
bitsrights = ace.Rights
' collect these and do something with them
Next ace
' when finished with the object, release it
Set acl = Nothing