Hej hopp...
Jag tänkte att jag skulle labba lite med LDAP frågor mot Active directory. Hittar en massa olika exempel ute på internet om AD men det verkar vara olika uppkopplingsmetoder på alla. Har dessutom inte fått något att fungera.
Denna ger i alla fall ett felmeddelande:
<%
'dn = ?
'cn = ?
'ou = Organisation unit
'o = Organisation
SQLStmt = "SELECT cn " & _
"FROM 'LDAP://ad.xxx.com:389/o=ad.xxx.com/ou=users' " & _
"WHERE objectClass='*'"
Set Conn = CreateObject("ADODB.Connection")
Conn.Provider = "ADSDSOObject"
Conn.Open "ADs Provider", _
"cn=mattias.nordin,ou=users,o=ad.xxx.com", _
"mypassword"
Set rs = Conn.Execute(SQLStmt)
Do While Not rs.EOF Or rs.BOF
ReturnValue = rs.Fields(0)
If IsArray(ReturnValue) Then
For I = LBound(ReturnValue) To UBound(ReturnValue)
If ReturnValue(I) <> "" Then
Response.Write ReturnValue(I) & "<BR>"
End If
Next
Else
Response.Write ReturnValue & "<BR>"
End If
rs.MoveNext
Loop
%>
Provider error '80040e09'
Permission denied.
/_mattias_ovrigt/test/ldap2.asp, line 31