<%
Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") Conn.Open "DefaultDir=c:\inetpub\wwwroot\ms_text;Driver={Microsoft Text Driver (*.txt; *.csv)};Extensions=txt,csv,tab,asc;" SQL = "SELECT fldAuto, fldName, fldEmail FROM db.csv WHERE (fldName = '" & varName & "')" rs.Open SQL, Conn %> <%= rs("fldAuto") %><br> <%= rs("fldName") %><br> <%= rs("fldEmail") %><br> |