if rs.eof and rs.bof then
response.Write("")
end if
if not rs.eof then
if rs("u_password")<>pwd then
response.Write("")
else
response.Write("登陆成功!
")
session("username")=username
session("acc")=true
response.Write(session("username") & ",欢迎您再次光临本站! ")
response.Write("退出登陆")
response.Write("
<%
dim username,pwd,sqlStr
username=request.Form("username")
pwd=request.Form("pwd")
SqlStr="select * from user_add where u_user='"&username&"'"
set rs=server.CreateObject("ADODB.Recordset")
rs.open sqlStr,conn,1,1
if rs.eof then
response.Write("登陆成功!
")
session("username")=username
session("acc")=true
response.Write(session("username") & ",欢迎您再次光临本站! ")
response.Write("退出登陆")
response.Write("
哎,就差那么一点点,查询数据加上这个条件:and后面的
SqlStr="select * from user_add where u_user='"&username&"'" and u_password="'&pwd&'"
否则没这个条件,新密码永远不等于数据库里的密码,当然报错