有点奇怪,一个判断的问题!
dim userAccount,userPass,rs
'if (Request.Form("UserAccount").Count>0) then
userAccount = trim(Request.Form("UserAccount")+"")
userPass = trim(Request.Form("UserPass")+"")
set rs = Server.CreateObject("ADODB.Recordset")
sql ="select a.keyid,a.account,a.password,a.user_id,b.user_name,a.nickname from xt_t_account a,xt_t_user b where a.account='"&userAccount&"' and a.user_id=b.keyid"
rs.Open sql,conn,1,3
checked = false
if (not rs.Eof) then
if userPass = rs("password") then
checked = true
Session("user_id")=rs("user_id")
Session("accountid")=rs("keyid")
Session("username")=rs("user_name")
Session("nickname")=rs("nickname")
end if
end if
if (checked) then
Response.Redirect("home.asp")
else
Response.Write("<script language='javascript'>alert('用户名或密码错误!')</script>")
end if
Response.Write(checked)
rs.Close()
conn.Close()
'end if
大家能帮忙看看这个验证用户名和密码的程序么?自己有一点感到疑惑。
就是,checked应该是false的,但是每次打开页面的时候都会弹出"用户名或密码错误".但是我要是添加了Request.Form("UserAccount").Count>0这个判断,就不会有了!!但是我想如果不添加这个判断,也应该不会弹出的呀。我输出了checked的值是false。
感觉有点奇怪!!