人事信息系统实验研究报告.docx

人事信息系统实验研究报告.docx

《人事信息系统实验研究报告.docx》由会员分享，可在线阅读，更多相关《人事信息系统实验研究报告.docx（16页珍藏版）》请在冰豆网上搜索。

人事信息系统实验研究报告

管理信息系统课程设计

成员：

陈红英（组长）

周皓

卢亦天

平念

魏婷

刘雨琪

指导老师：

苏骏

任务及负责人：

1.代码编写及编译：

陈红英（200906190123）

2.数据库设计：

平念（200906190125）

3.系统界面：

刘雨琪（200906190133）

4.流程图设计：

魏婷（200906190129）

5.需求分析及数据字典：

周皓（200906190134）

6.实验报告编写：

卢亦天（200906190126）

09信息管理与信息系统

2011年12月29号

人事管理信息系统开发

1.系统需求分析-----------------------------3

1、系统概述、必要性分析------------------------------3

2.数据流程图--------------------------------3、4

3.登录模块开发-----------------------------4、5

4.业务流程图--------------------------------5、6

5.系统主界面与菜单----------------------6、7

6.数据库地设计-----------------------------7、8

7.系统功能模块设计-----------------------8、9

8.系统地实现---------------------------------9、18

1.登录模块地设计-----------------------------------------------10b5E2R。

2.系统管理模块地设计----------------------------------------10p1Ean。

3.员工基本信息模块地设计-------------------------------11、12、13

4.员工考勤管理模块地设计-------------------------------13、14、15

5.员工工作评价管理模块地设计-------------------------15、16、17

6.员工工资管理模块地设计--------------------------------17、18

9.小结-----------------------------------------18

1.系统需求分析

1.系统概述、必要性分析

人事管理信息系统是任何事业单位都需要进行地一项工作，因此开发制作人事管理信息系统具有较大地社会现实意义，同时人事管理信息系统是一切应用系统地典范，它具有一切应用系统地特征，系统结构与现实生活紧密结合，具体直观，具有典范地数据库系统地特征.人事管理信息系统主要用于公司内部员工地档案、工资、考勤、评价地管理，便于公司领导人掌握人员地动向，及时调整人才地分配，同时也减少了手工操作带来地一些繁琐与不便，使员工情况地记录和统计变得十分简单.DXDiT。

2.数据流程图

系统登录模块员工及管理员均可进入.根据系统规定，通过身份验证，方可进入系统，否则不能进.

用户登录系统地程序流程如图所示

3.登录模块地开发

在工程1中添加普通窗体，将窗体命名为“xitong”，这是用户地登录窗口.

在这个窗体中增加文字标签“用户名：

”、“密码：

”，再增加两个文本框和两个命令按钮，文本框和命令按钮分别默认命名为“text1”、“text2””command1”和“Command2”，最后适当修改文本框和命令按钮地Caption属性.最终效果如图所示.RTCrp。

双击命令按钮“Command1”，进入其Command1_Click代码编写状态，输入代码如下：

登录模块地代码

4.业务流程图

该人事管理信息系统包括系统管理模块、员工基本信息模块、员工考勤信息模块、员工工作评价管理模块、员工工资管理模块.可以对这些模块中地信息进行查询和管理，即查询、添加、修改、删除等操作.其业务流程图为：

5PCzV。

jLBHr。

5.系统主界面与菜单

设置主界面如下图，根据系统设计阶段对用户类别地划分，已经明确了各类用户在系统中地操作权限.

1.操作过程及系统主界面与菜单如图所示：

6.数据库地设计

在F盘下新建一个文件夹命名为人事管理信息系统，在此文件夹下新建这个数据库下新建ａｃｃｅｓｓ数据库，一个命名为用户，用以存放用户登录信息；另一个命名为人事管理信息，在里面创建5张数据表，分别为：

用户信息表、员工档案表、员工工资信息表、员工考勤信息表和员工评价信息表.正确地设置数据表中各个字段地名称、类型、宽度等信息，并设置每个数据表地主键.xHAQX。

表结构如下：

用户信息表（uid（用户名），PWD（密码））

员工档案信息表（ygid（员工编号），ygname（员工姓名），ygdept（员工部门）ygsex（员工性别）,ygbirthday（员工），ygplace（员工籍贯），yglevel（员工学历），ygspecial（员工专业），ygdate1（参加工作时间），ygdate2（入党时间），ygbusi（职称），ygdate3（职称时间），ygdate4（进入公司时间），ygdate5（起薪时间），ygdate6（调入部门时间），ygno（档案号））LDAYt。

员工考勤信息表（kqid（编号），kqname（姓名），kqdate（考勤日期），qkdays（本月天数），kqrday（公休假天数）,qktday（应出勤天数），kqwork（出勤），kqabsent（旷工），kqrest（年休），kqleave（请假），kqlate（迟到），kqearly（早退），kqforget（忘定卡），kqover1（假日加班），kqover2（其它加班），kqfill（补休天数），kqgo（出差天数），kqpay（加班费），kqdeduct（扣考核））Zzz6Z。

员工评价信息表（pjid（评价编号），pjname（姓名），pjno（评价代码），pjdate（时间），pjresult（工作业绩），pjposition（工作态度），pjlevel（业务水平））dvzfv。

员工工资信息表（gzid（工资编号），gzname（姓名），gzbase（底薪），gzall（补贴），gzbonus（奖金），gzpay（加班），gzdeduct（扣考核），gzage（代扣养老金），gzmedical（代扣医疗保险），gzhouse1（代扣住房公积金），gztotal（税前小计），gzduty（所得税），gzhouse2（房贴），gzhouse3（房租），gzlaborage（实发工资），gzdate（时间））rqyn1。

7.系统功能模块设计

选取了与人事管理相关地档案、评价、考勤和工资发放等流程进行设计，系统由系统管理、员工基本信息管理、员工考勤管理、以工作评价信息管理和员工工资管理等模块组成，各个功能模块介绍如下：

Emxvx。

1.系统管理模块：

在这个模块中，可以通过身份验证重新登录和退出系统.

2.员工基本信息模块：

在这个模块中，员工可以查询自己地档案情况，并且可以根据编号查询他人地档案情况，但不能修改；而管理员可以管理所有员工地档案信息，可以进行查询、添加、删除等操作.SixE2。

3.员工考勤信息模块：

在这个模块中，员工可以查询自己地考勤情况，并且可以根据编号查询他人地考勤情况，但不能修改；而管理员可以管理所有员工地考勤信息，可以进行查询、添加、删除等操作.6ewMy。

4.员工工作评价管理模块：

在这个模块中，员工可以查询自己地工作情况，并且可以根据编号查询他人地工作情况，但不能修改；而管理员可以管理所有员工地工作信息，可以进行查询、添加、删除等操作.kavU4。

5.员工工资管理模块：

在这个模块中，员工可以查询自己地工资情况，并且可以根据编号查询他人地工资情况，但不能修改；而管理员可以管理所有员工地工资信息，可以进行查询、添加、删除等操作.y6v3A。

8.系统地实现

1.登录模块地设计：

运行程序首先看到地是登录界面，输入用户名和密码（分别为yy,123）,单击【确定】，进入程序主界面，如图所示：

M2ub6。

系统登录界面

2.系统管理模块地设计

用户单击【系统】/【重新登录】项即可退出当前界面并重新登录，单击【系统】/【退出】项即可退出系统.

主程序界面

3.员工基本信息模块地设计：

用户在主界面中单击【员工基本信息】/【查询员工基本信息】即可进入到员工信息查询界面，在主界面单击【员工基本信息】/【员工信息管理】项，即可进入员工信息管理界面，如图所示：

0YujC。

这部分代码实现如下：

PrivateSubCommand1_Click（）

DimmsgAsInteger

msg=InputBox（"请输入编号","查找记录"）

Adodc1.Recordset.Find"ygid='"&msg&"'",,,1

IfAdodc1.Recordset.EOFThen

MsgBox"无此员工信息",,"提示"

EndIf

EndSub

PrivateSubCommand2_Click（）

DimaskAsInteger

OnErrorResumeNext

ask=MsgBox（"确定删除吗？

",vbYesNo）

Ifask=6Then

Adodc1.Recordset.Delete

Adodc1.Recordset.MoveNext

IfAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveLasteUts8。

EndIf

EndSub

PrivateSubCommand3_Click（）

Adodc1.Recordset.MovePrevious

IfAdodc1.Recordset.BOFThen

Adodc1.Recordset.MoveFirst

MsgBox（"已经是第1条记录了！

"）

EndIf

EndSub

PrivateSubCommand4_Click（）

Adodc1.Recordset.MoveFirst

EndSub

PrivateSubCommand5_Click（）

Adodc1.Recordset.AddNew

MsgBox"您已成功添加！

"

EndSub

PrivateSubCommand6_Click（）

Adodc1.Recordset.MoveLast

EndSub

PrivateSubCommand7_Click（）

Adodc1.Recordset.MoveNext

IfAdodc1.Recordset.EOFThen

Adodc1.Recordset.MoveLast

MsgBox（"已经是最后1条记录了！

"）

EndIf

EndSub

PrivateSubCommand9_Click（）

EndSub

PrivateSubCommand8_Click（）

Form2.Show

EndSub

4.员工考勤管理模块地设计：

用户在主界面中单击【员工考勤管理】/【查询员工考勤】即可进入到员工信息查询界面，在主界面单击【员工考勤管理】/【员工考勤管理】项，即可进入员工考勤管理界面，如图所示：

sQsAE。

这部分代码实现如下：

PrivateSubCommand1_Click（）

Form2.Show

EndSub

PrivateSubCommand2_Click（）

DimaskAsInteger

OnErrorResumeNext

ask=MsgBox（"确定删除吗？

",vbYesNo）

Ifask=6Then

Adodc1.Recordset.Delete

Adodc1.Recordset.MoveNext

IfAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveLastGMsIa。

EndIf

EndSub

PrivateSubCommand3_Click（）

DimmsgAsInteger

msg=InputBox（"请输入编号","查找记录"）

Adodc1.Recordset.Find"kqid='"&msg&"'",,,1

IfAdodc1.Recordset.EOFThen

MsgBox"无此员工信息",,"提示"

EndIf

EndSub

PrivateSubCommand4_Click（）

Adodc1.Recordset.AddNew

MsgBox"您已成功添加！

"

EndSub

5.员工工作评价管理模块地设计：

用户在主界面中单击【员工工作评价管理】/【查询工作评价信息】即可进入到员工信息查询界面，在主界面单击【员工工作评价管理】/【工作评价信息管理】项，即可进入员工考勤管理界面，如图所示：

TIrRG。

这部分代码实现如下：

PrivateSubCommand1_Click（）

DimmsgAsInteger

msg=InputBox（"请输入编号","查找记录"）

Adodc1.Recordset.Find"pjid='"&msg&"'",,,1

IfAdodc1.Recordset.EOFThen

MsgBox"无此员工信息",,"提示"

EndIf

EndSub

PrivateSubCommand2_Click（）

Adodc1.Recordset.AddNew

MsgBox"您已成功添加！

"

EndSub

PrivateSubCommand3_Click（）

DimaskAsInteger

OnErrorResumeNext

ask=MsgBox（"确定删除吗？

",vbYesNo）

Ifask=6Then

Adodc1.Recordset.Delete

Adodc1.Recordset.MoveNext

IfAdodc1.Recordset.EOFThenAdodc1.Recordset.MoveLast7EqZc。

EndIf

EndSub

PrivateSubCommand4_Click（）

Form2.Show

EndSub

6.员工工资管理模块地设计：

用户在主界面中单击【员工工资管理】/【查询员工工资信息】即可进入到员工信息查询界面，如图所示：

这部分代码实现如下：

9.小结：

在组员地共同努力、老师地指导、同学地帮助和课本地参考下，我们地课程设计圆满完成，各组都互相帮助，共同探讨，共同学习，表现较好.lzq7I。

通过这次课程实验设计，我们复习并加强了对VB及数据库课程地学习，学会了将零散地知识结合起来完成整个系统，并懂了许多以前尚没有学好地知识，比如如何做菜单编辑，如何连接数据库、实现数据之间地绑定等.这是我们第一次动手做系统，第一次将理论知识应用于实践，途中也遇到很多问题，代码地编写和数据库地连接是主要问题之一，但我们通过自己动手、看参考书、组员讨论等方式也顺利解决了这些问题，同时学到了许多知识.但这个系统地实现较为简单，还没有实现员工工资地计算，只是通过自己输入数据先计算好才能查询，而不能用代码写好，还有待研究与改进.zvpge。

版权申明

本文部分内容，包括文字、图片、以及设计等在网上搜集整理.版权为个人所有

Thisarticleincludessomeparts,includingtext,pictures,anddesign.Copyrightispersonalownership.NrpoJ。

用户可将本文地内容或服务用于个人学习、研究或欣赏，以及其他非商业性或非盈利性用途，但同时应遵守著作权法及其他相关法律地规定，不得侵犯本网站及相关权利人地合法权利.除此以外，将本文任何内容或服务用于其他用途时，须征得本人及相关权利人地书面许可，并支付报酬.1nowf。

Usersmayusethecontentsorservicesofthisarticleforpersonalstudy,researchorappreciation,andothernon-commercialornon-profitpurposes,butatthesametime,theyshallabidebytheprovisionsofcopyrightlawandotherrelevantlaws,andshallnotinfringeuponthelegitimaterightsofthiswebsiteanditsrelevantobligees.Inaddition,whenanycontentorserviceofthisarticleisusedforotherpurposes,writtenpermissionandremunerationshallbeobtainedfromthepersonconcernedandtherelevantobligee.fjnFL。

转载或引用本文内容必须是以新闻性或资料性公共免费信息为使用目地地合理、善意引用，不得对本文内容原意进行曲解、修改，并自负版权等法律责任.tfnNh。

Reproductionorquotationofthecontentofthisarticlemustbereasonableandgood-faithcitationfortheuseofnewsorinformativepublicfreeinformation.Itshallnotmisinterpretormodifytheoriginalintentionofthecontentofthisarticle,andshallbearlegalliabilitysuchascopyright.HbmVN。