《员工信息管理系统》详细设计说明书.

一、引言

1.1编写目的

根据需求规格说明书、概要设计说明书，在仔细考虑讨论之后，我们对员工信息管理系统软件功能的划分、数据结构、软件总体结构的实现有了进一步的想法。本说明书的预期读者是与员工信息管理系统软件开发有联系的决策人，开发组成人员，扶助开发者，支持本项目的领导和公司人员，软件验证者。

1.2背景

利用先进的管理手段，提高人事信息的管理水平，是每一现代公司所面临的重要课题。为了解决这一重要课题，就必须有一套科学，高效，严密，实用的人事信息管理系统。现代公司的人事信息管理都是在计算机上实现的，采用现代计算机管理系统来进行管理，提供规范，统一的服务，它在管理系统中的应用不仅可以简化，规范各机构的日常操作，而且可以使企业人事信息管理更加方便，简单，快捷，清晰，从而减轻工作人员的劳动强度，减少企业的财政消耗。

1.3定义

SQL Server：所用的数据库管理系统 VS 2010:所用的开发软件

二、程序（一）设计说明

2.1程序描述

主模块

2.2功能

建立与数据库连接 获取系统设置

能够跳转至子模块：登陆、注册等模块。

2.3输入、输出项

用户鼠标点击登陆、注册按钮 跳转至相应模块界面

2.5流程逻辑

选择项登陆系统注册系统查询系统管理系统 2.6界面设计

2.7功能实现方法

'跳转登陆页面

Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles

lbtnLogin.Click

If Request.Cookies(\"UserName\") Is Nothing Then Response.Redirect(\"Login.aspx\") Else

Page.ClientScript.RegisterStartupScript(Page.GetType(), \"\", \"\") End If End Sub

'跳转注册页面

Protected Sub lbtnRegister_Click(ByVal sender As Object, ByVal e As EventArgs) Handles lbtnRegister.Click

Response.Redirect(\"Register.aspx\")

End Sub

三、程序（二）设计说明

3.1程序描述

登陆模块

3.2功能

实现管理员账号登陆，以便继续后面操作

3.3输人项

输入：管理员账号、密码。 输出：登陆成功界面

3.4流程逻辑

登陆输入帐号密码NO判断信息是否正确YES登陆成功

2.6界面设计

登陆界面

登陆成功界面

2.7功能实现方法

'登录

Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnLogin.Click

Dim Count As Integer'返回受影响的行数 Dim cookies As New HttpCookie(\"UserName\") managemodel.ManageId = txtName.Text.Trim()

managemodel.ManagePassword = txtPassWord.Text.Trim() Count = managebll.Login(managemodel)

'注销登录

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not IsPostBack Then

If Not Request.Cookies(\"UserName\") Is Nothing Then '如果Cookie中有值则把值赋给标签并显示一些登陆后才显示的控件

lblUser.Text = Request.Cookies(\"UserName\").Value lbtnSearch.Visible = True lblSucces.Visible = True lbtnOut.Visible = True lblWelcome.Visible = False End If End If End Sub

四、程序（三）设计说明

4.1程序描述

注册模块

4.2功能

提供管理员账号注册功能

4.3输入项

输入：新管理员账号、密码信息 输出：注册成功提示

4.4流程逻辑

注册填写新帐号密码并确认判断密码是否有误NONOYES判断帐号是否已被注册YES注册成功

2.6界面设计

2.7功能实现方法

'注册

Check = managebll.Check(managemodel) '执行判定

If Check = 0 Then '若表括中无同名用户则行添加用户 Count = managebll.Register(managemodel)

If Count > 0 Then '若受影响行数大于0说明添加成功

Page.ClientScript.RegisterStartupScript(Page.GetType(), \"\") Else '否则添加不成功

Page.ClientScript.RegisterStartupScript(Page.GetType(), \"\") End If

Else '有同名用户时弹出提示

Page.ClientScript.RegisterStartupScript(Page.GetType(), \"\", \"\") End If

\"\", \"\",

五、程序（四）设计说明

5.1程序描述

查询模块

5.2功能

提供员工信息查询

全部查询：显示所有员工信息

按员工ID查询：显示指定ID的员工信息 按性别查询：显示指定性别的员工信息

5.3输人、输出项

输入：选择查询条件,如员工ID或性别等。 输出：显示满足条件的员工。

5.4流程逻辑

查询全部查询按员工ID查询按性别查询输入员工ID选择性别显示输出结果

2.6界面设计

全部查询

按员工ID查询

按性别查询

2.7功能实现方法

Protected Sub btnOk_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnOk.Click If rblSelect.SelectedValue = \"0\" Then '全部查询 SelectAllInfo()

ElseIf rblSelect.SelectedValue = \"1\" Then '按员工ID查询 SelectIdInfo()

ElseIf rblSelect.SelectedValue = \"2\" Then '按性别查询 SelectSexInfo() End If End Sub

六、程序（五）设计说明

6.1程序描述

管理模块

6.2功能

实现员工信息的添加、删除、修改

6.3输入、输出项

输入：员工信息 输出：变更后的员工信息

6.4流程逻辑

管理添加查询输入新员工信息YES显示输出结果判断ID是否重复修改员工信息删除员工信息显示输出结果 2.6界面设计

添加员工信息

修改员工信息

2.7功能实现方法

'删除数据

Protected Sub GridView1_RowDeleting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GridView1.RowDeleting Dim

index

As

Integer

=

Convert.ToInt32(GridView1.DataKeys(e.RowIndex).Value.ToString) '获得主键 Dim Count As Integer '调用业务逻辑层

Count = staffbll.DeleteInfo(index) '刷新页面? Bind()

End Sub '更新

Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating Dim index As Integer =

Convert.ToInt32(GridView1.DataKeys(e.RowIndex).Value.ToString) '获取主键 staffmodel.StfId = index

staffmodel.StfName = (CType((GridView1.Rows(e.RowIndex).Cells(2).Controls(0)),

TextBox)).Text.Trim()

staffmodel.StfSex = (CType((GridView1.Rows(e.RowIndex).Cells(3).Controls(0)), TextBox)).Text.Trim()

staffmodel.StfAge = (CType((GridView1.Rows(e.RowIndex).Cells(4).Controls(0)), TextBox)).Text.Trim()

staffmodel.StfJob = (CType((GridView1.Rows(e.RowIndex).Cells(5).Controls(0)), TextBox)).Text.Trim()

staffmodel.StfTime = (CType((GridView1.Rows(e.RowIndex).Cells(6).Controls(0)), TextBox)).Text.Trim()

staffbll.UpdataInfo(staffmodel) GridView1.EditIndex = -1 Bind()

End Sub '执行添加

staffmodel.StfId = txtId.Text.Trim() staffmodel.StfName = txtName.Text.Trim() staffmodel.StfSex = txtSex.Text.Trim() staffmodel.StfAge = txtAge.Text.Trim() staffmodel.StfJob = txtJob.Text.Trim() staffmodel.StfTime = txtTime.Text.Trim() Check = staffbll.Check(staffmodel) '执行判定 If Check = 0 Then ' 如果表括中无值 则可进行添加 '调用业务逻辑层

staffbll.AddInfo(staffmodel) Bind()

Else '如果有值则不能添加

Page.ClientScript.RegisterStartupScript(Page.GetType(), \"\") End If

\"\",

七、参考资料

（1）张俊兰等。《软件工程》西安电子科技大学出版社，2003年8月。 （2）萨师煊等。《数据库系统概论（第三版）》高等教育出版社，2000年。 （3）郝兴伟。《Web开发技术》清华大学出版社，2004年。