Do you know ASP101?<br>
<br>
Try<br>
<A HREF="
TARGET="_new">
<br>
This is a piece of code from<br>
<A HREF="
TARGET="_new">
<br>
<%<br>
Dim DataConn, cmdDC, rsDC<br>
Dim Item<br>
Dim iFieldCount, iLoopVar<br>
Dim strLTorGT, iCriteria, strSortBy, strOrder<br>
<br>
' Retrieve QueryString Variables and convert them to a usable form<br>
strLTorGT = Request.QueryString("LTorGT"

<br>
Select Case strLTorGT<br>
Case "LT"<br>
strLTorGT = "<"<br>
Case "GT"<br>
strLTorGT = ">"<br>
Case Else<br>
strLTorGT = "<>"<br>
End Select<br>
<br>
iCriteria = Request.QueryString("criteria"

<br>
If IsNumeric(iCriteria) Then<br>
iCriteria = CLng(iCriteria)<br>
Else<br>
iCriteria = 0<br>
End If<br>
<br>
strSortBy = Request.QueryString("sortby"

<br>
If strSortBy = "" Then strSortBy = "last_name"<br>
<br>
strOrder = Request.QueryString("order"

<br>
' Finally we've got all our info, now to the cool stuff<br>
<br>
<br>
' Create and establish data connection<br>
Set DataConn = Server.CreateObject("ADODB.Connection"

<br>
DataConn.ConnectionTimeout = 15<br>
DataConn.CommandTimeout = 30<br>
<br>
'Access connection code<br>
'DataConn.Open "DBQ=" & Server.MapPath("database.mdb"

& ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;MaxBufferSize=8192;Threads=20;", "username", "password"<br>
<br>
'Our SQL Server code - use above line to use sample on your server<br>
DataConn.Open Application("SQLConnString"

, Application("SQLUsername"

, Application("SQLPassword"

<br>
<br>
<br>
<br>
Try this!!<br>
Good Luck<br>
<br>