数据库表：
paper51.com
paper51.com
表item_name: copyright paper51.com
表member:
http://www.paper51.com
http://www.paper51.com
表message:
内容来自论文无忧网 www.paper51.com
内容来自论文无忧网 www.paper51.com
表product:
内容来自www.paper51.com
http://www.paper51.com
表product_type: http://www.paper51.com
paper51.com
第四章 系统详细设计
内容来自论文无忧网 www.paper51.com
4.1 系统登录界面模块设计
http://www.paper51.com
http://www.paper51.com
<!--#include file="conn/conn.asp"-->
paper51.com
<% dim account,pwd
copyright paper51.com
session("admin")=false paper51.com
session("account")="" http://www.paper51.com
account=replace(trim(request.form("account")),space(1),"") copyright paper51.com
pwd=trim(request.form("pwd"))
http://www.paper51.com
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
copyright paper51.com
if isempty(userip)then userip=Request.ServerVariables("remote_addr")
copyright paper51.com
setrs=server.createobject("adodb.recordset")
内容来自www.paper51.com
sql="select * from member where active=1 andaccount='"&account&"'"
copyright paper51.com
rs.open sql,conn,1,3
paper51.com
if rs.eof or rs.bofthen paper51.com
rs.close
copyright paper51.com
set rs=nothing paper51.com
conn.close
内容来自www.paper51.com
set conn=nothing http://www.paper51.com
response.write "<scriptLanguage='JavaScript'>"
内容来自www.paper51.com
response.write "{alert('帐号不存在或被锁定！');"
内容来自www.paper51.com
response.write "history.back(1);" 内容来自论文无忧网 www.paper51.com
response.write "}"
内容来自www.paper51.com
response.write "</script>"
内容来自论文无忧网 www.paper51.com
response.end 内容来自www.paper51.com
'response.redirect "default.asp?errid=1" 内容来自论文无忧网 www.paper51.com
end if
paper51.com
'10次失败，锁定一天
paper51.com
'ifrs("logfail")>=10 andDateDiff("d",rs("lastlogin"),now)<1 then 内容来自www.paper51.com
'rs.close 内容来自论文无忧网 www.paper51.com
'set rs=nothing 内容来自www.paper51.com
'conn.close
http://www.paper51.com
'set conn=nothing copyright paper51.com
'response.write "<scriptLanguage='JavaScript'>" http://www.paper51.com
'response.write "{alert('多次登录错误，请24小时后重试!');" http://www.paper51.com
'response.write "history.back(1);"
内容来自论文无忧网 www.paper51.com
'response.write "}"
copyright paper51.com
'response.write "</script>"
http://www.paper51.com
'response.end 内容来自www.paper51.com
'response.redirect "default.asp?errid=3" paper51.com
'end if copyright paper51.com
'3次登录失败,锁定一分钟 http://www.paper51.com
ifrs("logfail")>=3 andDateDiff("n",rs("lastlogin"),now)<1 then
http://www.paper51.com
rs("logfail")=rs("logfail")+1
copyright paper51.com
rs("lastlogin")=now() 内容来自www.paper51.com
rs("lastip")=userip http://www.paper51.com
rs.update
内容来自论文无忧网 www.paper51.com
rs.close http://www.paper51.com
set rs=nothing http://www.paper51.com
conn.close
paper51.com
set conn=nothing paper51.com
response.write "<scriptLanguage='JavaScript'>" 内容来自论文无忧网 www.paper51.com
response.write "{alert('多次登录错误，请稍后再重试!');"
paper51.com
response.write "history.back(1);"
copyright paper51.com
response.write "}"
内容来自论文无忧网 www.paper51.com
response.write "</script>"
paper51.com
response.end
内容来自www.paper51.com
'response.redirect "default.asp?errid=2" 内容来自论文无忧网 www.paper51.com
end if
内容来自论文无忧网 www.paper51.com
iftrim(rs("account"))<>account then
paper51.com
rs.close
copyright paper51.com
set rs=nothing
paper51.com
conn.close
内容来自论文无忧网 www.paper51.com
set conn=nothing
paper51.com
response.write "<scriptLanguage='JavaScript'>" 内容来自www.paper51.com
response.write "{alert('错误的帐号或密码!');" copyright paper51.com
response.write "history.back(1);"
paper51.com
response.write "}" 内容来自论文无忧网 www.paper51.com
response.write "</script>" paper51.com
response.end copyright paper51.com
