广告认证登录页面

Question

我正在创建一个helpdesk作为附带项目，并使用'usernametxt'和'passwordtxt'textboxes制作了一个小登录页面。

我希望用户名和密码在我的域上对我的广告服务器进行身份验证：

domain - home.local dc - home-serv

我在网上尝试了所有LDAP示例，没有运气。我可以做错什么吗？

请有人可以帮助我让MS网站对域进行身份验证？我希望所有用户能够登录到系统。

谢谢！

Answer 1

尝试类似的东西

 Public Function Authenicate(ByVal username As String, ByVal password As String) As Boolean
       Dim isValid As Boolean = False
       Try
       Dim de As New DirectoryServices.DirectoryEntry("LDAP://local.home", username, password, _
            DirectoryServices.AuthenticationTypes.Secure Or _
            DirectoryServices.AuthenticationTypes.Sealing Or _
            DirectoryServices.AuthenticationTypes.Signing)
        de.RefreshCache()
        isValid = True
     Catch
     End Try
     Return isValid
End Function