Получение прав почтового ящика из AD с помощью System.DirectoryServices - PullRequest
0 голосов
/ 03 июня 2011

Мне нужно извлечь дескрипторы безопасности для атрибута активного каталога "msExchMailboxSecurityDescriptor" на объектах учетной записи пользователя.

Пока все, что я могу найти, это то, что мне нужно использовать этот класс, чтобы сделать это , но я не могу найти пример кода того, как начать извлекать то, что я хочу, используя его.

Я ограничен использованием .Net v2.0.

Кто-нибудь с опытом или идеями?

1 Ответ

0 голосов
/ 03 июня 2011

Использование компонента ActiveDS COM кажется намного проще:

Imports ActiveDS

Private Function GetSecurityDescriptor(ByVal DNPath As String) As List(Of AccessControlEntry)

        Dim AceList As New List(Of AccessControlEntry)

        Try

            Dim ent As New DirectoryEntry(String.Format("LDAP://{0}", DNPath))
            Dim sd As SecurityDescriptor = CType(ent.Properties("msExchMailboxSecurityDescriptor").Value, SecurityDescriptor)
            Dim acl As AccessControlList = CType(sd.DiscretionaryAcl, AccessControlList)
            Dim ace As AccessControlEntry

            For Each ace In CType(acl, IEnumerable)

                AceList.Add(ace)

            Next

        Catch ex As Exception

            Return AceList

        End Try

        Return AceList

    End Function
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...