想听听楼上这位兄弟的。

if Session("err")>=3 then
  errorr=1
  errmsg="你已经重试这么多次了，累了吧，请歇会再来，或者联系管理员!"
 else
 sql="select * from admin where adminname='"&adminname&"'"
 Rs.open sql,conn,3,1
 if Rs.eof and Rs.bof then
  errorr=1
  Session("err")=Session("err")+1
  errmsg="用户名不存在，请返回重新填写确认！"
  Rs.close
 else if adminpassword<>Rs("adminpassword") then
  errorr=1
  Session("err")=Session("err")+1
  errmsg="用户名和密码不符，请确认后再输一次！"
  Rs.close
 end if
 end if

代码基本上就是这样的了 但是没有给出一个小时后登陆的代码

如果用户把浏览器关了呢？

浏览器关了没事  只要机器不重新启动就可以吧？

Session只对浏览器进程吧
用COOKIE，COOKIE存储1个小时，一个小时后释放
原理同12楼

用cookie

IF Request.Cookies("web")("loginErrTimes")="" THEN
Response.Cookies("web")("loginErrTimes")="1"
Response.Cookies("web").Expires=now()+1 '+1表示当前时间后1天，如果是1个小时后就是＋1/24
END IF

IF cint(Request.Cookies("web")("loginErrTimes"))>=3 THEN
Error=Error+"<li>尝试登录出错已经达到3次，24小时内无法再登录了</li>"
ELSE
Error=Error+"<li>用户名或密码错误，请仔细核对！</li>"
Error=Error+"<li>您还有"&cstr(3-cint(Request.Cookies("web")("loginErrTimes")))&"次可以尝试的机会</li>"
Response.Cookies("web")("loginErrTimes")=cstr(cint(Request.Cookies("web")("loginErrTimes"))+1)
END IF

[此贴子已经被作者于2006-8-7 17:55:28编辑过]

回12楼：
用session的方法做一点意义都没有，session只能记录打开页面到关闭页面之内时间的信息
当我输入3次错误信息后 关闭页面 在重新打开页面 还是可以输入错误的信息
这根本就没有起到想要的效果

用cookie记录记录,当这个cookie的数值大于3时限制,1小时后cookie过期作废

cookie那么用啊？