Sacar info de los usuarios de active directory

22/05/2012 - 17:34 por orek | Informe spam
Hola, estoy intentando sacar la informacion de los usuarios de active directory en ASP desde Visual Studio 6.0. Sólo consigo que me devuelva una cadena completa como esta:

[QUOTE]LDAP://miproyecto.com/CN=pepe,CN=Us...cto,DC=com[/QUOTE]

He probado para sacar "Name","givename","mail"... y no me devuelve nada.
Adjunto el código para ver si alguien puede ayudarme porque no tengo ni idea de como sacarlo.

[QUOTE]strDominio = "SELECT name,ADsPath,description,member FROM 'LDAP://miproyecto.com' WHERE objectClass='user'"
set oConn = server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.Recordset")
oConn.Provider = "ADsDSOOBJECT"

strConn = "Active Directory Provider"
oConn.Open strConn
rst.Open strDominio, oConn, 1,1


On Error Resume Next
'rst = oConn.Execute(strDominio)
numCampos = rst.Fields.Count
If Not rst.Eof Then
Dim i
i=0
%>

<BODY>
<H1>
<% Response.write("A " & numCampos)%>

<%While Not rst.Eof%>

<% Response.write("0 " & rst.Fields(0).value) %>
<% Response.write("1 " & rst.Fields(1).value) %>
<% Response.write("2 " & rst.Fields(2).value) %>
<% Response.write("3 " & rst.Fields(3).value) %>
<% Response.write(" ")%>


<%rst.MoveNext
i = i+1
Wend
Response.write("Cont " & i)
%>

<%
Else
Response.write("No existe el registro que desea")
End If[/QUOTE]

Cualquier tipo de idea sería buena, estoy desesperado...un saludo y gracias.
 

Preguntas similares