Pergunta : msExchMailboxSecurityDescriptor do ajuste com VB.NET

Olá!,

I am que tenta adicionar um descritor novo da segurança a uma caixa postal a fim conceder a outra o cliente direitas cheias a ele.  Eu adiciono atualmente um descritor normal da segurança através deste método: o

protegeu o

de SetFullMbxPerms (usuário de ByVal como o depositário de DirectoryEntry, de ByVal como SecurityIdentifier) escurece o userSecurity como ActiveDirectorySecurity = o fullMbxControl não ofuscante de user.ObjectSecurity

como ActiveDirectoryAccessRule novo (trustee, _
ActiveDirectoryRights.GenericAll, AccessControlType.Allow, _
ActiveDirectorySecurityInheritance. A extremidade Sub

However do

do
user.CommitChanges do

userSecurity.AddAccessRule de SelfAndChildren) (fullMbxControl) (), este está começ somente me a segurança ativa do diretório e não a segurança da caixa postal.  Como posso eu realizar este com vb.net e modificar o msExchMailboxSecurityDescriptor similar a o que eu fiz acima?

Thanks,
Ron class= do

Resposta : msExchMailboxSecurityDescriptor do ajuste com VB.NET

A aprovação, esta trabalha usando DirectoryEntry e 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 secundário (usuário de ByVal como o depositário de DirectoryEntry, de ByVal como a corda)

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

        Dacl não ofuscante como o Access Control List novo
        mailboxRights não ofuscantes como SecurityDescriptor novo
        Ás não ofuscante como AccessControlEntry novo
        Caixa postal não ofuscante 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
        ás. Bandeiras = 0
        ás. Depositário = depositário
        Console.WriteLine (dacl.AceCount)
        dacl.AddAce (ás)
        Console.WriteLine (dacl.AceCount)
        mailboxRights.DiscretionaryAcl = dacl
        mailbox.MailboxRights = mailboxRights
        user.CommitChanges ()

    Submarino da extremidade
Outras soluções  
 
programming4us programming4us