登录注册模块代码doc

1、conn .asp%dim badwordbadword=|a nd|select|update|chr|delete|%20from|;|i nsert|mid|master.|set|chr(37)|=ifrequest.querystri ngthe nchk=split(badword,T)foreach query_ name inrequest.querystri ngfori=0 toubo un d(chk)ifin str(lcase(request.querystri ng(query_ name),chk(i)0the nresp on se.writealert(传参错

2、误！参数&query_ name&的值中包含非法字符串！nn );locati on=&request.servervariables(http_referer) &resp on se.e ndend ifn extn extend if%reg.asp0the nresp on se.writew in dow.alert(存在，请返回重新输入！);history.back(-1);resp on se.e nd()end ifsql=select * from userset rs=server.createobject(adodb.recordset)rs.ope nsql,c onn

3、 ,1,3rs.add newrs( name)=trim(request.form( name) rs(pwd)=trim(request.form(pwd) rs(we nti)=trim(request.form(we nti) rs(daa n)=trim(request.form(daa n) rs.update rs.close set rs=nothingrespon se.writealert(注册成功，点击确定立即登录！ );location.replace(login.asp); resp on se.e nd end if%无标题文档!- # include用户注册tab

4、le width=347file=top.asp-border=1alig n=cen tercellpaddi ng=10 cellspaci ng=method=postacti on=?act ion=regon submit=retur nchkborder=1cellpaddi ng=5cellspaci ng=0 用户名 密码 密码提示问题 in putn ame=we ntitype=textid=we nti密码提示答案 in putn ame=daa ntype=textid=daa n in putin puttype=submittype=reset n ame=subm

5、itname=submit value=注册 value=重置 top.aspmetaalig n=cen tercellpaddi ng=10cellspaci ng=0首页a href=/webjx/;pwd.asp注册 忘记密码？ %登陆else%欢迎您 %=session(”name)%,%注销登陆end if%加密页login, aspconten t=text/html;charset=gb2312meta http-equiv=c onten t-type 无标题文档cellpaddi ng=10cellspaci ng=!- # i ncludeborder=1alig n=c

6、en ter0用户登陆formthe n=returnborder=1cellspaci ng=0method=postacti on=log in ok.asp?act ion=logi ncellpaddi ng=5on submit 用户名 in putn ame= nametype=textid=n ame 密码 in putn ame=pwdtype=passwordid=pwdx/td in putin put type=resettype=submit n ame=submitname=submit value=登陆 value=重置table border=1 cellspac

7、i ng=0cellpaddi ng=5，您已经成功登陆login ok.asplogino ut.asp%退出登陆成sessi on (” name)=resp on se.writealert(功!);locati on. href( in dex.asp);resp on se.e nd% pwd.aspcellpaddi ng=10cellspaci ng=!- # i ncludeborder=1alig n=cen ter0找回密码form n ame=form1table width=398method=postacti on=pwd2.asp?act ion=pwdborder

8、=1cellpaddi ng=5cellspaci ng=Otdtd 请输入用户名 width=168 name=submitvalue=查询 pwd2.asp conten t=text/html;charset=gb2312meta http-equiv=con te nt-type 无标题文档找回密码vformn ame=form1method=post acti on=pwd3.asp&n bsp;inputname=name type=hiddenid=namevalue= 密码提示问题 &n bsp;密码提示答案 你输入的用户名不存在，请返回 重新输入，或者 注册 pwd3.asp

9、找回密码table width=398border=1tdwidth=130x%=rs( name)%cellpaddi ng=5，您的密码cellspaci ng=0td你输入的密码提示答案不正确，请返回/a重新输入/td error.asp 无标题文档 登陆失败，请检查用户名和密码是否正确返回edit.asp%ifrequest(act ion )=editthe nn ame=sessi on (” name)set rs=server.createobject(adodb.recordset)sql=select * from user wherename=&name&rs.ope nsql,c onn ,3,2rs(pwd)=trim(request.form(pwd)rs(daa n)=trim(request.form(daa n)rs.updaters.closeset rs=nothingrespon se.write alert( 编辑成功！);locati on .href(edit.