计算机毕业论文企业员工信息管理系统的设计与实现

YES 进入系统 数据核对 输入错误 YES 数据库中得到数据 判断完整 输入不完整 输入信息 NO 登陆界面 开始 NO 结束 图5-2 系统登陆流程

5.3 系统主页面

主要代码：

TheMessage=\请选择您想进入的功能模块\if isempty(Session(\

Response.Redirect \

end if

以上代码是实现对用户身份进行判断，如果用户通过了系统登陆页面的验证，那么服务器

分配给这个用户的会话对象（Session）的ID字段里，便不会为空。 <% If Time >= #12:00:00 AM# And Time < #12:00:00 PM# Then Response.Write \早上好!\

第 16 页 共 24页

Elseif Time >= #12:00:00 PM# And Time < #18:00:00 AM# Then Response.Write \下午好!\ Else

Response.Write \晚上好!\ End If

%><% response.write Session(\%>,欢迎您访问!今天是<% response.write Date %>

提供了显示时间，用户名的功能。

5.4 信息选择界面

图5-3 信息选择页面EmployeeInformation.asp

如图，用户可以通过选择不同的单选按钮，进行相应的用户信息查询或者管理功能。

此页面具体功能描述为：

按照不同的排序查询所有员工记录。 选择查询某一个部门的全部员工的记录。

选择查询某一个员工的记录。 选择查询各个部门主管记录。 选择修改用户自己的员工记录。 选择进入系统管理员选项。

首先是对连接到此页面的用户进行身份鉴别，如果已经登陆，则可以浏览此页面；否则重新导向系统登陆页面：

if isempty(Session(\

第 17 页 共 24页

Response.Redirect \End if

'如果用户希望查询某个部门员工信息

elseif Request.Form(\

Set RSEnquiryResult = conn.Execute(\ & Request.Form(\TheMessage = Request.Form(\全部员工信息如下\label=true

5.5 管理员主界面

用户登陆到这个页面的时候，一开始就会对用户进行身份鉴别。

需要注意的是我们可以通过对Requset对象的Form集合里的表单元素进行IsEmpty的判断

具体查看SendTo的值，如果SendTo的值为DepartmentEmployeeInformation说明用户要查询某个部门的相关员工信息，如果SendTo的值为AllEmployeeInformation就是查询全部员工信息

5.6 用户添加界面

图5-4 用户添加界面AddNewUsers.asp

首先对连接到此页面的用户进行身份鉴别，如果已经登陆并且具备系统管理

员的身份，则可以浏览此页面，否则重新导向系统登陆页面：

if isempty(Session(\Response.Redirect \end if

本页有两种情况，一种是用户第一次进入页面，此时不作任何操作；一种是用户单击了添加新用户信息(Add)按纽，此时ASP代码要对用户提交的新用户信

第 18 页 共 24页

息的表单进行校验。其中登陆名(LoginID)、用户姓名(Name)和用户密码(Password)不能为空。校验通过，则将新用户的信息插入数据库中。

if len(ThePassword)=0 or len(TheName)=0 or len(TheLoginID)=0 then TheMessage=\登录名，姓名，密码不能为空，无法添加新用户\else

conn.Execute \ & \Position, Birthday, HomePhone, QQ, HomeAddress,\ _ & \ _

& \ _ & \ _ & \ _ & \ _ & \ _ & \ _ & \ _ & \ _ & \ _

& \ _ & \ _ & \TheMessage=\新用户添加成功\ end if

5.7 用户修改个人信息

图5-5 用户修改个人信息ModifyPersonalInformation.asp

第 19 页 共 24页