2.
<%
set conn=Server.CreateObject("ADODB.Connection")
DefaultConnectionString = "DSN=xxx;UID=sa;PWD=password"
conn.Open DefaultConnString
set rs = Server.CreateObject("ADODB.RecordSet")
sqlString = "select * from test where username='" & request("username") & "'"
rs.ActiveConnection=conn
rs.CursorLocation=3
rs.Open sqlString
if rs.EOF and rs.BOF then
'.......没有记录的操作
end if
%>
<%
rs.Close
set rs = nothing
conn.close
set conn=nothing
%>