《计算机应用毕业设计论文综合人事管理系统.doc》由会员分享，可在线阅读，更多相关《计算机应用毕业设计论文综合人事管理系统.doc（36页珍藏版）》请在三一办公上搜索。
1、综合人事管理系统 学习形式：五年制专科 专 业：计算机应用 班 级： 学 号： 姓 名： 指导老师： 完成时间：2010年4月30日 - 32 -摘要现在是一个科学技术飞速发展、知识更替日新月异的世纪。综合人事管理系统在信息化的社会里担任了很重要的角色。它是很多厂矿、公司、个体事业单位所须的，随着企事业单位的发展，它的内容对于企事业单位的决策者和管理者来说都至关重要,所以综合人事管理系统应该能够为用户提供充足的信息和快捷的查询手段。计算机已深入到各个领域，并且形成了功能强大、覆盖全球的信息传输网络。各个领域都向系统化、规范化、自动化的方向发展，使得工作效率、工作成绩和生活水平都日益提高。但一直
2、以来人们使用传统人工的方式管理文件信息，这种管理方式存在着许多缺点，这对于查找、更新、维护、保密性和可靠性都带来了不少的困难。随着社会的高科技，商品的经济化的高效益，科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。因此，建立高效、实用、科学的人事管理信息系统，是企业管理走向现代化的重要一步。因此，开发这样一套管理软件成为很有必要的事情,在下面的各章中我们将以开发一套人事管理系统为例,谈谈其开发过程和所涉及到的问题及解决方法。关键词：人事管理系统、面向对象、VFP控件、可视数据库 目录1. 绪论- 1 -1.1 系统设计的
3、目的和意义- 1 -1.2 开发工具的简介- 1 -2. 系统分析- 2 -2.1 系统可行性分析- 2 -2.2系统需求分析- 2 -2.2.1部门信息管理- 2 -2.2.2.员工基本信息管理- 2 -2.2.3.员工照片管理- 3 -2.2.4.员工考勤管理- 3 -2.2.5.员工工作考评管理- 3 -2.2.6.系统用户管理- 3 -2.2.7.系统帮助信息- 4 -2.3系统业务流程分析- 4 -3.系统设计- 5 -3.1 功能模块设计- 5 -3.1.1综合人事管理系统功能模图- 5 -3.1.2基本信息管理模块的基本功能图如下- 5 -3.1.3考勤考评管理模块的基本功能如图
4、所示：- 6 -3.2 数据库设计- 6 -3.2.1. 概念模型设计- 6 -3.2.2、关系模型设计- 9 -4.系统代码实现- 12 -4.1用户登录模块的实现- 12 -4.2部门管理模块的实现- 14 -4.3员工信息管理模块的实现- 17 -4.4员工考勤管理模块的实现- 21 -4.5员工考评管理模块的实现- 23 -4.6用户管理模块的实现- 25 -4.7帮助信息的实现- 28 -5系统运行测试- 28 -6 . 结论- 31 -致 谢- 31 -参考文献- 32 -1. 绪论1.1 系统设计的目的和意义综合人事管理系统是非常通用的管理系统，是企事业单位实现办公自动化的前提和
5、基础。计算机综合人事管理系统的建立，适应了社会经济发展的客观要求，是综合人事管理现代化的一大进步。今天我们运用计算机进行了综合人事管理的初步现代化的开发和使用，它大大提高了综合人事管理工作者的工作效率。在此将介绍一个通用的综合人事管理系统实例的开发过程 ，此实例具有较强的实用性。可以高效能、大容量地收集、处理、存贮人事信息，大幅度地提高人事管理信息系统的工作质量和效率。可以及时掌握整个综合人事管理系统的全面情况，提供系统的准确的综合人事信息，可以促进人事工作的规范化及各项管理制度，从而提高行政管理水平。可以提供各种加工处理了的人事信息帮助选择方案，实现优化决策。 1.2 开发工具的简介Visu
6、al FoxPro 是一个功能非常强大的数据库应用系统开发工具，它提供了非常丰富的交互式向导，可以帮助用户快速制作各种应用程序对象，还提供了各种各样的可视化设计器，这些设计器可以通过交互操作的方式来进行应用程序界面的设计，从而避免编写大量程序来完成该项功能2. 系统分析2.1 系统可行性分析系统的可行性分析包括两个详细的部分：分析开发新的系统的必要性和可能性。可能性主要包括经济可行性、技术可行性和运行可行性三个方面。经济可行性研究是对组织的经济现状和投资能力进行分析，对系统建设运行和维护费用进行估算，对系统建成后可能取得的社会和经济效益进行估计。 技术可行性要考虑现有的技术条件是否能够顺利完成
7、开发工作，软硬件配置是否满足开发的需求等。综合人事管理系统用的是VF开发语言，调试相对简单，当前的计算机硬件配置也完全能满足开发的需求，因此在技术上是绝对可行的。软件方面：由于目前单机模式相对发展成熟，故软件的开发平台成熟可行。硬件方面：目前高性能的网络组件已经在我们学校广泛使用（服务器、集线器、通信介质、工作站等），它们速度快、容量大、可靠性能高、价格低，完全能满足系统的需求。 运行可行性是对组织结构的影响，现有人员和机构、设施和环境对系统的适应性及人员培训补充计划的可行性。当前我们学校信息化技术已经相当普及，各类操作人员水平都有相当的高度，所以在运行上是可行性的。2.2系统需求分析综合人事
8、管理系统的基本功能是对企事业单位的组织机构和员工进行管理，本实例的主要功能如下。2.2.1部门信息管理（1）添加部门信息，包括部门编号、部门名称、部门职能描述和上级部门等信息。（2）修改部门信息。（3）删除部门信息。（4）查看部门信息2.2.2.员工基本信息管理（1）添加员工基本信息，包括员工编号、姓名、性别、生日、所在部门等信息。（2）修改员工基本信息。（3）删除员工基本信息。（4）查看员工基本信息。2.2.3.员工照片管理（1）添加员工照片，将指定的图像文件存储到数据库中。（2）修改员工照片。（3）删除员工照片。（4）显示员工照片。2.2.4.员工考勤管理（1）添加员工考勤信息，包括考勤月
9、份、病假天数、事假天数、旷工天数等信息。（2）修改员工考勤信息。（3）删除员工考勤信息。（4）查询员工考勤信息。（5）月度考勤统计表。2.2.5.员工工作考评管理（1）添加员工工作考评信息，包括考评月份、奖励事由、奖励金额、处罚事由、处罚金额和总体评价等信息。（2）修改员工工作考评信息。（3）删除员工工作考评信息。（4）查看员工工作考评信息。2.2.6.系统用户管理（1）添加系统用户信息，包括用户名、密码、员工编号和用户类型（系统管理员和普通 用户）等信息。（2） 修改系统用户信息。（3）删除系统用户信息。（4）查看系统用户信息。2.2.7.系统帮助信息帮助信息只显示一个关于对话框。2.3系统
10、业务流程分析本节将对实例进行系统流程分析，所谓系统流程就是用户在使用系统时的工作过程。对于具有多类型用户的管理系统来说，每一类用户的工作流程都是不相同的。多用户系统的工作流程都从用户登录模块开始，对用户的身份进行认证。身份认证可以分为以下两个过程。确认用户是否有效的系统用户。确定用户的类型。系统的流程分析如图所示：用户登录读取用户类型开始1、 管理用户自己的用户信息2、 管理普通系统管理员用户信息3、 管理普通用户的用户信息1、 管理普通系统管理员用户信息2、 管理普通用户的用户信息管理自己的用户信息拥有所有权限只有查询权限 系统业务流程分析图3.系统设计3.1 功能模块设计3.1.1综合人事
11、管理系统功能模图综合人事管理系统中有基本信息管理，考勤考评管理，系统用户管理如下：综合人事管理系统基本信息管理考勤考评管理系统用户管理 综合人事管理系统功能模块示意图3.1.2基本信息管理模块的基本功能图如下部门信息管理包括了员工基本信息管理，其中员工基本信息管理中主要包括员工文化程度管理，员工照片管理，员工所在部门编号管理，员工学习及工作经历管理，员工职务管理。如下： 部门信息管理员工基本信息管理员工照片管理员工学习及工作经历管理员工所在部门编号管理员工职务管理员工文化程度管理基本信息管理模块功能图3.1.3考勤考评管理模块的基本功能如图所示：员工基本信息管理员工考勤管理员工工作考评管理 考
12、勤考评管理模块功能图系统用户管理模块包括用户信息管理、权限控制等功能。权限控制虽然不是一个独立存在的模块，但是它却贯穿在整个系统的运行过程当中。本系统将用户划分为两种类型，即系统管理员用户和普通用户。3.2 数据库设计3.2.1. 概念模型设计 部门E-R图部 门编 号描 述名 称上级编号 员工E-R图员工办公电话户口所在地备注编号到岗日期工作岗位姓名文化程度所在部门编号身份证号民族合同有效期 考勤E-R图考勤考勤日期周六日加班员工编号全勤天数也差天数病假天数位旷工天数法定休假天数年休假天数倒休假天数迟到时间事假天数期早退时间法定节假日加班日常加班备注 考评E-R图考评考评月份员工编号总体评价
13、奖励事由处罚事由奖励金额处罚金额备注用户E-R图用户用户名密码用户类型 实体间的关系考核部门员工考勤考评 1 N3.2.2、关系模型设计 （1）部门表部门表用来保存企业部门的信息。本系采用树状结构管理部门数据，也就是在部门之间建立从属关系。表结构如下所示：部门表的结构 编号字段名称数据结构大小，说明1编号整型主索引2名称字符型宽度为40 3描述备注型为空4上级编号整型（2）员工表员工表用来保存员工的基本信息，表结构如下表所示。员工表的结构编号字段名称数据结构大小，说明1编号整型主索引2姓名字符型303照片通用型为空4性别字符型25民族字符型406生日日期型为空7政治面貌字符型408文化程度字符
14、型409婚姻状况字符型2010籍贯字符型6011身份证号字符型2012工作证号字符型40 13办公电话字符型1214手机号码字符型1115档案存放地字符型2016户口所在地字符型10017到岗日期日期型18所在部门编号数值型1019工作岗位字符型4020职务字符型2021员工状态字符型1022合同有效期字符型2023备注字符型200 24填表用户字符型20 25填表日期日期型（3）考勤表考勤表用来保存员工考勤的基本信息。表结构如下所示考勤表的结构编号字段名称数据结构大小 ，说明1考勤日期日期型82员工编号整型43全勤天数数值型34也差天数数值型35病假天数数值型36事假天数数值型37旷工天数数
15、值型38法定休假天数数值型39年休假天数数值型310倒休假天数数值型311迟到时间整型单位为分钟12早退时间整型单位为分钟13法定节假日加班数值型314周六日加班数值型315日常加班数值型316备注备注型200（4）考评表考评表用来保存员工每天的工作考评信息，表结构如下所示考评表的结构编号字段名称数据结构大小 说明1考评月份字符型72员工编号整型43总体评价备注型2004奖励事由备注型2005奖励金额数值型106处罚事由备注型2007处罚金额数值型108备注备注型200（5）用户表用户用来保存系统用户信息，表结构如下所示用户表的结构编号字段名称数据结构大小 ，说明1用户名字符型402密码字符型
16、403用户类型数值型14.系统代码实现4.1用户登录模块的实现用户要使用这个系统，首先必须通过系统的身份认证，这个过程叫做登录。这将是登录模块的实现过程。设置登录表单的属性属性设置值AutoCenterT-真Caption登录对话框BackColor背景颜色Contro1BoxF-假WindowType1-模式设置登录表单的属性控件名称属性取值Label1AutoSizeTBackStyle0Caption用户名FontBoldTForeColor255,255,255Label2AutoSizeTBackStyle0Caption用户名FontBoldTForeColor255,255,25
17、5txtUserNameIMEMode2txtUserPwdIMEMode2passwordChar*cmdOKCaption确定cmdCancelCaption取消登录窗口代码如下：IF ALLTRIM (thisform.txtUserName.Value) = Message Box(请输入用户名) RETURNENDIFIF ALLTRIM (thisform.txtUserPwd.Value) = Message Box(请输入密码) RETURNENDIFSELECT 用户表Locate For Allot(用户名)=Allot(thisform.txtUserName.Value
18、)If Found () = .T. If Allot(密码) = Allot(thisform.txtUserPwd.Value) 入 Message Box(欢迎光临, 64, 提示信息) Username = 用户名 User Type = 用户类型 Release this form Else Message Box(密码不正确, 16, 错误提示) End ifElse Message Box(用户名不存在, 16, 错误提示)4.2部门管理模块的实现部门管理模块可以实现以下功能。（1）系统管理员用户可以添加部门记录、修改部门记录、删除部门记录和查看部门记录。（2） 普通用户只能查看
19、部门数据。部门管理模块需要设计部门信息管理表单，用于对部门信息进行管理，包括添加、修改和删除等操作。主窗体界面表单的属性属性设置值具体说明Auto Size.T.自动位于主窗口中央Back Style部门管理设置背景颜色Caption159，206，253设置表单的标题条文本Control Box.F.设置控制按钮window Type1在关闭此表单前，不能对其他表单进行操作表单中的各部分代码。1.Tree控件的Init事件添加代码如下：this.HotTracking=.T. this.HideSelection=.F. this.ImageList = thisform.Imagesthi
20、s.LabelEdit= 1this.lineStyle= 1SELECT 部门表Go Topthis.Nodes.Add(,N0,部门)This. Nodes (1).Image=1Scan this.Nodes.Add(N+ALLTRIM(STR(上级编号),4,N+ALLTRIM(STR(编号),ALLTRIM(名称) This. Nodes (RECNO () +1).Image=1End scanthisform.cmdSave.Enabled = .F.thisform.cmdCancel.Enabled = .F. 2 .Tree控件的Click事件添加代码如下:Name = t
21、his.SelectedItem.TextLocate For 名称 = namethisform.txt名称.Read only = .T.thisform.edt描述.Read only = .T. thisform.cmdSave.Enabled = .F. thisform.cmdCancel.Enabled = .F. thisform.cmdDel.Enabled = .T. thisform.Refresh 3.cmdAdd按钮的Click事件If thisform.tree.SelectedItem.text = Message Box(请选择上级部门) returnEndiv
22、ethisform.txt名称.Read Only = .F. thisform.edt描述.Read Only = .F. thisform.cmdSave.Enabled = .T. thisform.CmdCancel.Enabled = .T. thisform.CmdDel.Enabled = .F. thisform.fmode = addSELECT 部门表GO Bottom LOCAL bahbah = 编号 APPEND BLANK thisform.txt编号.Value = bah + 1 Value = thisform.tree.SelectedItem.Key th
23、isform.txt上级编号.Value = Val(Right(value, Len(value)-1)thisform.Refresh4.cmdModi按钮的Click事件If thisform.txt编号.Value = 0 Message Box(不能编辑根节点,16,提示) ReturnEnd ifthisform.txt名称.Read Only = .F. thisform.edt描述.Read Only = .F. thisform.cmdSave.Enabled = .T.thisform.CmdCancel.Enabled = .T. thisform.CmdDel.Enab
24、led = .F. thisform.fmode = modify4.3员工信息管理模块的实现员工信息管理模块可以实现以下功能。(1)系统管理员用户可以添加员工记录、修改员工记录、删除员工记录和查看员工记录。(2)系统管理员可以管理员工照片。(3)系统管理员可以管理员工照片。(4)普通用户只能查看员工数据。员工信息管理表单属性属性设置值说明AutoCenter.T.-真自动位于主窗口中央BackColor159，206，253设置背景颜色Caption部门管理设置表单的标题条文本Controlbox.F.-假设置控制按钮WindowType1-模式指定在关闭此表单之前，不能对其他表单进行操作（
25、1）TREE控件的Init事件this.HotTracking=.T. this.HideSelection=.F. this.ImageList = thisform.Imagesthis.LabelEdit= 1this.lineStyle= 1SELECT 部门表this.Nodes.Add(,N0,部门)This. Nodes (1).Image=1Scan this.Nodes.Add(N+ALLTRIM(STR(上级编号),4,N+ALLTRIM(STR(编号),ALLTRIM(名称) This. Nodes (RECNO () +1).Image=1End scanLocal B
26、ynumBynum = RECCOUNT ()SELECT 员工表Scan this.Nodes.Add(N+ALLTRIM(STR(所在部门编号),4,ND+ALLTRIM(STR(编号),ALLTRIM(姓名) This. Nodes (Bmnum+RECNO () +1).Image=2 Locate For 所在部门编号=0thisform.ModeRead（2）cmdAdd按钮的CLICK事件If thisform.tree.SelectedItem.Image = 2 Message Box(请选择部门) ReturnEnd ifLocal BombBmmc = thisform.
27、tree.SelectedItem.KeyBmbh = Val (Right (Bmmc, Len (Bmmc) - 1)If Bmbh = 0 Message Box(请选择所在部门) ReturnEnd ifthisform.ModeEdit thisform.fmode = addSELECT 员工表GO Bottom LOCAL bahbah = 编号 APPEND BLANK If File (imgno.bmp) APPEND GENERAL 照片 FROM imgno.bmpEnd ifthisform.txt编号.Value = bah + 1 thisform.txt填表用户
28、.Value = Usernamethisform.txt所在部门编号.Value = Bmbhthisform.Refresh （3） cmdDel按钮的CLICK事件If thisform.txt编号.Value = 0 Message Box(不能删除空记录, 16,提示) ReturnEnd ifLocal Rich Rich = thisform.txt编号.ValueSELECT 员工表If Message Box(是否删除当前员工,4+32,请确认)=6 USE 员工家庭表 In 10 SELECT 10 DELETE FOR 员工编号 = Rich PACK USE 员工经历表
29、 DELETE FOR 员工编号 = Rich PACK USE 考勤表 DELETE FOR 员工编号 = Rich PACK USE 考评表 DELETE FOR 员工编号 = Rich PACK SELECT 员工表 DELETE PACK thisform.tree.Nodes.Remove (thisform.tree.SelectedItem.Index) thisform.tree.NodeClick (1) Thisform.tree.Nodes (1).Selected = .T. Thisform.tree.click thisform.Refresh ()End if（4
30、）cmdCancel按钮的CLICK事件If Message Box(是否确定取消保存?,4+32,请确认) = 6 Table Revert (.F.) thisform.tree.click thisform.ModeRead thisform.Refresh ()End if4.4员工考勤管理模块的实现员工考勤管理模块可以实现以下功能。（1） 系统管理员可以创建、修改和查看考勤记录。（2） 普通用户只能查看考勤数据。（1）tree控件的Init事件this.HotTracking=.T. this.HideSelection=.F. this.ImageList = thisform.I
31、magesthis.LabelEdit= 1this.lineStyle= 1SELECT 部门表this.Nodes.Add(,N0,部门)This. Nodes (1).Image=1Scan this.Nodes.Add(N+ALLTRIM(STR(上级编号),4,N+ALLTRIM(STR(编号),ALLTRIM(名称) this.Nodes (RECNO () +1).Image=1End scanLocal BmnumBmnum = RECCOUNT ()SELECT 员工表Scan For 员工状态离职人员 Or 员工状态退休人员 this.Nodes.Add(N+ALLTRIM
32、(STR(所在部门编号),4,ND+ALLTRIM(STR(编号),ALLTRIM(姓名) this.Nodes (Bmnum+RECNO () +1).Image=2 End scanthisform.tree.NodeClick (1)thisform.tree.Nodes (1).Selected = .T.thisform.tree.click（2）tree控件的Click事件SELECT 考勤表Table Revert (.F.)Local YoghIf this.SelectedItem.Image = 1 Locate For 员工编号 = 0 thisform.moderead
33、Else Bah = this.SelectedItem.Key Yogh = Val (Right (Bah, Len (Bah)-2) By = All trim (Stir (thisform.Monthview1.Year) Mm = All trim (STR (thisform.Monthview1.Month) Add = All trim (STR (thisform.Monthview1.Day) Locate For 员工编号 = Yogh And 考勤日期 = CTOD(yy+-+mm+-+dd) If Found () = .F. Go Bottom APPEND BL
34、ANK thisform.txt员工编号.Value = Yogh thisform.txt考勤日期.Value = CTOD (yy+-+mm+-+dd) thisform.modeedit Else thisform.moderead End ifEnd ifthisform.Refresh 4.5员工考评管理模块的实现 员工考评管理模块可以实现以下功能。（1） 系统管理员用户可以创建、修改、删除和查看考评记录。（2） 普通用户只能查看考评数据。（1）tree控件的Init事件this.HotTracking=.T. this.HideSelection=.F. this.ImageLis
35、t = thisform.Images this.LabelEdit= 1this.lineStyle= 1SELECT 部门表this.Nodes.Add(,N0,部门)this.Nodes (1).Image=1 this.Nodes.Add(N+ALLTRIM(STR(上级编号),4,N+ALLTRIM(STR(编号),ALLTRIM(名称) this. Nodes (RECNO () +1).Image=1EndscanLocal BmnumBmnum = RECCOUNT()SELECT 员工表Scan For 员工状态离职人员 Or 员工状态退休人员 this.Nodes.Add(
36、N+ALLTRIM(STR(所在部门编号),4,ND+ALLTRIM(STR(编号),ALLTRIM(姓名) this.Nodes (Bmnum+RECNO ()+1).Image=2 Endscanthisform.tree.NodeClick (1)thisform.tree.Nodes (1).Selected = .T.thisform.tree.click4.6用户管理模块的实现根据用户类型的不同，用户管理模块的功能也不同。可以包含以下情形。（1） 用户可以创建系统管理员或普通用户、复位用户密码、删除系统管理员或普通用户，也可以修改自身的密码。（2） 系统管理员用户可以创建普通用户、
37、对普通用户的密码进行复位、删除普通用户，也可以修改自身的密码。（3） 普通用户只能修改自身的密码。(1) Tree的Init事件this.HotTracking=.T. this.HideSelection=.F. this.ImageList = thisform.Imagesthis.LabelEdit= 1this.lineStyle= 1SELECT 用户表Go Topthis.Nodes.Add(,N0,用户管理)This. Nodes (1).Image=1this.Nodes.Add(N0,4,Na,系统管理员)This. Nodes (2).Image=1this.Nodes.
38、Add(N0,4,Nb,普通用户)This. Nodes (3).Image=1Scan If 用户类型 = 1 this.Nodes.Add(Na,4,N+ALLTRIM(STR(RECNO(),ALLTRIM(用户名) this. Nodes (RECNO () +3).Image=2 Else this.Nodes.Add(Nb,4,N+ALLTRIM(STR(RECNO(),ALLTRIM(用户名) This. Nodes (RECNO () +3).Image=3 End ifEnd scanthisform.tree.NodeClick (2)thisform.tree.Nodes (2).Selected = .T.thisform.tree.click(2) cmdAdd的click事件If thisform.tree.SelectedItem.Key! = Na And; thisform.tree.SelectedItem.Key! = Nb Message Box(请选择用户类型节点) ReturnEnd ifIf Username! = Admin And thisform.tree.SelectedItem.Key = Na Messa
