0

Active Directory の特定のグループに属するユーザーを入力しようとしているドロップダウン リストがあります。

グループ名は OverRiders で、8 人がこのグループのメンバーです。さらにメンバーを追加できます。

次のドロップダウンがありますが、コードを実行すると、ドロップダウンが空白になります。

私は何を間違っていますか?

コードを参照してください:

        Private Sub FillDropdown()
    Dim oroot As DirectoryEntry = New DirectoryEntry("LDAP://CN=OverRiders,OU=Departments,DC=domain,DC=com")
Dim osearcher As DirectorySearcher = New DirectorySearcher(oroot)
Dim oresult As SearchResultCollection
Dim result As SearchResult
Dim list As New List(Of String)

    osearcher.Filter = "(&(objectCategory=group)(cn={0}))"
    ' search filter; only display emp with firstname / lastname pair
    osearcher.PropertiesToLoad.Add("name") ' member
    oresult = osearcher.FindAll()


    For Each result In oresult
        If Not result.GetDirectoryEntry.Properties("name").Value Is Nothing Then
            list.Add(result.GetDirectoryEntry.Properties("name").Value.ToString())
            Call list.Sort()
        End If
Next
emplist.DataSource = list
emplist.DataBind()

End Sub

グループが存在し、グループ名が有効であることを確認できました。事前にどうもありがとう

4

2 に答える 2

2

かわった:

Dim oroot As DirectoryEntry = New DirectoryEntry("LDAP://CN=OverRiders,OU=Departments,DC=domain,DC=com")

Dim oroot As DirectoryEntry = New DirectoryEntry("LDAP://DC=domain,DC=com")

この:

osearcher.Filter = "(&(objectCategory=group)(cn={0}))"

これに:

osearcher.Filter = "(&(objectCategory=user)(memberOf=CN=overRiders,OU=Departments,DC=domain,DC=com)‌​)"

他のすべては変更されません。

それが他の誰かに役立つことを願っています。

于 2013-02-05T17:08:45.280 に答える
1

これは古い質問であることは知っていますが、これは同様の状況で私のために働いたものです:

    Dim UsersInGroup As New Collection()

    Dim de As New DirectoryEntry("LDAP://[Domain]")

    Dim MemberSearcher As New DirectorySearcher

    With MemberSearcher
        .SearchRoot = de
        .Filter = "(&(ObjectClass=Group)(CN=" & Group & "))"
        .PropertiesToLoad.Add("Member")
    End With

    Dim mySearchResults As SearchResult = MemberSearcher.FindOne()

    For Each User In mySearchResults.Properties("Member")
        UsersInGroup.Add(User)
    Next
于 2016-10-09T01:48:51.980 に答える