使用 VB.net 递归搜索整个 Active Directory答案

【问题标题】：Search entire Active Directory recursively with VB.net使用 VB.net 递归搜索整个 Active Directory
【发布时间】：2015-01-27 13:00:04
【问题描述】：

我不是一个非常有经验的 VB.net 用户，因此，我一直在努力解决这个问题。

我正在尝试递归搜索我的 Active Directory（从根目录开始）以查找计算机对象。现在，我已经能够在单个 OU 中找到计算机对象，但我想以递归方式对整个 AD 执行此操作。

Dim enTry As DirectoryEntry = New DirectoryEntry("LDAP://" & "my.domain.com" & "/cn=Computers,dc=bla,dc=com")
    enTry.Username = "myusername"
    enTry.Password = "mypassword"
    Dim mySearcher As DirectorySearcher = New DirectorySearcher(enTry)
    mySearcher.Filter = ("(objectClass=computer)")
    Dim resEnt As SearchResult

希望你能给我一些建议。

【问题讨论】：

标签： vb.net active-directory ldap

【解决方案1】：

好吧，这有点难过。我整天都在认真地寻找这个，但是在这里问这个问题 15 分钟后，我发现我可以省略 OU，它会从根向下搜索。我想这样就可以了。

【讨论】：

您没有在查询中指定 OU。
你是对的，因为“计算机”是一个容器。但它也可能是一个OU。无论如何，不指定 CN 的 OU 就可以解决问题。如果我必须从 OU 开始并从那里递归，我不知道该怎么做。
我不认为这个问题（或答案）真的会给未来的访问者增加任何东西，所以我建议你删除它。