Cuestión : msExchMailboxSecurityDescriptor del ajuste con VB.NET

Hola,

I que intenta agregar un nuevo descriptor de la seguridad a una caja para conceder a otra cuenta las derechas completas ella.  Agrego actual un descriptor normal de la seguridad vía este método: el

protegió el

de SetFullMbxPerms (usuario de ByVal como administrador de DirectoryEntry, de ByVal como SecurityIdentifier) amortigua userSecurity como ActiveDirectorySecurity = fullMbxControl dévil de user.ObjectSecurity

como nuevo ActiveDirectoryAccessRule (trustee, _
ActiveDirectoryRights.GenericAll, AccessControlType.Allow, _
ActiveDirectorySecurityInheritance. El extremo Sub

However, éste del

del
user.CommitChanges del

userSecurity.AddAccessRule (fullMbxControl) de SelfAndChildren) () solamente me está consiguiendo la seguridad activa del directorio y no la seguridad de la caja.  ¿Cómo puedo lograr esto con vb.net y modificar el msExchMailboxSecurityDescriptor similar a lo que he hecho arriba?

Thanks,
Ron class= del

Respuesta : msExchMailboxSecurityDescriptor del ajuste con VB.NET

La autorización, ésta trabaja con DirectoryEntry y el cdoexm
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

    SetExMbxPerms2 secundario (usuario de ByVal como administrador de DirectoryEntry, de ByVal como secuencia)

        Const ADS_ACEFLAG_INHERIT_ACE = 2
        Const ADS_RIGHT_DS_CREATE_CHILD = 1
        Const ADS_ACETYPE_ACCESS_ALLOWED = 0

        Dacl dévil como nuevo Access Control List
        mailboxRights déviles como nuevo SecurityDescriptor
        As dévil como nuevo AccessControlEntry
        Caja dévil como 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
        as. Banderas = 0
        as. Administrador = administrador
        Console.WriteLine (dacl.AceCount)
        dacl.AddAce (as)
        Console.WriteLine (dacl.AceCount)
        mailboxRights.DiscretionaryAcl = dacl
        mailbox.MailboxRights = mailboxRights
        user.CommitChanges ()

    Submarino del extremo
Otras soluciones  
 
programming4us programming4us