给段asp的:
<%
Response.Expires=1
Set Conn=Server.CreateObject("ADODB.Connection")
conn.open "dsn=test;uid=sa;pwd=test"
sql = "Select * From client Where logname='" &id& "' And password = '" &password& "' "
Set rs = conn.Execute( sql ) '执行SQL语句
if rs.eof then
……
else
……
end if
%>