实训24 用户注册登录和密码验证系统实训

http://jpkc.zjiet.edu.cn/sheng/2006/dzswwzjs/textshow.asp?forumID=42 实训24 用户注册登录和密码验证系统实训 -------------------------------------------------------------------------------- 【实训前的准备】 1． 检查操作系统是否Windows 98/2000或Windows XP。 2． 检查在Windows 98系统上是否安装PWS，在Windows 2000系统上是否安装IIS5.0 3．打开浏览器在地址栏里面输入127.0.0.1测试服务器主页面是否正常运行。 4．检查系统是否有：Access 2000、Dreamweaver、FrontPage、记事本等软件。 【实训目的要求】 1．了解ASP的编程和运行环境。 2．熟悉ASP的语法结构和页面设计的整体布局。 3．掌握后台连接数据库的方法。 4．学会连接系统各个模块的技巧。 【系统功能与要求】 大多数电子商务网站在基本技术上都类似，为了说明一个完整的网站应该具备的基本功能，我们将以电子商务购物网站为例，帮助大家分模块完成一个完整的系统，使大家能够触类旁通，熟练巧妙的运用于其他网站设计中。本实训主要介绍用户注册、登录、身份验证以及资料修改等功能实现。 1．本实训所要实现的功能 （1）系统用户注册； （2）系统用户进入系统时验证用户身份； （3）未经注册的用户进入系统时显示登录失败提示； （4）系统用户在不同页面显示用户信息； （5）系统用户可以随时更改用户资料。 本系统的模块如图5.2所示。 图5.2 系统模块图 2．数据库的逻辑设计 本实训用的是Access数据库，也可以根据需要转换成SQL Server数据库。我们会在后面补充说明，这里不再叙述。要求在目录D:\Inetpub\wwwroot\database下建一个名称为DB.mdb的数据库。根据系统要求，相关的数据表结构如下所示。 （1）管理员注册表如表5.1所示（管理员在界面上不能注册，只能在数据库中添加） 表5.1 管理员注册表 （2）用户注册表如表5.4所示（该表在后面实训中生成用户定单时会再次用到）。 表5.4 用户注册表 【实训内容及操作步骤】 【操作一】设计网站登录的主页面 1．打开Dreamweaver Mx或Frontpage 2000网页编辑工具。 2．用表格和框架进行页面布局，在适当位置上增添一个表单，如图5.5所示。 图5.5 表单设计界面 该表单所包含的元素如表5.3所示。 表5.1 表单元素一览表 元素类型 属性值 说明 文本域 名字：user_name 类型：单行 接受已经注册的用户名 文本域 名字：user_pass 类型：密码 接受已经注册的密码 按扭 标签：用户注册 动作：进入注册页面 进入新用户注册页面 按扭 标签：登录 动作：提交表单 提交登录信息信息按扭 3．将下列表单信息原代码加入到index.asp的文件中，该文件存放在D:\Inetpub\wwwroot\根目录下。 < width="86%" align="center" height="20" bgcolor="#0099FF"><b><font color="#FFFFFF">用户登陆</font></b> <form method="POST" action="login.asp"> <table width="95%" border="0" align="center" cellpadding="0" cellspacing="5"> <tr> <td width="32%"> <div align="center">客户：</div></td> <td width="68%"> <div align="center"> <input name="user_name" type="text" class=input id="user_name" style="FONT-SIZE: 12px; WIDTH: 110px" size="10" maxlength="18"></div></td> </tr> <tr> <td> <div align="center">密码：</div></td> <td> <div align="center"> <input style="FONT-SIZE: 12px; WIDTH: 110px" type="password" name="user_pass" size="10" class=input maxlength="18"></div></td> </tr> </table> <div align="center"></div> <table width="90%" border="0" cellspacing="5" cellpadding="0" align="center"> <tr> <td width="80"><a href="reg.asp" target="_blank"><img src="img/pics/reg.gif" width="81" height="25" border="0"></a></td> <td> <div align="center"> <input align=absMiddle alt=进入 cache name=submit src="img/pics/login.gif" type=image tppabs="" width="56" height="25"></div></td> </tr> </table> </form> 4．设计验证用户登录信息页面。 5．创建用户登录成功后将进入的页面。登录成功后系统将把用户基本资料显示在左上角的用户信息栏内，如图5.4所示。 图 5.4 登录成功界面 注意：验证用户身份的代码放在Login.asp文件中,验证通过时，将页面重定向到index.asp。在验证用户身份时我们的基本思路是将前面用户登录表单中的信息提取出来，与数据库存在的数据进行对照，如果以前用户注册过，那么他的个人信息会保留在数据库中的member表里面。 【操作二】创建用户登录失败后出现的信息提示页面 1．如果在表单中输入的内容在数据库中找不到匹配的数据，或者根据客户端验证输入的信息不完整，就会出现错误提示信息，如图5.5所示。要求用户返回主页面注册或者重新输入。 图5.5 登录失败的提示信息 2．在记事本中编写Login.asp文件实现上述功能，并且保存在D:\Inetpub\wwwroot\根目录下。 <% if session("user_name")="" then user_name=trim(request("user_name")) user_pass=trim(request("user_pass")) if user_name="" or user_pass="" then errmsg=errmsg+"<br>"+"<li>用户名和用户密码不能为空!" founderr=true end if sql="select * from member where user_name='"&user_name&"'" rs.open sql,conn,3,3 if rs.eof then errmsg=errmsg+"<br>"+"<li>你输入的用户不存在!" founderr=true elseif user_pass=rs("user_pass") then session("user_name")=rs("user_name") session("user_type")=rs("user_type") rs("user_lasttime")=now() rs("user_lastip")=request.servervariables("remote_addr") rs.update else errmsg=errmsg+"<br>"+"<li>你输入的密码错误!" founderr=true end if rs.close if founderr=true then %> <%else%> <% response.redirect "index.asp"%> <%end if else response.redirect "index.asp" end if%> <p><font color="#FFFFFF"><strong>错误！！！</strong></font></p> <p><a href="javascript:history.go(-1)">该用户还没注册请重新登陆</a></p> 【操作三】设计新用户注册页面 一般网站都要用户先注册成为会员，才能访问网站的具体信息。这样做的目的是便于进行用户管理，保证网站的安全性。同时了解访问网站用户的基本情况，可以有针对性的提供个性化服务，有利于客户关系管理。 1．打开Dreamweaver Mx或Frontpage 2000网页编辑工具； 2．设计一个表单页面，该表单包含的元素如表5.4所示。 表5.4 表单元素一览表 元素类型 属性值 说明 文本域 名称：user_name 类型：单行 输入注册的用户名 文本域 名称：user_pass 类型：单行 输入注册的用户密码 文本域 名称：user_pass2 属性：单行 再一次输入用户密码 文本域 名称：user_mail 属性：单行 输入用户的邮箱 文本域 名称：user_adds 属性：多行 输入用户的地址 文本域 名称：user_tel 属性：单行 输入用户电话号码 文本域 名称：user_postcode 属性：单行 输入用户的邮编 文本域 名称：user_namec 属性：单行 输入用户的真实姓名 按扭 名称：B13 动作：提交表单 提交注册信息 按扭 名称：B22 动作：重置表单 将表单清空到未填写时的状态 3．注册页面如图5.8所示。 图 5.6 生成的表单界面 3．在记事本中编写regsave.asp文件实现上述功能。要注意的是，用户注册时对表单输入的信息进行客户端验证，用户名不能为空，密码或确认不能为空，两次密码必须相同，地址不能为空，电话号码不能为空，你的E-mail书写格式必须有效，邮编不能为空，用户名不能与别人已经注册的相同。 <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta http-equiv="refresh" content="3;url=index.asp"> <% function IsValidEmail(user_mail) dim names, name, i, c IsValidEmail = true names = Split(user_mail, "@") if UBound(names) <> 1 then IsValidEmail = false exit function end if for each name in names if Len(name) <= 0 then IsValidEmail = false exit function end if for i = 1 to Len(name) c = Lcase(Mid(name, i, 1)) if InStr("abcdefghijklmnopqrstuvwxyz_-.", c) <= 0 and not IsNumeric(c) then IsValidEmail = false exit function end if next if Left(name, 1) = "." or Right(name, 1) = "." then IsValidEmail = false exit function end if next if InStr(names(1), ".") <= 0 then IsValidEmail = false exit function end if i = Len(names(1)) - InStrRev(names(1), ".") if i <> 2 and i <> 3 then IsValidEmail = false exit function end if if InStr(email, "..") > 0 then IsValidEmail = false end if end function dim user_name,user_pass,user_pass2,user_mail,user_adds,user_tel,uesr_postcode if trim(request("user_name"))="" then errmsg=errmsg+"<br>"+"<li>用户名不能为空" founderr=true else user_name=trim(request("user_name")) end if if trim(request("user_pass"))="" or trim(request("user_pass2"))="" then errmsg=errmsg+"<br>"+"<li>密码或确认不能为空" founderr=true else user_pass=trim(request("user_pass")) user_pass2=trim(request("user_pass2")) end if if user_pass <> user_pass2 then