[求大家多帮忙]密码验证问题

莣囨孓love

我设计的登陆系统要求同一个帐号登陆时候,如果密码输错三次,该帐号则被提示为非法用户,锁定帐号,我不会实现,请大家帮帮忙!谢谢!登陆处理页面如下
dim strSQL,strPress,i
strPress = Request.Form("zh")
strPress1 = Request.Form("mm")
i=0
if strPress<>"" then


Set conn = Server.CreateObject("ADODB.Connection")
strconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("yonghu.mdb")
conn.open strconn

strSQL = "SELECT * FROM yonghu"
strSQL = strSQL & " WHERE id='"&Trim(strPress) & "'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL,conn

if rs.EOF then
response.write "<script>alert('没有此用户');window.navigate('main.htm');</script> "
else
if strPress1=rs("mima") then
response.write "<script>alert('登陆成功');window.navigate('main.htm');</script> "
else
response.write "<script>alert('密码错误');window.navigate('main.htm');</script> "
end if
rs.Close
conn.Close
end if
else
response.write "<script>alert('用户名不能为空');window.navigate('main.htm');</script> "

end if


上面的有缺陷，不能实现同一帐号密码出错三次即提示“你的密码出错三次”的功能，请大家帮忙修改，我新手，最好能给思路和代码，谢谢拉！

UID219577 帖子10 精华0 积分10 阅读权限10 性别男 在线时间0 小时 注册时间2007-11-21 最后登录2007-11-22 查看详细资料

编辑 引用 使用道具 报告 回复 TOP