人事档案管理系统分析

1、人事档案管理系统分析12人事档案官理系统分析时间行进到21世纪，以计算机技术为主体的高新技术群体已经将触角深入到国发经济 的方方面面。在市场经济的大环境下，越来越多的人士逐渐认识到用计算机技术进行名类管 理，交流的便捷。基中最实出的是要算在厂矿企事业单位的人事档案的计算机管理了。人事档案数据库管理系统是一个为适应当前各个行业对人事信息管理的迫志需求而设 计开发的软件系统。该系统的前台采用的是VB6.0软件开发系统，后台数据库采用的是Access2000 数据库。整个系统有数据库文件和数据库管理系统两大部他构成。后台的Access 2000数据库文件是集中存储并管理分类人事档案信息的大本营，而前

2、台的数据库管理系统是用来为数据库中的各种资料进行各种基本操作和管理。、总体结构和主要功能人事档案管理系统主要包含职工个人自然情况，工作情况，简历，政治情况等各方面信息，内容比较庞大复杂。同时还综合考虑档案管理工作的性质，总结归纳出所需实现的功能。主要是为人事档案进行服务，对人事的变动、人事资料、以及人事资料的查询，统计等功能。 总体上说具有编辑，查询，用户管理，图表统计等功能。灵活的数据记录编辑功能 ，可以随时对记录进行增加，修改，更新，删除，浏览等编辑操作。并将查询方式有机溶入编辑界面，可以实现对某项记录定位，再进行编辑， 修改，更新。多个数据库表的任意组合条件的查询。便于在实际档案管理操作

3、中呆对保种情况， 多种条件下的人员情况进行统计查看。具备分级用户权限管理设置 ，以确保档案的保密性和安全性。四、五、具有分类统计，使用图表显示的功能，该统计图表可根据数据库中记录情况的变化 而变化。具有比较友好的人机界面，各种操作可以在直观的界面上通过人机交互式进行。八、具有辅助表管理功能，主要是对“学历”表中的字段“学历”，“部门表”中的字段 “部门”，“政治面貌” 表中的字段“政治面貌”，“职称” 表中的字段“职称”，进行 添加，修改，删除操作。人事档案管理系统模型如下：二、各模块功能1、用户管理查询模块(1)设置用户功能：设置使用人事管理系统的用户及其使用权限。整个人事管理系统由多个功能

4、模块组成，不同的模块完成不同的功能，所以可以为不 同的职工分配不同的功能，使其具有不同的权限， 完成其权限所对应的功能，从而很好地管理好整个系统。操作：选择该功能后，屏幕上显示出所有人事管理系统员工的用户名称。这时，可进行 如下的操作：1： 增加：增加一用户。按该按钮后，就可输入新用户的内容，如：用户名称，密码和 权限。所输入得登录名一定不能重复。2:修改：修改用户设置。按该按钮后，就可修改选中用户的用户名，密码和权限，每 一权限对应系统菜单上的一项功能，可为该用户选择任意的权限。用户在使用本系统时， 要求输入用户的口令，为了安全，用户需建立一个只有自己才知道的特殊口令，通常，系统的权限分为三

5、大部分，即： 管理权限：设置用户和系统参数。输入权限：档案卡片生成、个人简历输入和家庭成员输入。查询权限：档案查询、档案统计。根据需要，可以把这些功能分配给不同的员工。3:删除：删除用户。按该按钮后，经确认，则选中的用户被删除(2)用户登录功能：用户登录进入人事管理系统。系统启动后，首先要做的就是用户登录。若不登录 系统，所有功能都无法使用。用户只有登录系统后，根据其具有的权限，才能执行一定的操 作。操作：进入该功能后，要求输入用户的登录名及其口令，只有其登录名和口令完全正确，才能进入工资管理系统。系统会根据为用户分配的权限，设置其对应的功能为有效，用户就可操作该功能。2、辅助表管理辅助表管理

6、功能是高级管理员及中级管理员拥有的权限，它的功能是对数据库进行新表的添加。主要是对“学历”表中的字段“学历”，“部门表”中的字段“部门”，“政治面貌”表中的字段“政治面貌”，“职称” 表中的字段“职称”，进行添加，修改，删除操作。通过 它的这个功能可以有效的对本单位人事部门的扩充进行及时的计算机管理。只要管理员进行简单的数据字段添加即可。3、档案编辑档案编辑模块中有 4个子模块。他们是档案卡片、个人简历、家庭成员、历史档案等功 能。这些功能因管理员的权限不同所表示出的功能使用也不同，普通管理员没有数据修改及删除的权利。在这些功能里详细的记录了所有单位员工的资料。（1）档案卡片管理功能：对全部员

7、工的信息进行浏览；添加记录；对员工的详细资料进行修改；删除员 工记录；按编号进行查找，快速查找该员工的详细资料；按某一字段的内容进行筛选， 筛选最后的结果是将和所选内容相同的全部找到。（2）个人简历管理功能：该模块与档案卡片管理类似，但是在界面设计上有一些不同，可以对员工个人 简历进行全局浏览。除了浏览信息的功能外，还有一些基本操作的功能：添加记录； 对已有员工的个人简历信息进行修改；删除员工个人简历的记录；可以按编号进行查 找，快速查找该员工个人简历的资料。（3）家庭成员管理功能：对全部员工的家庭成员信息进行编辑，浏览；实现方法同个人简历功能实现的 方法一样。（4）历史档案管理功能：对于一些

8、从档案卡片中删除的员工信息记录，需要存下来以供将来进行统计。此模块的主要功能就是完成对从档案卡片中删除的员工信息记录的保存工作。4、档案查询功能：对档案卡片的查询功能，包括唯一条件查询和模糊条件查询。该模块的主要分为两部分：一是完成选择要查询的字段、条件操作符等功能；二是用来 显示用户进行查询的完整条件及查询、退出按钮。当查询的条件选择完毕，点击确定按钮， 在显示部分显示出来后， 点击查询按钮才正式完成该模块的查询功能。会调出另外一个窗口来显示用户所要查询的符合条件的所有员工的资料。根据档案卡片中的各字段， 选择相应的条件操作符输入相应的值即可进行档案查询。查出的记录可按两种形式浏览：只有该员

9、工档案卡片中的资料；综合该员工档案卡片、个人简历、家庭成员中的所有资料。查询用户可以 按自己的需要选择两种浏览方式。在这里可以查到符合程序要求的任何信息。再这里的选项中输入规定的范围即可查到相关的人事信息。5、档案统计功能：综合统计、单项统计和图表统计。 单项统计是输入规定的要求后进行的统计它可 以较详细直观的统计出要求的结果。图表统计可以详细的按性别、按政治面貌、按职称级别、按学历以直方图和饼型图进行表示。档案统计模块，分三个小模块：（1）综合统计：综合统计中将单位内所有的人事信息进行全面的统计。该模块主要是综合各方面的人数统计； 对各部门的人数、符合档案卡片中各字段条件的员工人数、 各年龄

10、段人数以及工龄段人数等的统计。并且本查块提供重新统计功能，方便在一定 时间段内对各项人数的进行更新，保持数据库中数据的即时性。（2） 单项统计：是按各单项条件对人数的统计功能。分为四部分：在选择分组统计 的字段，一次只可选择一个字段；可选择统计条件，包括条件操作符及条件值；可选 择统计是否包括平均工资汇总及工资总额汇总；可显示要统计的完整条件，包括上述 的分组字段、完整的统计条件及是否包括各类工资汇总。每完成一项选择，要点击确 定按钮，各条件才能在右下角显示出来以供统计。可同时选择分组统计、条件统计、工资汇总，也可只选择一项来进行统计。（3） 图表统计：将各类统计图表化。 用户可以选择按性别、

11、政治面貌、职称级别或 学历进行人数统计。用户还可以选择直方图或饼形图的图表显示方式.1、三、功能的实现方法及实现的代码本系统中VB6与数据库是如何连接的？写出简要代码?本系统采用的数据库是Access2000数据库，使用是 ADO（ Active Data Object）代码访问方式，它通过在程序中的一段代码与数据库建立连接。代码如下:Private cnn As New ADODB.Co nn ectionDim StrSql As Stri ngcnn.P rovider = Microsoft.Jet.OLEDB40cnn .Co nn ectio nStri ng = d:VBAcce

12、ss2000rs.mdb cnn.Open注：在进行 ADO方式数据库的连接时，要先进行类型库引用：2、Microsoft ActiveX Data Object 2.6 library浏览、恢复、添加、保存、修改、查找、筛选、解除筛选、排序、恢复排序、退出各功能是如何实现的？写出简要代码。浏览：先将数据库打开，然后选择所需的表进行操作。 代码如下：Public rs1 As New ADODB.RecordsetDim StrSql As Stri ngStrSql = select * from 档案卡片 order by 职工编号” rsl.ActiveC onn ectio n = c

13、nnrs1.CursorT ype = adO pen Keyset rs1.CursorLocati on = adUseClie nt rs1.LockT ype = adLock Op timistic rs1.O pen StrSql移动记录指针有四种方法：（1）记录首：rs1.MoveFirst （ 2）前一个：rs1.MovePrevious（3）后一个：rs1.MoveNext （ 4）记录尾 rs1.MoveLast恢复：恢复功能是在用户选择添加或修改后出现的，是为了使用户在进行误操作后 能够恢复数据的一个功能。代码为：rs1.Ca ncelU pdate添加：在编辑窗口中，先

14、将文本框清空，然后进行添加。并且要判断所输入的信 息与所建的表的格式符合。最后添加到库中。代码为：rs1.AddNew保存:rs1. Up date修改：修改的的功能是与添加类似的，但是他会更新数据库中被要求修改的记录。先将各个字段所对应的控件置为可用，然后进行修改。修改之后保存。If AddNewOrModify = Modify Then RsMai n.rs2. Up datetemp = RsMai n. rs2.Fields(RsMai n.rs2.RequeryRsMa in .rs2.Fi nd 序号）序号=& temp & ”, , , adBookmarkFirstEnd I

15、f查询：代码为，StrSql = select * from个人简历order by职工编号RsMa in. rs2.ActiveC onn ecti on = RsMa nRsMa in. rs2.CursorT ype = adOpen KeysetRsMa in. rs2.CursorLocati on = adUseClie ntRsMa in. rs2.LockT ype = adLock Op timisticRsMa in .rs2.O pen StrSqlSet DataGridl.DataSource = RsMai n.rs2筛选：代码为，FieldsName =

16、 RsMa in .Irsl.Fields(”职工编号”）.NameIf Len (Trim(Label1.Ca ptio n) = 0 ThenFilterStr = FieldsName & = NullElseFilterStr = FieldsName & = & ” & Labell.Ca ption & ”End IfRsMai n. Irsl.Filter = FilterStr排序：代码为，RsMa in .Irsl.Sort = FieldsName ASCENDING DESCENDING删除：代码为,RsMai n. rs2.Delete退出：关闭记录集操作，代码为,Rs

17、Ma in. rs2.closeUn Load Me3. 本系统浏览和修改是两个界面，是如何实现的？写出基本思想。系统中浏览和修改的界面不同是因为在点击相应的按钮时通过布尔型变量控制不同控件的Enabled属性为True或False来实现的。在浏览时信息的显示窗口采用的是Lable控件不能进行修改，并且将他们Enabled设置为True，而将和他们放在一起的其他控件Enabled设置为False，而在进行修改时浏览时显示信息的lable控件的Enabled属性变为False而和他们重合的其他控件的Enabled属性变为True，这样就实现了浏览与修改的不同的两个界面。4. 照片是如何使用的？写

18、出基本思想。照片在系统文件的PICTURE文件夹下，照片的文件名与系统中职工编号相对应,当选择某个职工时，程序读取他的职工编号与照片文件名一致时就会显示照片。如果将 照片文件名更改，则系统就不能正确的读取照片的信息了。代码为：Dim i As In tegerDim bool As Boolea nDim fname As Stri ngDim picturep ath As Stringfname = Trim(Label1.Ca pti on) & .b mpIf Dir(f:VBL picture & fname) = The nbool = FalseElsebool = TrueEn

19、d IfIf bool = True The npicturep ath = f:VBL picture、 & fnameElsepicture path =End IfImagel. Picture = Load Picture(p icture path)5. 单击照片可以显示该记录的个人简历和家庭成员，该功能是如何实现的？写出基本思想。单击照片时激发了 Image控件的click事件，程序会按调用同样职工编号的职工资料 显示窗体(Rs1 Rs2Edit)。这样就实现了单击照片显示个人简历和家庭成员。代码为,Private Sub lmage1_Click()If Rs1Edit.Text

20、1.Visible And Len (Trim(Rs1Edit.Text1.Text) = 0 The nExit SubElseLoad Rs1A ndRs2EditRs1A ndRs2Edit.Show 1End IfEnd Sub6. 本系统中的三个表，档案卡片表、个人简历表和家庭成员表是如何实现 数据参数完整性的(连续更新、连锁删除)？在数据库的关系中右键单击表之间的连线可以弹出编辑关系，选中实施参照完成性，选中级连更新相关字段、级连删除相关记录就可以实现数据的连续更新和连锁删除了。四、在查询模块中，下述功能是如何实现的?1.请选择字段列表框中的内容是从表中取出的字段名，简述基本方法

21、并写出简要代码。Dim i As In tegerList1.ClearFor i = 0 To RsMa in .rs1.Fields.Cou nt - 1List1.AddItem RsMai n.rs1.Fields(i).NameNext i等于” 不等” 小于” 小于等于” 大于” 大于等于” 在之间” 不在之间操作符”List2.ClearList2.AddItem List2.AddItem List2.AddItem List2.AddItem List2.AddItem List2.AddItem List2.AddItem List2.Addltem LikeList2.A

22、ddItem 2.多个条件的组合查询代码如下：P ublic Qcnn As New ADODB.Co nn ectionP ublic Qrs As New ADODB.Recordsets1 = & List1 List(List1丄isti ndex) & s2 = List2.List(List2.ListI ndex)s3 = Text1.Texts = s1 & s2 & s3Dim StrSql As Stri ngQcnn.P rovider = MSDataSha pe.1Qcnn .Co nn ectio nStri ng = Data Source = f:VBAcces

23、s2000rs.mdb _& ; Data P rovider=Microsoft.Jet.OLEDB40Qcnn.Openwhere & s & ” order by职工个人简历 RELATE 职工编号 家庭成员 RELATE 职工编StrSql = SHA PE select * from档案卡片编号 & APP END (select * from to 职工编号)，” & ” (select * from 号to 职工编号)Qrs.ActiveC onnection = QcnnQrs.CursorT ype = adO pen Keyset Qrs.CursorLocati on =

24、 adUseClie ntQrs.LockT ype = adLock Op timisticQrs. Open StrSql五、统计模块中的综合统计中可实现部门的动态变化，简述实现的基本思想。该按钮的功能就是实现数据的动态统计功能。 由于添加数据后数据提交到数据库，这事I,在表里进 i的值加1，最后在对应响应的项目提交到数据库中，通在综合统计的窗体中有重新统计按钮， 在重新统计的功能中有实现重新统计的代码。 重新统计按钮在打开这个表，所以数据就是新的了。通过设置一个循环变量 行循环统计，每经过一个字段， 过DataGrid控件输出显示出来。RsMn.Execute （DELETE FROM综合统计）Trs.RequerySet DataGrid1.DataSource = Tr