set rs5=server.CreateObject ("ADODB.RecordSet")
sql5="select * from user where 姓名='" & name & "' and password='" & psw & "'"
rs5.Open sql5,conn,1,3
if not rs5.EOF then
name=rs5.Fields ("姓名")
psw=rs5.Fields ("password")
' session("tjrname")=rs.Fields ("姓名")
Response.Redirect "chaxun.asp"
else
Response.Write "请核对您的用户名和密码!"
Response.End
end if
%>