1、员工信息管理系统详细设计说明书员工信息管理系统详细设计说明书一、引言编写目的根据需求规格说明书、概要设计说明书,在仔细考虑讨论之后,我们对员工信息管理系统软件功能的划分、数据结构、软件总体结构的实现有了进一步的想法。本说明书的预期读者是与员工信息管理系统软件开发有联系的决策人,开发组成人员,扶助开发者,支持本项目的领导和公司人员,软件验证者。背景利用先进的管理手段,提高人事信息的管理水平,是每一现代公司所面临的重要课题。为了解决这一重要课题,就必须有一套科学,高效,严密,实用的人事信息管理系统。现代公司的人事信息管理都是在计算机上实现的,采用现代计算机管理系统来进行管理,提供规范,统一的服务,
2、它在管理系统中的应用不仅可以简化,规范各机构的日常操作,而且可以使企业人事信息管理更加方便,简单,快捷,清晰,从而减轻工作人员的劳动强度,减少企业的财政消耗。定义SQL Server:所用的数据库管理系统VS 2010:所用的开发软件二、程序(一)设计说明程序描述主模块功能建立与数据库连接获取系统设置能够跳转至子模块:登陆、注册等模块。输入、输出项用户鼠标点击登陆、注册按钮跳转至相应模块界面流程逻辑界面设计功能实现方法跳转登陆页面 Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As EventArgs) Hand
3、les If (UserName) Is Nothing Then () Else , alert(您已成功登陆);) End If End Sub 跳转注册页面 Protected Sub lbtnRegister_Click(ByVal sender As Object, ByVal e As EventArgs) Handles ()End Sub三、程序(二)设计说明程序描述登陆模块功能实现管理员账号登陆,以便继续后面操作输人项输入:管理员账号、密码。输出:登陆成功界面流程逻辑界面设计登陆界面登陆成功界面功能实现方法登录 Protected Sub btnLogin_Click(ByV
4、al sender As Object, ByVal e As EventArgs) Handles Dim Count As Integer返回受影响的行数 Dim cookies As New HttpCookie(UserName) = = Count = (managemodel)注销登录Protected Sub Page_Load(ByVal sender As Object, ByVal e As Handles If Not IsPostBack Then If Not (UserName) Is Nothing Then 如果Cookie中有值则把值赋给标签并显示一些登陆后才
5、显示的控件 = (UserName).Value = True = True = True = False End If End If End Sub四、程序(三)设计说明程序描述注册模块功能提供管理员账号注册功能输入项输入:新管理员账号、密码信息输出:注册成功提示流程逻辑界面设计功能实现方法 注册Check = (managemodel) 执行判定 If Check = 0 Then 若表括中无同名用户则行添加用户 Count = (managemodel) If Count 0 Then 若受影响行数大于0说明添加成功 , alert(注册成功);) Else 否则添加不成功 , aler
6、t(注册失败);) End If Else 有同名用户时弹出提示 , alert(该用户名已被注册);) End If五、程序(四)设计说明程序描述查询模块功能提供员工信息查询全部查询:显示所有员工信息按员工ID查询:显示指定ID的员工信息按性别查询:显示指定性别的员工信息输人、输出项输入:选择查询条件,如员工ID或性别等。输出:显示满足条件的员工。流程逻辑界面设计全部查询按员工ID查询按性别查询功能实现方法Protected Sub btnOk_Click(ByVal sender As Object, ByVal e As EventArgs) Handles If = 0 Then 全部
7、查询 SelectAllInfo() ElseIf = 1 Then 按员工ID查询 SelectIdInfo() ElseIf = 2 Then 按性别查询 SelectSexInfo() End If End Sub六、程序(五)设计说明程序描述管理模块功能实现员工信息的添加、删除、修改输入、输出项输入:员工信息输出:变更后的员工信息流程逻辑界面设计添加员工信息修改员工信息功能实现方法删除数据 Protected Sub GridView1_RowDeleting(ByVal sender As Object, ByVal e As Handles Dim index As Integer
8、 = . 获得主键 Dim Count As Integer 调用业务逻辑层 Count = (index) 刷新页面 Bind()End Sub 更新 Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As Handles Dim index As Integer = . 获取主键 = index = (CType(.Cells(2).Controls(0), TextBox).() = (CType(.Cells(3).Controls(0), TextBox).() = (CType(.Cells(4)
9、.Controls(0), TextBox).() = (CType(.Cells(5).Controls(0), TextBox).() = (CType(.Cells(6).Controls(0), TextBox).() (staffmodel) = -1 Bind()End Sub执行添加 = = = = = = Check = (staffmodel) 执行判定 If Check = 0 Then 如果表括中无值 则可进行添加 调用业务逻辑层 (staffmodel) Bind() Else 如果有值则不能添加 , alert(ID已存在,请重新输入);) End If七、参考资料(1)张俊兰等。软件工程西安电子科技大学出版社,2003年8月。(2)萨师煊等。数据库系统概论(第三版)高等教育出版社,2000年。(3)郝兴伟。Web开发技术清华大学出版社,2004年。
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1