我正在尝试使用 ADAM 和 LDAP 进行身份验证。我真的没有这方面的经验,但我一直在工作中陷入困境以解决这个问题。
这就是我所知道的。我正在使用一个名为 JXplorer 的程序来查看在我计算机上的 VM 上运行的 ADAM 服务器。以下是登录详情
这完美地工作。我想要做的是使用 VB.NET 复制这个过程。我尝试了很多东西,但似乎没有任何效果,我不断收到异常,从密码错误到未知错误。这是我开始使用的代码 -
Dim userName As String = "ADAM_TESTER"
Dim userPassword As String = "password"
Dim serverAddress As String = "LDAP://10.0.0.142:389"
Private Sub Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Try
Dim de As DirectoryEntry = New DirectoryEntry("LDAP://10.0.0.142:389/OU=Users,DC=TEST,DC=corp", userName, userPassword)
Dim deSearch As DirectorySearcher = New DirectorySearcher()
deSearch.SearchRoot = de
deSearch.Filter = "(&(objectClass=user) (cn=" + userName + "))"
Dim results As SearchResultCollection = deSearch.FindAll()
If (results.Count > 0) Then
Dim d As DirectoryEntry = New DirectoryEntry(results(0).Path, userName, userPassword)
If (d.Guid.ToString IsNot Nothing) Then
'The directory entry is valid
'DoSomething()
End If
End If
我还尝试将上面的用户名更改为 JXplorer 中用户 DN 中的详细信息。我真的被困在这里并且一直在寻找答案几个小时。
任何帮助,将不胜感激。