《员工信息管理系统详细设计说明书》
一、引言
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流程逻辑
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流程逻辑
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流程逻辑
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流程逻辑
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年。
《员工信息管理系统详细设计说明书》
一、引言
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流程逻辑
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流程逻辑
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流程逻辑
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流程逻辑
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年。