SetExMbxPerms2 secondario (utente di ByVal come amministratore di ByVal, di DirectoryEntry come stringa)
Const ADS_ACEFLAG_INHERIT_ACE = 2
Const ADS_RIGHT_DS_CREATE_CHILD = 1
Const ADS_ACETYPE_ACCESS_ALLOWED = 0
Dacl fioco come nuovo Access Control List
mailboxRights fiochi come nuovo SecurityDescriptor
Asso fioco come nuovo AccessControlEntry
Cassetta postale fioca come CDOEXM.IExchangeMailbox = user.NativeObject
mailboxRights = mailbox.MailboxRights
dacl = mailboxRights.DiscretionaryAcl
ace.AccessMask = ADS_RIGHT_DS_CREATE_CHILD
ace.AceType = ADS_ACETYPE_ACCESS_ALLOWED
ace.AceFlags = ADS_ACEFLAG_INHERIT_ACE
asso. Bandierine = 0
asso. Amministratore = amministratore
Console.WriteLine (dacl.AceCount)
dacl.AddAce (asso)
Console.WriteLine (dacl.AceCount)
mailboxRights.DiscretionaryAcl = dacl
mailbox.MailboxRights = mailboxRights
user.CommitChanges ()
Sommergibile dell'estremità
|