1

我正在尝试查询用户的活动目录以获取详细信息列表：1.名字/姓氏2.电子邮件3.用户名4.域

我能够得到除域名之外的所有内容。这是我的代码：

    Dim oroot As DirectoryEntry = New DirectoryEntry("GC://ldap.someCompany.com")
    Dim osearcher As DirectorySearcher = New DirectorySearcher(oroot)
    Dim result As SearchResult

    osearcher.Filter = String.Format("(&(SAMAccountName={0}))", "myUsername")
    osearcher.PropertiesToLoad.Add("cn")
    osearcher.PropertiesToLoad.Add("SAMAccountName")   'Users login name  
    osearcher.PropertiesToLoad.Add("givenName")    'Users first name  
    osearcher.PropertiesToLoad.Add("sn")   'Users sur name  
    osearcher.PropertiesToLoad.Add("mail")   'Email address

    result = osearcher.FindOne

    Try
        myUser.UserID = result.Properties("cn").Item(0)
        myUser.Domain = ""
        myUser.EmailAddress = result.Properties("mail").Item(0)
        myUser.FirstName = result.Properties("givenName").Item(0)
        myUser.LastName = result.Properties("sn").Item(0)
        myUser.Domain = result.Properties("displayName").Item(0)

    Catch ex As Exception
        Return Nothing
    End Try

这将返回此字符串：GC://ldap.someCompany.com/CN=FirstName M LastName,OU=Employees,OU=Domain Users,DC=val1,DC=val2,DC=com

所以，我有两个问题。一、如何获取用户的域名？它似乎在 DC= （我有 val1 的地方） 其次，有没有办法加快搜索速度？现在，运行查询大约需要 10 秒。

我正在使用 .net 4.0 和 Visual Studio 2010 感谢您的帮助

杰森

4

1 回答 1

0

从右侧开始并阅读 DC 组件，然后您就拥有了该帐户的领域/域。请参阅RFC2247。

于 2013-01-29T15:30:36.587 回答