人事系统分析报告

1、数据库原理与应用课程设计分析与设计报告题目 人事管理系统专业班级网络0801班学号200807060115 200807060112姓名指导老师完成时间2011-01-141设计任务与要求 12设计工具及其说明 13需求分析13.1功能需求 13.2性能需求 24系统总体设计 25数据库设计 75.1概念结构设计 75.2物理结构设计 96运行结果和测试 117参考资料 131 设计任务与要求编写目的：在积极建立企业现代企业管理机制的今天，仅仅靠原始的手工管理或简单的单机管理， 人力资源部门面对大量的信息， 无法有效率地将其中的重要部分提取出来， 并做出相应的判 断和处理。 公司管理者的决策只

2、能依据报表数据， 在浪费大量人力、 物力的同时无法做到实 时监控， 难以保证数据的准确性和及时性。 因此， 先进的管理思想在企业中实现就成为了一 个可望而不可及的目标。 公司集团非常急需一套既有先进管理思想又适合国内大企业的人力 资源管理信息系统， 作为实现目标和提高现有水平的一种重要手段！ 人事管理是企业信息管 理的重要部分 ,面对员工基本信息，婚姻状况，学历信息，部门信息，工作岗位，工资信息 等等，采用人力处理将浪费大量的时间、人力和物力，且数据的准确性低。因此，开发一个 界面友好， 易于操作的人事工资管理软件进行自动化处理变得十分重要， 这正是本系统开发 的目的。编写任务：运用 Micr

3、osoft Visual Basic 软件和 Microsoft Office Access 共同创建数据库及其管理系 统，编写人事管理系统编写意义作为一名在校大学生，此次课程设计一方面是对我们自身在校期间学习成果的一次检 验，另一方面， 通过这次课程设计， 使我们更加深入的了解怎样运用我们所学的知识去做一 个合格的、符合以后工作要求的数据库。我们此次选择的设计题目是人事管理系统的设计，设计的意义在于通过人事管理系统， 能让用户跟方便的对企业、公司、或者一些其他机构的人事信息进行高效、方便的管理。2 设计工具及其说明本系统采用客户 /服务器两层结构模型， 前台用户界面采用 Visual Bas

4、ic 语言编写， 后台 采用 Access 数据库，前台应用程序与后台数据库连接采用的是 ADO 技术。运用 Access 数据库创建数据库，数据库中设计主键有利于数据表项的链接，用 VB6.0 来制作界面和编写程序ADO技术可以将编写程序中的数据库连接简化，用最少的编程尽快地创建和使用数据存取应用程序。3 需求分析不同的用户对自己所需要的人事管理系统要求不同， 大型企业由于公司人员较多， 在人 事管理方面的需求上包括很多方面，而小型企业人员较少，相应的管理需求也就相应减少。 在此，我们仅以一家小型软件开发公司为例来分析他们对所需数据库的要求。3.1 功能需求一家小型的软件企业对人事管理系统的

5、要求包括：（1）仅有人事管理部门人员和公司经理、总裁才可以进入该系统。 （2）该人事管理系统的基本功能因包括对公司员工档案的管理， 对员工调动的管理，对员工考勤的管理，对员工工资的管理，以及对员工工作评价的管理。根据以上要求，我们对该系统的功能划分可参考图1企业人事管理系统功能划分图企业人事管理系统图1企业人事管理系统功能划分图各个功能部分具体功能如下列出：1、系统设置管理功能是人事部人员对系统进行权限设置的单元2、员工档案管理的功能是对员工档案进行增删改查等功能的单元3、员工评价管理是对各个员工在工作期间，由同事、上司等人员对其进行的评价进行 管理，有利于公司对各个员工在各个方面的综合评价4

6、、员工考勤信息管理的功能是对员工上班期间有无迟到、早退以及请假信息的管理， 有利对员工工资等发放过程中工资的计算5、员工调动管理是对员工工作期间工作职位调动，职务变动的管理6、员工工资管理是对员工当月基本工资、员工奖金、员工福利等全部工资进行有效管 理的单元。3.2性能需求该软件的性能应包括对员工各项信息的录入、修改、查询、删除、保存等。且要求软件 适应性、移植性强4系统总体设计根据功能需求设计，我们先设计出了系统的总体功能模块图如图2系统总体六大功能模块设计图企业人事管理系统图2系统总体六大功能模块设计图-具体功能模块设计如下分类-1系统设置管理模块如图3系统设置管理模块图图3系统设置管理模

7、块图图4员工档案管理模块图-3员工评价管理模块如图5员工评价管理模块图图5员工评价管理模块图添加考勤信息员 工 考 勤 管 理图6员工考勤管理模块图-5员工调动管理模块如图7员工调动管理模块图图7员工调动管理模块图-6员工工资管理模块 如图8员工工资管理模块图计发员工工资员工工资管理整理员工工资查询员工工资员工工资报表图8员工工资管理模块图-本系统的设计流程图如下图图9系统设计流程图调度信息管理评价性能系管员工调动员工评价r入/员工基本信息录考勤信息管理员工档案管理员工考勤工资标准图9系统设计流程图5数据库设计5.1概念结构设计根据分析规划出的实体有：员工档案信息实体、员工调动信息实体、员工工

8、资信息实体、考勤信息实体、员工评价信息实体。各个实体的E R图如图10各个实体E R图图（1）员工档案信息图（2）员工调动信息图（3）员工工资信息实体员工考勤信息图（4）员工考勤信息实体5.2物理结构设计现在需要将上面的数据库概念结构转化为Access数据库系统所支持的实际数据模型,也就是数据库的逻辑结构。宾馆管理信息系统数据库中各个表格的设计结果如下面表格所示表1.员工档案信息表字段名数据类型关键字段说明员工编号数字是员工姓名文本否性别文本否男女籍贯文本否出生年月日期时间否学历文本否本科、大专等专业文本否表2 .员工考勤信息表字段名数据类型关键字段说明员工编号数字是员工姓名文本否性别文本否男

9、女职务文本否程序员等所在部门文本否后勤部等全勤天数数字否3130出勤天数数字否说明：员工职务有程序员、工程师、项目经理、总裁、总经理部门有后勤部、开发部、人事部、销售部 表3管理用户表字段名数据类型关键字段说明用户名称文本是用户口令文本是用户权限文本是说明：用户全县有 Guest和Administrators表4调动信息表字段名数据类型关键字说明员工编号数字是员工姓名文本否原部门名称文本否调入部门名称文本否原职务文本否新职务文本否调出时间日期时间否调入时间日期时间否表5员工评价报表字段名数据类型关键字段说明员工编号数字是员工姓名文本否所在部门文本否评价日期日期/时间否工作业绩文本否工作态度数字

10、否态度说明文本否表6员工工资表字段名数据类型关键字段说明员工编号数字是员工姓名文本否所在部门文本否底薪数字否加班费数字否补贴数字否房帖数字否说明：搜在部门有：后勤部、开发部、人事部、销售部员工的底薪和员工所在的部门和职位有关，职位不同底薪也不相同6运行结果和测试运行结果图运行界面如 图(11)系统运行图首先人事部门工作人员通过输入管理员名称和口令来进入系统当输入名称等错误时，被限制进入，且只有三次输入机会如图11 (1)图11 （1）人事管理系统登录图输入真确的管理员名称和管理员口令后，点击登录按钮进入系统总界面如图11 （2）在该主界面，可以选择不同的表项进行操作。例如选择员工档案信息表后会

11、出现如图11（ 3）的图。通过此窗口，可以对员工基本信息进行增加、删除、修改、查询、保存等操 作。在选择增加按钮时，可在各个表项中填入需要增加的员工信息，继续增加可继续按增加按钮，系统自动保存；选择删除按钮时，系统提示是否真的要删除表项，如图11（ 4）提示窗口对该表的操作完成后，点击退出按钮可进入人事管理系统主界面图11（ 2）图11（ 2）系统表项进入主界面图11 (3)员工档案信息表的管理窗口你确实更删除记录吗？是 | 否型)图11 ( 4)删除记录提示窗口对其他表项的操作同样可通过主界面进入， 各个表项内功能基本相同， 在此就不列举了。 测试在对各个表项进行操作过程中， 当然有很多问题

12、出现，比如程序编写有误造成系统运 行不了，通过调试程序可对其进行改正； 再如，在设置按钮和框体时， 设置属性不正确不能 达到预期目的，通过属性的从新设置可消除。7参考资料参考资料有：Visual Basic 6.0数据库编程指南-姜晓铭一中国石化出版社数据库系统开发教程-李春葆等-清华大学出版社另外，还参考了网络信息资源用户登录界面代码/ 退出系统代码Private Sub Image2_Click()= vbOK Then& AndIf MsgBox( 是否退出系统！ , vbOKCancel + vbQuestion, 系统提示 )EndEnd IfEnd Sub/ 登录代码Private

13、 Sub Image1_Click()Static intMyTimes As IntegerIf Text1.Text = And Text2.Text = ThenMsgBox 用户名或密码不能为空！ , , Form1.Caption Exit SubEnd IfAdodc1.Recordset.Filter = yonghumingchen= & Text1.Text yonghukoling= & Text2.Text & If Adodc1.Recordset.RecordCount 1 ThenintMyTimes = intMyTimes + 1If intMyTimes =

14、4 ThenMsgBox 登录错误超过 3 次，系统自动退出！ , , 系统提示 EndEnd IfMsgBox 登录错误！ , , 系统提示 Text2.Text = ElseIf Adodc1.Recordset.RecordCount = 1 Then interface.ShowForm1.HideEnd IfEnd IfEnd Sub/ 主界面按钮代码Private Sub Command1_Click() yuangongdanganxinxibiao.Show End SubPrivate Sub Command2_Click() yuangongdiaodongxinxibia

15、o.ShowEnd SubPrivate Sub Command3_Click() yuangonggongzixinxibiao.Show End SubPrivate Sub Command4_Click() yuangongkaoqinxinxibiao.Show End SubPrivate Sub Command5_Click() yuangongpingjiabaobiao.Show End SubPrivate Sub Command6_Click() Unload MeEnd Sub/ 各个表项使用钮代码Private Sub Cmd_delete_Click()Msg = M

16、sgBox( 你确实要删除记录吗？ , vbYesNo)If Msg = vbYes ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLast End IfEnd SubPrivate Sub Cmd_insert_Click()Cmd_insert.Enabled = TrueCmd_delete.Enabled = FalseCmd_update.Enabled = FalseCmd_save.Enabled = TrueCmd_fin

17、d.Enabled = FalseCmd_Refresh.Enabled = False Adodc1.Recordset.AddNew Text1.SetFocusEnd SubPrivate Sub Cmd_save_Click()Adodc1.Recordset.UpdateCmd_insert.Enabled = TrueCmd_delete.Enabled = TrueCmd_update.Enabled = True Cmd_save.Enabled = False Cmd_find.Enabled = TrueCmd_Refresh.Enabled = TrueEnd SubPr

18、ivate Sub Cmd_update_Click()Msg = MsgBox( 你确实要修改记录吗？ , vbYesNo) If Msg = vbYes ThenAdodc1.Recordset.UpdateCmd_insert.Enabled = TrueCmd_delete.Enabled = FalseCmd_update.Enabled = FalseCmd_save.Enabled = TrueCmd_find.Enabled = FalseCmd_Refresh.Enabled = FalseText1.SetFocusEnd IfEnd SubPrivate Sub Cmd_find_Cl