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

精品文档员工信息管理系统详细设计说明书一、引言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(), , alert(您已成功登陆);) 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(), , alert(注册成功);) Else 否则添加不成功 Page.ClientScript.RegisterStartupScript(Page.GetType(), , alert(注册失败);) End If Else 有同名用户时弹出提示 Page.ClientScript.RegisterStartupScript(Page.GetType(), , alert(该用户名已被注册);) 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.ClientScri