<% myID = CLng(request.querystring("id")) mySQL = "select * from REFERENCES1 WHERE ID = " & myID 'DSN Connection Set Con = Server.CreateObject("ADODB.Connection") 'Con.Open "DSN=fgscReferences" Con.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("/database/REFERENCES1.mdb") Set rs = Server.CreateObject("ADODB.Recordset") rs.open mySQL, con 'Display Recordset While not rs.EOF response.write(rs("Field1")) rs.MoveNext Wend 'Close recordset and connection rs.close set rs = nothing con.close set con = nothing %>