MikeBronner
Programmer
Could someone post an example of ASP code used to query LDAP without any proprietary components?
Thanks! Take Care,
Mike
Thanks! Take Care,
Mike
Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Example of ASP LDAP query string? 14
- Thread starter MikeBronner
- Start date
- Status
- Thread starter
- #4
MikeBronner
Programmer
no solution found yet... anyone else? Take Care,
Mike
Mike
-
1
- #5
This link might be what you are looking for
-
11
- #6
I have a small set of asp pages the queries ldap.
You can check them out at:
Click the search button. If is seems like something you can use as a model I can zip them up and email them to you
zcolton@burltwpsch.org
You can check them out at:
Click the search button. If is seems like something you can use as a model I can zip them up and email them to you
zcolton@burltwpsch.org
The link to view the sample has been change to:
zcolton@burltwpsch.org
zcolton@burltwpsch.org
The code is available at:
I would appriciate comments and suggestions if you download the code.
Zac
I would appriciate comments and suggestions if you download the code.
Zac
ColdFusionKing
Programmer
Hi Guys,
I want to connect to my IPlanet LDAP Server using ASP. This is how I connect to the server using ColdFusion. Can somebody please show me how to QUERY the LDAP Server using ASP.
ColdFusion:
-----------
<CFLDAP
server="ldapserver"
port="389"
action="query"
name="results"
start="o=microsoft"
scope="onelevel"
attributes="dn"
sort="ou"
maxrows="100"
timeout="20">
<table border="0" cellspacing=2 cellpadding=2>
<cfoutput query="results">
<tr>
<td>#dn#<br></td>
</tr>
</cfoutput>
</table>
Regards,
Allan
I want to connect to my IPlanet LDAP Server using ASP. This is how I connect to the server using ColdFusion. Can somebody please show me how to QUERY the LDAP Server using ASP.
ColdFusion:
-----------
<CFLDAP
server="ldapserver"
port="389"
action="query"
name="results"
start="o=microsoft"
scope="onelevel"
attributes="dn"
sort="ou"
maxrows="100"
timeout="20">
<table border="0" cellspacing=2 cellpadding=2>
<cfoutput query="results">
<tr>
<td>#dn#<br></td>
</tr>
</cfoutput>
</table>
Regards,
Allan
This is one of my pages for my W2K Active Directory Phonebook.
<%@ Language=VBScript %>
<%
Option Explicit
Dim con,rs,Com,letter,school
%>
<html>
<head>
<style>
.over { background-color: #FFFF66; cursor: hand}
.out { background-color: #CCCCCC}
</style>
</head>
<body topmargin="0" leftmargin="0" bgcolor="#CCCCCC" >
<%
letter = request.queryString("letter"
school = request.queryString("school"
If letter <> "" Then
Set con = Server.CreateObject("ADODB.Connection"
con.provider ="ADsDSOObject"
con.open "Active Directory Provider"
Set Com = CreateObject("ADODB.Command"
Set Com.ActiveConnection = con
Com.CommandText ="select name, sAMAccountname from 'LDAP://hs_inst.burlington.org/OU=Staff,OU=Domain Users,DC=burlington,DC=org' WHERE objectCategory='person' AND department='"+school+"' AND sn='"+letter+"*' ORDER BY name"
Set rs = Com.Execute
%>
<table border="0" cellpadding="0" bgcolor="#CCCCCC">
<%
Do While Not rs.EOF
%>
<tr><td onMouseOver="this.className='over'" onMouseOut="this.className='out'" class="out" valign="middle" onclick="window.open('info.asp?user=<% response.write rs("sAMAccountname"%>','InfoFrame');window.open('emailstart.htm','EmailFrame');"><a><b><font color="#000080" face="Verdana" size="2">
<% response.write rs("Name"%></font></b></a></td>
</tr>
<%
rs.MoveNext
Loop
rs.Close
%>
</table>
<%
con.Close
Set rs = Nothing
Set con = Nothing
End If
%>
</body>
</html>
<%@ Language=VBScript %>
<%
Option Explicit
Dim con,rs,Com,letter,school
%>
<html>
<head>
<style>
.over { background-color: #FFFF66; cursor: hand}
.out { background-color: #CCCCCC}
</style>
</head>
<body topmargin="0" leftmargin="0" bgcolor="#CCCCCC" >
<%
letter = request.queryString("letter"
school = request.queryString("school"
If letter <> "" Then
Set con = Server.CreateObject("ADODB.Connection"
con.provider ="ADsDSOObject"
con.open "Active Directory Provider"
Set Com = CreateObject("ADODB.Command"
Set Com.ActiveConnection = con
Com.CommandText ="select name, sAMAccountname from 'LDAP://hs_inst.burlington.org/OU=Staff,OU=Domain Users,DC=burlington,DC=org' WHERE objectCategory='person' AND department='"+school+"' AND sn='"+letter+"*' ORDER BY name"
Set rs = Com.Execute
%>
<table border="0" cellpadding="0" bgcolor="#CCCCCC">
<%
Do While Not rs.EOF
%>
<tr><td onMouseOver="this.className='over'" onMouseOut="this.className='out'" class="out" valign="middle" onclick="window.open('info.asp?user=<% response.write rs("sAMAccountname"
%>','InfoFrame');window.open('emailstart.htm','EmailFrame');"><a><b><font color="#000080" face="Verdana" size="2"> <% response.write rs("Name"
%></font></b></a></td></tr>
<%
rs.MoveNext
Loop
rs.Close
%>
</table>
<%
con.Close
Set rs = Nothing
Set con = Nothing
End If
%>
</body>
</html>
ColdFusionKing
Programmer
zcolton, thank you for the code, however I can't get it to work. If I give you my ldap server details, can you add it in your code and post it here.
LDAP Server: develLdap
Port: 389
Action: Query
Start: "o=microsoft"
Can you do this for me?
Regards
Allan
LDAP Server: develLdap
Port: 389
Action: Query
Start: "o=microsoft"
Can you do this for me?
Regards
Allan
The code I posted has a few items that need to be taken into consideration. I posted a link in a post above where you can download the complete phonebook. It has a readme that has some vital info in it to get it to work on your system. What exaclty do you want the asp page to do?
ColdFusionKing
Programmer
I want my asp code to query m iPlanet LDAP directory. I showed you how ColdFusion makes call to the LDAP Server, I want to do exactly the same with ASP
ColdFusionKing
Programmer
I'm a newbie to ASP and would appreciate your help
ColdFusionKing
Programmer
Your code connect to the Active Directory Server it being a microsoft product. But I'm trying to connect to iPlanet (Sun product) using ASP.
Here is the code, it works.
<%
Set pLDAP = CreateObject("LDAPClient.3"
Call pLDAP.Connect("ldapserver","389","cn=Directory Manager", "password"
Set pAttributeNames = CreateObject("LDAPClient.StringCollection"
Call pAttributeNames.Add("givenName"
' Find all the Johns and all the Smiths
Set pEntries = pLDAP.Search("o=airus", "(|(givenName=John)(sn=Smith))", , pAttributeNames)
For Each pEntry In pEntries
Response.Write(pEntry.Attributes("givenName".Values(0).Value & "<br>"
Next
%>
I have downloaded the The ActiveX LDAP Client. ActiveX component is designed for accessing Lightweight Directory Access Protocol (LDAP) servers from Visual Basic and Active Server Pages applications. The LDAP Client can be used from any application that supports ActiveX components.
The licensed version of the ActiveX LDAP Client is not available for download.
Do you know if there is a ActiveX LDAP component which can be used for free to connect to LDAP
Regards,
Allan
Here is the code, it works.
<%
Set pLDAP = CreateObject("LDAPClient.3"
Call pLDAP.Connect("ldapserver","389","cn=Directory Manager", "password"
Set pAttributeNames = CreateObject("LDAPClient.StringCollection"
Call pAttributeNames.Add("givenName"
' Find all the Johns and all the Smiths
Set pEntries = pLDAP.Search("o=airus", "(|(givenName=John)(sn=Smith))", , pAttributeNames)
For Each pEntry In pEntries
Response.Write(pEntry.Attributes("givenName"
.Values(0).Value & "<br>"Next
%>
I have downloaded the The ActiveX LDAP Client. ActiveX component is designed for accessing Lightweight Directory Access Protocol (LDAP) servers from Visual Basic and Active Server Pages applications. The LDAP Client can be used from any application that supports ActiveX components.
The licensed version of the ActiveX LDAP Client is not available for download.
Do you know if there is a ActiveX LDAP component which can be used for free to connect to LDAP
Regards,
Allan
ColdFusionKing
Programmer
did you install ActiveX LDAP Client Evalutaion Copy.( I'm using iPlanet LDAP Server and it works for me.
- Status
Similar threads
- Locked
- Question
- Locked
- Question