基于ASP人才招聘网站的建设

4.6 个人用户界面设计

① 个人用户注册界面

    用户在网站导航处点击“新会员注册”将打开member.asp页面，这个

页面显示用户的注册表单，如下图：

 

当提交表单并检测输入数据合法后，会将表单提交到这个页面本身，页面首

先判断是否已经提交，如果已经提交则进入用户信息注册处理，这个注册过程比较复杂，但是主要的过程就是将usertype的值分为几个支线流程，这几个支线流程是类似的。由于此代码繁多，不做以展示。

这块程序首先根据所取得的表单中的用户名查询数据库中是否有相同用

户名的记录，如果有则给出提示，并终止运行，否则进入下一步，打开记录集并添加一条新的记录，然后系统默认要给用户发送一条站内短消息提示注册成功，因此还要打开记录集，在短信数据库pmailbox中新增一条短信数据。最后弹出提示告诉用户注册成功，然后转到用户首页。

其他usertype的处理过程与此类似，只不过不同的处理用户信息存放在不同表中。最后的过程都是一样的，此处为了解释清晰，代码编写的较为繁琐。

②    个人用户登陆

    用户进入网站后，可以在页面上边的导航栏处填写用户名和密码，并选

择帐户类型进行登陆。

如果登陆成功，则显示用户管理的快界链接，否则显示登陆表单，在这个表单中填写用户名和密码，并提交到login.asp页面，用户可以登陆，下面展示login.asp页面代码：

Login.asp页面代码   

<% Response.Buffer=True %>

<!--#include file="dbconn.inc"-->

<!--#include file="inc/enpasswd.inc"-->

<% uname=request("uname")

   pwd=mistake(request("pwd"))

   usertype=request("usertype")

   if usertype="person" then

   set rs=server.createobject("adodb.recordset")

   sql="select * from person where uname=''"&uname&"'' and pwd=''"&pwd&"''"

   rs.open sql,conn,3,3

   if rs.bof or rs.eof then

   response.write"<SCRIPT language=VBScript>alert(''错误的用户名、密码或您不是此类型用户，请重新输入！'');"

   response.write"javascript:history.go(-1)</SCRIPT>"

   else

   session("puid")=uname

   response.Redirect "person/main.asp"

   end if

   else

   if usertype="class" then

   set rs=server.createobject("adodb.recordset")

   sql="select * from class where uname=''"&uname&"'' and pwd=''"&pwd&"''"

   rs.open sql,conn,3,3

   if rs.bof or rs.eof then

   response.write"<SCRIPT language=VBScript>alert(''错误的用户名、密码或您不是此类型用户，请重新输入！'');"

   response.write"VBscript:history.go(-1)</SCRIPT>"

   else

   session("puid")=uname

   response.Redirect "class/main.asp"

   end if

   else

   if usertype="peixun" then

   set rs=server.createobject("adodb.recordset")

   sql="select * from peixun where uname=''"&uname&"'' and pwd=''"&pwd&"''"

   rs.open sql,conn,3,3

   if rs.eof then

   response.write"<SCRIPT language=VBScript>alert(''错误的用户名、密码或您不是此类型用户，请重新输入！'');"

   response.write"VBscript:history.go(-1)</SCRIPT>"

   else

   session("cuid")=uname

   response.Redirect "peixun/main.asp"

   end if

   else

   set rs=server.createobject("adodb.recordset")

   sql="select * from company where uname=''"&uname&"'' and pwd=''"&pwd&"''"

   rs.open sql,conn,3,3

   if rs.eof then

   response.write"<SCRIPT language=VBScript>alert(''错误的用户名、密码或您不是此类型用户，请重新输入！'');"

   response.write"VBscript:history.go(-1)</SCRIPT>"

   else

   session("cuid")=uname

   response.Redirect "company/main.asp"

   end if

   end if

   end if

   end if %>

程序首先通过request对象获得表单传送来的数值，然后使用几个流程判断语句if…else…endif来对不同情况的变量usertype值的登陆进行选择。这里以usertype的值为“person”的情况为示例解释，首先程序创建一个记录集，并根据所得参数查询person表中符合条件的数据，如果记录集为空，则说明没有符合条件的数据，从而进一步说明用户所填写的信息不正确，无法正确登陆，此时给出提示，并终止页面运行，否则设定session的值并跳转到个人用户管理页面

本文选自计算机毕业设计http://myeducs.cn
论文文章部分只是部分简介，如需了解更多详情请咨询本站客服！QQ3710167