If you targeted user are only using IE. (example. A company Intranet) There is the RDC.Control which runs client side and is loaded with IE 4+ browsers.
Below is an Example of how to load and update two selection objects.
Form Web page
<html>
<head>
<title>RDC Example</title
<script FOR=window EVENT=onLoad>
// Display Loading Msg
document.getElementById('divLoading').style.visibility='visible'
document.body.style.cursor='wait'
// Load Data Objects
tdcSubscription.URL = 'DataPage.asp?FRM=0&SQL=0';
tdcSubScriptions.FetchOptions=1
tdcSubScriptions.Refresh();
</SCRIPT>
<SCRIPT FOR=tdcSubScriptions EVENT=ondatasetchanged>
oList=document.getElementById('cmbSubscription')
aOptions=new Array
for (i=0;i<tdcSubScriptions.recordset.recordCount;i++){
aOptions[i]=new Option(tdcSubScriptions.recordset(0).value,tdcSubScriptions.recordset(1).value)
oList.options[i]=new Option(aOptions[i].text,aOptions[i].value)
tdcSubscription.recordset.MoveNext()
}
</script>
<SCRIPT FOR=tdcMemberData EVENT=ondatasetchanged>
' Update Members List control
oList=document.getElementById('cmbSubscription')
aOptions=new Array
for (i=0;i<tdcMemberData.recordset.recordCount;i++){
aOptions[i]=new Option(tdcMemberData.recordset(0).value,tdcMemberData.recordset(1).value)
oList.options[i]=new Option(aOptions[i].text,aOptions[i].value)
tdcSubscription.recordset.MoveNext()
}
</script>
<script language="javascript">
function GetMembersData()
oList=document.getElementById('cmbSubscription')
if(oList.selectedIndex!=0){
tdcMemberData.URL = 'DataPage.asp?FRM=0&SQL=1&SubId='+oList.options[oList.selectedIndex].value;
tdcMemberData.FetchOptions=1
tdcMemberData.Refresh();
}
</script>
</head>
<body>
<!--Remote Data Control -->
<OBJECT classid="clsid:BD96C556-65A3-11D0-983A-00C04FC29E33"
ID=tdcSubScriptions
height=0
width=0
codebase="http://activex.microsoft.com/controls/vb6/MSRdc20.cab#version=6.0.84.18">
</OBJECT>
<OBJECT classid="clsid:BD96C556-65A3-11D0-983A-00C04FC29E33"
ID=tdcMemberData
height=0
width=0
codebase="http://activex.microsoft.com/controls/vb6/MSRdc20.cab#version=6.0.84.18">
</OBJECT>
<form id="form1" name=Form1">
<font color="#CC0000"><b>*</b></font>Subscriptions:<br>
<select id="cmbSubscription"
name="cmbSubscription"
datasrc=#tdcMemberData
datafld="MembershipLevel"
onChange="GetMembersData()"
size="5">
</select>
<br>
<font color="#CC0000"><b>*</b></font>Members:<br>
<select id="cmbMembers"
name="cmbMembers"
datasrc=#tdcMemberData
datafld="MembershipLevel"
size="20">
</select>
</form>
</body>
</html>
ASP "Data Page"
<% Option Explicit %>
<%
Dim oConn,oRs,sSQL
Response.Expires=0
Set oRs = server.CreateObject("ADODB.RECORDSET")
Set oConn = server.createobject("ADODB.CONNECTION")
oConn.ConnectionString = Application("DbWriter")
If Request.QueryString("FRM") = 0 Then ' Create RDC Data XML DataStream
Select Case CInt(Request.QueryString("SQL"))
Case 0 ' Subscriptions
sSQL = "SELECT ElemName, ElemValue FROM Elements WHERE (((ElemGroupID)='100')) ORDER BY DisplayOrder"
Case 1
sSQL = "SELECT ID, Fname + ' ' + LName AS FullName FROM Members WHERE SubscriptionId = " & Request.QueryString("SubID") &" ORDER BY Lname, FName"
Case 2
sSQL = ""
Case 3
sSQL = ""
End Select
Set oRs = server.CreateObject("ADODB.RECORDSET")
Set oConn = server.createobject("ADODB.CONNECTION")
oConn.ConnectionString=Application("DbWriter")
oConn.open
Response.ContentType = "text/xml"
Const adPersistXML = 1
oRs.Open sSQL,oConn,2,1
oRS.Save Response, adPersistXML
oRs.Close
Set oRs = Nothing
oConn.Close
Set oConn=Nothing
End IF
%>
When the page loads, the first dropdown will be populated.
the onChange event will force a call to the datapage for the second dataset.
All the end user sees is a stutterof the page while the list is being updated.
Another advantage to this method is that almost allof the HTML controls can be bound to a the remote data control.
Here is how to turn a table into a Datagrid
<table id=MemberData datasrc=#tdcMemberData>
<tbody>
<tr id=trTemplate>
<td><span datafld="FNAME"></span></td>
<td><span datafld="LNAME"></span></td>
<td><span datafld="EMAIL"></span></td>
<td><span datafld="HomePhone"></span></td>
<td><span datafld="WorkPhone"></span></td>
<td><span datafld="WorkExtension"></span></td>
</tr>
</tbody>
</table>
As for searching a directory. Read up on the MSDAIPP.DSO provider in MDAC 2.6 and MDAC 2.7 The provider can access file information via internet publishing services
Use the ADO Recordset, Record and Stream Objects to Open Documents (http://support.microsoft.com/default.aspx?scid=kb%3Ben-us%3B248255)
Hope this helps :cool: