实验十四 用户注册系统设计

《实验十四 用户注册系统设计》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、实验十四用户注册系统设计1、新建一个动态站点，并进行测试，测试的代码为：<%=now()%>2、在站点的根目录下建立如下图所示的结构目录（红色标注）。3、双击打开注册页面即register.html，并进行如下图所示的设计：该表单的属性名字输入如下：用户名的文本框：username密码的文本框：pwd重复密码的文本框：secpwd真实姓名的文本框：truename性别的单选框：sex（选定值分别设置为：男、女）Emai的文本框：emailQQ号码的文本框：qqnum自我介绍的文本框：userdesc4、打开代码视图，找到如图所示的地方，给action设置跳转页面。5、打开acces

2、s数据库建立一个webdb.mdb数据库,并建立一张和注册页面对应的数据表表名为Users，并把此数据库保存在站点的根目录下。结构如下图所示：6、双击打开dbconn.asp页面，删除原有代码，并编写如图所示的代码：红色标注的为数据库的路径，根据自己的网站进行修改。<%DimobjConn,connStrSetobjConn=Server.CreateObject("ADODB.Connection")connStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&_Server.MapPath("/webdb.mdb")objConn

3、.OpenconnStr%>7、双击打开endconn.asp页面，删除原有代码，并编写如图所示的代码：<%objRS.CloseobjConn.CloseSetobjRS=NothingSetobjConn=Nothing%>7、双击打开register.asp页面，在标签之间插入如下代码：<%DimUserName,Pwd,TrueName,SexDimEmail,QQNumber,UserDescriptionDimobjRS,sqlStr,ErrMsgUserName=Tri

4、m(Request("username"))Pwd=Trim(Request("pwd"))TrueName=Trim(Request("truename"))Sex=Trim(Request("sex"))Email=Trim(Request("email"))QQNumber=Trim(Request("qqnum"))UserDescription=Trim(Request("userdesc"))SetobjRS=Server.CreateObject("ADODB.RecordSet")sqlStr="SELECT*FROMusersWHEREusernameLIKE'"

5、&UserName&"'"objRS.OpensqlStr,objConn,1,3IfNotobjRS.EOFThenErrMsg="该用户名已被别人注册了，请换个用户名！"ElseobjRS.AddNewobjRS("username")=UserNameobjRS("pwd")=PwdobjRS("truename")=TrueNameobjRS("sex")=SexIfEmail<>""ThenobjRS("email")=EmailIfQQNumber<>""ThenobjRS("qqnumber")=QQNumberIfUserDescription<>""Thenobj

6、RS("userdesc")=UserDescriptionobjRS("regtime")=Now()objRS.UpdateEndIf%><%IfIsEmpty(ErrMsg)ThenResponse.Write("恭喜您注册成功！
")ElseResponse.Write(ErrMsg&"
")EndIf%>返回登陆注：红色为表单的名称，

7、蓝色标注的为数据库的字段预览结果：8、双击打开登陆页面即：login.html，并进行页面设计如下图所示：并设置表单的属性：用户名的文本框:username密码的文本框：pwd设计完成后打开代码视图，修改action的值。10、双击打开login.asp页面，在标签之间插入如下代码：<%dimusername,pwd,logintimes,errmsgdimobjrs,