登录注册模块代码.doc

《登录注册模块代码.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、conn.asp<%db="data/data.mdb" '数据库存放目录on error resume nextset conn=server.createobject("adodb.connection")conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath(db)if err thenerr.clearset conn = nothingresponse.write "数据库连接出错，请检查conn.asp中的连接字符串。"r

2、esponse.endend iffunction closedbconn.closeset conn=nothingend function%><% dim badwordbadword="'

3、and

4、select

5、update

6、chr

7、delete

8、%20from

9、;

10、insert

11、mid

12、master.

13、set

14、chr(37)

15、="if request.querystring<>"" thenchk=split(badword,"

16、")for each query_name in request.querystrin

17、gfor i=0 to ubound(chk)if instr(lcase(request.querystring(query_name)),chk(i))<>0 thenresponse.write "alert('传参错误！参数 "&query_name&" 的值中包含非法字符串！');location='"&request.servervariables("http_referer")&"'"response.endend ifnext

18、nextend if%>reg.asp<%if request("action")="reg" thenset rs=server.createobject("adodb.recordset")rs.open "select * from user where name='"&trim(request("name"))&"'",conn,1,1if rs.recordcount>0 thenresponse.write "

19、avascript'>window.alert('您输入的用户名已存在，请返回重新输入！');history.back(-1);"response.end()end ifsql="select * from user" set rs=server.createobject("adodb.recordset")rs.open sql,conn,1,3 rs.addnewrs("name")=trim(request.form("name"))rs("pwd")=trim(request.form("pwd"

20、)) rs("wenti")=trim(request.form("wenti")) rs("daan")=trim(request.form("daan")) rs.updaters.closeset rs=nothingresponse.write " alert('注册成功，点击确定立即登录！');location.replace('login.asp');"response.endend if%>

21、equiv="content-type" content="text/html; charset=gb2312"> 用户注册

22、" onsubmit="return chkform(this)">用户名