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

Question

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

我试图以递归方式为计算机对象搜索我的Active Directory（从root开始）。现在，我已经能够在单个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

希望你能给我一些建议。

Answer 1

好的，这有点难过。我一整天都在认真地寻找这个问题，但在这里提出问题后15分钟，我发现我可以省略OU并从根目录下搜索。我想那就是。