人事管理系统1论文.docx
- 文档编号:26026175
- 上传时间:2023-06-17
- 格式:DOCX
- 页数:24
- 大小:523.51KB
人事管理系统1论文.docx
《人事管理系统1论文.docx》由会员分享,可在线阅读,更多相关《人事管理系统1论文.docx(24页珍藏版)》请在冰豆网上搜索。
人事管理系统1论文
管理学院人事管理系统的设计与实现
摘要:
本文论述了管理学院人事管理系统的基本开发目的、涉及人事管理系统的功能需求和分析方法,详细介绍了如何使用VisualBasic6.0实现人事管理系统中一些重要的功能,并且给出了一些可重用性强的代码,这些代码只要稍加修改即可用语有类似功能的其他系统中。
关键词:
人事管理系统;数据库;分析;设计;表;代码
Abstract:
Thisisthearticleofanalysisthepersonnelmanagementsystemof,includingitsimportantdemandandfunctions.ThearticleshowsthedetailhowtoimplementsomeimportantfunctionswithVisualBasic6.0,andgivessomereusablecodes,withsomechangethiscodecaneasilybeusedinothersystemswhichhavethesimilarfunction.
Keyword:
Personnelmanagementsystem;Database;Analysis;Design;Table;Code
目录
一、引言┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
(一)开发背景┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
(二)系统硬软件环境┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
1系统运行环境┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
2开发工具┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
二、需求分析及可行性研究┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
(一)需求分析┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉1
(二)可行性研究┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉2
三、总体设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉2
(一)数据库设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉2
1表┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉2
2权限设置┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉3
(二)功能划分┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉4
1查询系统┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉4
2管理系统┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉4
(三)系统流程图┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉5
四、各个模块功能的设计与实现┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉5
(一)登陆界面设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉5
(二)运行主界面设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉7
(三)查询系统设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉8
1个人信息查询┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉8
2单位信息查询┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉8
3教学情况┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉8
(四)管理系统设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉9
1数据处理┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉9
2人员基本信息录入┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉11
3职务(或职称)变动录入┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉11
(五)用户管理设计┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉13
五、结束语┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉15
参考文献┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉16
附录┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉┉17
一、引言
(一)开发背景
随着计算机技术、网络技术和信息技术的发展,现在办公系统更趋于系统化、科学化和网络化。
网络办公自动化系统是计算机技术和网络迅速发展的一个办公应用解决方案,它的主要目的是实现信息交流和信息共享,提供协同工作的手段,提高办公的效率,让人们从繁琐的有纸办公中解脱出来。
现在许多的机关单位的人事管理水平还停留在纸介质的基础上,这样的机制已经不能适应时代的发展,因为它浪费了许多人力和物力,在信息时代这种传统的管理方法必然被计算机为基础的信息管理所取代。
本系统就是基于本学院的人事管理而设计的,是对学院的人事资料进行管理,为人事管理人员提供了一套操作简单、使用可靠、界面友好、易于管理和使用的处理工具。
本系统对人事各种数据进行统一处理,避免数据存取、数据处理的重复,提高工作效率,减少了系统数据处理的复杂性。
本系统不仅使学院人事管理人员从繁重的工作中解脱出来,而且提高了人事管理的效率,提高了人事管理的科学性,方便了用户查询、管理人员进行管理。
(二)系统软硬件环境
1、系统运行环境
系统要具有查询和数据处理功能,系统运行环境MicrosoftWindows98以上,要求服务器最低配置:
CPU:
IntelPentiumⅡ
内存:
128M
硬盘:
10G
网卡:
10M/100M
2、开发工具
系统开发工具采用VisualBasic6.0,后台数据库为access2000。
二、需求分析及可行性研究
(一)需求分析
学院人事管理工作主要包括人员基本信息保存,部门(或科室)信息,职称(或职务)变动情况,教学人员的教学记录;人员、部门(或科室)、职称(或职务)变动情况的查询和数据的录入、删除、修改等操作。
这就要求所开发的管理系统具备基本的数据库功能如增添、删除、修改、查询以外,还应具备对大量原始数据进行自动检索整理并提取有用信息的更高层次的自动化功能以提高办公效率。
为此,我们决定采用VisualBasic6.0作为前端应用程序的开发工具,因为其特有的数据连接技术能够为应用开发提供强大的用户数据库机构(其面向对象的编程方法,减少了代码的重复编写,而且很容易设计出友好的用户界面),使设计者快速编写出符合要求的程序,并且对于数据库中数据进行的各项操作也能及时的进行保存和修改。
另外,人事管理工作范围涉及整个学院,需要处理的数据量不是特别庞大复杂,所以小型的MB级DBMS如access就可以胜任此项工作,不需要选择大型的数据库系统浪费资源。
因此我们选择Microsoft公司的office2000的access2000作为后端数据库的DBMS支持。
(二)可行性研究
此项管理系统的开发任务是作为毕业设计课题进行的,故不存在开发费用问题,可行性研究的主要方面应放在开发进度的控制上。
此人事管理系统初期开发目标是能够在本学院内得到应用,其使用、管理范围仅限于学院,属中小型数据库管理系统应用开发。
借助VisualBasic6.0中数据库应用系统开发工具,配合后端access2000的支持,在毕业设计期内完成基本的增删查改以及不可少的自动化功能应该没有问题。
另外,为了便于日后的系统维护以及在此基础上进行功能扩充和升级,开发过程中应保持良好的代码书写风格并注意编写详细的技术说明文档。
本系统中VB和数据库access2000连接是通过VB中的ADO实现的。
ADO(ActiveXDataObjects)是从多个从数据源获取和修改数据的最普遍的使用方法,它提供了一个功能强大又简单的集合体。
ADO是通用数据访问(UDA,UniversalDataAccess)战略的核心技术之一。
它就是使用一种编程方式获得任何地方的任何数据,而这些数据源往往很复杂。
基于以上ADO的特性,我们选择ADO作为我们程序与数据库连接的方式。
三、总体设计
(一)数据库设计
人事管理系统总体设计中最重要的阶段是数据库的设计,引文数据库表项是否完备,表项间的关系是否合理直接影响到系统后期应用程序能否顺利开发。
1、表
数据库中的数据表分为:
人事基本信息表,部门表,科室表,教学记录表,职称变动表,职务变动表,用户管理。
(各表内各字段的具体设置见附录)(科室表内容如图一)
(1)人事基本信息表
用于保存人员的所有人事方面的信息,包括人员基本信息、联系方式、工作单位等信息以及简介、奖惩状况等信息。
此表是人事管理系统中最主要的表,每个人员的基本情况都在此表中都有记录。
(2)部门表
用于保存部门信息,包括部门编号、部门名称和部门类别。
(3)科室表
用于保存科室信息,包括科室编号、科室名称、所属部门名称。
(4)教学记录表
用于保存教学人员的教学情况,包括人员编号、人员姓名、教学时间、课程名称。
(5)职称变动表
用于保存教学人员的职称变动信息,包括人员姓名、时间、原现职称等信息。
(6)职务变动表
用于保存行政人员的职务变动信息,包括人员姓名、时间、原现职务等信息。
(7)用户管理
用于保存人事管理系统中使用用户的姓名、密码、用户权限。
用户权限分为普通用户和管理人员。
其中普通人员是可以进行查询操作和更改自己密码;管理人员是可以进行查询操作,数据库中各表的添加、删除、浏览和修改等数据处理,添加、删除用户等用户信息的操作。
图一
2、权限设置
用户管理表的用户权限分为管理人员和普通用户(数据库表内保存为0和1)。
管理人员可以添加、修改、删除记录,可以添加或删除用户。
普通用户只能进行数据查询操作。
(二)功能划分
通过对学院人事管理工作的特点及其需求进行认真分析,我们总结出人事管理系统的两个核心:
一个是关于人事管理的各类信息的查询操作,另一个是关于人事管理中的各类数据的处理操作。
基于以上分析结果,我们决定将本系统按其管理的不同方面划分成两个部分:
1、查询系统
对于人事管理中的所有的信息可以进行分类查询。
2、管理系统
对于人事管理中的所有的信息可以进行浏览、增添、删除、修改等基本的管理功能。
并且对于数据管理中并不是所有的
另外,作为整个学院的人事管理系统,其安全性不容忽视。
所以上述的两大部分的功能不能对任何使用者无条件开放。
因此,系统中拟设定两类权限:
普通用户和管理人员。
普通用户:
只拥有查询数据表中数据的权力。
管理人员:
拥有对数据表中数据的查询以及数据处理的权力。
并且拥有添加或删除用户的权力。
(三)系统流程图
图二
四、各个模块功能的设计与实现
(一)登录界面设计
启动人事管理系统,在输入框里输入用户名称和用户密码,完成登录操作进入该系统的菜单主界面。
根据用户的使用权限,普通用户可以使用查询系统下拉菜单里的各项功能,和用户管理下拉菜单的修改密码功能;管理人员可以使用查询系统、管理系统以及用户管理下拉菜单中的所有功能。
(登录界面如图三)其确定按钮的程序代码如下:
PrivateSubCommand1_Click()
Adodc1.RecordSource="select*from用户管理where用户姓名=
'"&Text1.Text&"'"
Adodc1.Refresh
IfText1.Text=""OrText2.Text=""Then
a=MsgBox("用户姓名或密码不能为空!
",,"错误!
")
Else
IfAdodc1.Recordset.EOFThen
a=MsgBox("不存在此用户!
",,"错误!
")
Else
IfAdodc1.Recordset.Fields("用户密码")=Text2.TextThen
quanxian=Adodc1.Recordset.Fields("用户权限")
Form1.Show
xingming=Text1.Text
UnloadMe
Else
a=MsgBox("用户密码不正确!
",,"错误!
")
EndIf
EndIf
EndIf
EndSub
注:
程序中的quanxian和xingming定义为两个全局变量,用于记录用户的权限和用户姓名,在载入主界面时,根据权限不同设置用户可以使用的功能。
此程序首先是不允许用户姓名或用户密码为空,否则报错。
然后判断是否存在此用户名和密码,如果用户名和密码正确,根据数据库中用户管理表中记录的用户权限显示用户可以使用的系统功能。
如果用户姓名或是用户密码错误,否则报错。
图三
(二)运行主界面设计
我们在进行菜单主界面设计时,采用下拉菜单式。
主要分为三个功能模块:
查询系统、管理系统、用户管理。
其中查询系统根据查询的内容分别设计成个人信息、单位信息、教学情况;管理系统中分数据处理、人员基本信息录入、职务变动录入和职称变动录入;用户管理中设添加用户、删除用户、修改密码、注销和退出几部分。
(主界面如图四)
因为在人事管理系统中,人事基本信息是整个人事管理的主要部分,所以人员信息的录入是重要而且工作量较大的工作。
所以人员信息的录入我们专门做成一个菜单选项可以进行单独操作,使得大量的人员信息录入操作简单方便。
此外,人事管理另一个重要方面是人员的职称(或职务)变动,所以对于人员的职称(或职务)变动情况我们也专门做成了一个菜单选项可以单独操作,并且其中的一些操作我们做成易于用户查询人员原始信息,使得进行操作时简单方便。
图四
(三)查询系统设计
该功能模块包括个人信息、单位信息和教学情况三个部分,其中个人信息包括个人基本信息、教学记录、职务变动、职称变动几个查询;单位信息包括部门表和科室表的查询;教学情况是查询课程信息的。
(例:
图五为按所属部门编号查询科室信息)
1、个人信息查询
个人基本信息查询中可以选择人员编号,或是人员姓名、性别、职称、具体科室等不同的一个条件或几个条件组合查询,然后在输入框里输入想要查询的条件,按确定按钮就可以查询出人事基本信息表中符合条件的人的所有信息,查询结果将在本界面下方显示。
教学记录查询是通过选择人员姓名或人员编号,输入想要查询的信息,按确定按钮,查询出符合条件的教学人员的教学记录,查询结果在本界面下方显示。
职务变动查询和职称变动查询可以分别通过选择人员姓名、单位、职务(或职称)、时间等某一条件进行查询,输入查询条件,然后按确定按钮查询结果将在界面下方显示。
2、单位信息查询
可以通过输入部门(或科室)名称、编号等方式,然后输入查询条件,查询出部门信息(或科室信息)将在本界面下方显示。
3、教学情况
可以通过输入课程名称或课程时间进行查询,查询结果将在本界面下方显示。
图五
(四)管理系统设计
管理系统模块中包括数据处理,人员信息录入,职务变动录入,职称变动录入。
其中数据处理是可以对人员基本信息表进行浏览和部门表、科室表、教学记录表进行数据处理的。
人员信息录入是人员基本信息的录入,记录将保存在数据库的人员基本信息表里。
职务(或职称)变动录入是将有职务(或职称)变动的人员的信息保存在数据库的职务(或职称)表中的。
因为职务(或职称)变动表中的信息不允许删除、修改,所以没有做关于职务(或职称)的删除和修改功能的操作。
1、数据处理
管理人员可以通过管理系统中的数据处理对数据库中人员基本信息表、部门表、科室表、教学记录表这几个表中的数据进行处理,处理包括对表或是表内某一记录的浏览,在表中添加记录,对表中某一记录进行修改或是删除的操作。
其中人员基本信息表是只允许浏览表和浏览、删除记录而不允许添加记录和修改记录,人员基本信息表的添加记录的操作在人员信息录入中完成。
进行操作时首先要选择所要操作的表,选定表后可以进行浏览表和添加记录的操作(例:
图六为修改教学记录表中某一条记录)。
要对表中某条记录进行操作可以按界面提示选择出符合条件的记录进行浏览、删除和修改的操作。
其选择记录按钮、确定按钮、删除记录按钮、修改记录按钮的程序代码如下:
(1)选定表,选择要操作的字段名称
PrivateSubCommand3_Click()
Adodc1.RecordSource="select*from"&Combo1.Text&""
Adodc1.Refresh
a=Combo2.ListCount
Ifa<>0Then
Fori=0Toa-1
Combo2.RemoveItem0
Nexti
EndIf
ForEachiInAdodc1.Recordset.Fields
Combo2.AddItemi.Name
Nexti
'把表中的字段名称列在combo2里
EndSub
注:
代码中条件循环是用于在用户进行第二次操作时清除前面操作所显示的内容。
(2)选定字段后,选择所需记录
PrivateSubCommand4_Click()
DimzdAsString
zd=Combo2.Text
Adodc1.RecordSource="select"&zd&"from"&Combo1.Text&""
Adodc1.Refresh
a=Combo3.ListCount
Ifa<>0Then
Fori=0Toa-1
Combo3.RemoveItem0
Nexti
EndIf
WhileNotAdodc1.Recordset.EOF
Combo3.AddItemAdodc1.Recordset.Fields(zd)
Adodc1.Recordset.MoveNext
Wend
'把记录列在combo3里
EndSub
(3)删除记录
PrivateSubCommand6_Click()
a=MsgBox("确实要删除此条纪录吗?
",1,"a")
Ifa=1Then
Adodc1.RecordSource="select*from"&Combo1.Text&"where"&Combo2.Text&"='"&Combo3.Text&"'"
Adodc1.Refresh
DataGrid1.AllowAddNew=False
DataGrid1.AllowDelete=True
DataGrid1.AllowUpdate=True
Adodc1.Recordset.Delete
EndIf
EndSub
(4)修改记录
PrivateSubCommand7_Click()
IfCombo1.Text="人事基本信息表"Then
a=MsgBox("人事基本信息表不允许修改记录!
",,"注意!
")
Else
DataGrid1.AllowAddNew=False
DataGrid1.AllowDelete=False
DataGrid1.AllowUpdate=True
EndIf
EndSub
注:
如果选择的是人事基本信息表则不允许进行修改记录。
只允许进行前边的浏览和删除操作。
因为人事基本信息表中的很多项内容是不允许随便修改的。
例如职务(或职称)变动是不能在人事基本信息表中直接修改的,而是在职务(或职称)变动表中记录后再在人事基本信息表中自动更改。
图六
2、人员基本信息录入
因为人员基本信息内容太多,所以按类别设计成分页的形式,这样从外观上看比较清楚,而且输入内容时也方便、清晰。
人员基本信息中性别、部门名称、科室名称、职务名称、职称名称和是否是合同制设计成列表的形式。
用户可以根据人员的情况选择列表中的内容,但不允许自己输入信息,以防止输入的信息不正确或是不符合规定。
3、职务(或职称)变动录入
职务(或职称)变动录入是通过人员姓名或人员编号选择出职务(或职称)变动的人员,按确定按钮后人员的职务(或职称)信息会自动的显示出来,然后输入新的信息,按保存按钮后人员的职务(或职称)变动信息将保存在职务(或职称)变动表里,并且更改后的信息也将自动保存在人员基本信息表里,。
(例:
图七为职务变动录入)其中确定按钮和保存按钮的程序代码如下:
(1)确定
PrivateSubCommand1_Click()
IfOption2.Value=TrueThen
Adodc1.RecordSource="select*from人事基本信息表where人员编号='"&Combo2.Text&"'"
Adodc1.Refresh
IfNotIsNull(Adodc1.Recordset.Fields("职务名称"))Then
Text1.Text=Adodc1.Recordset.Fields("职务名称")
Text2.Text=Adodc1.Recordset.Fields("任命时间")
EndIf
Else
Adodc1.RecordSource="select*from人事基本信息表where人员姓名='"&Combo1.Text&"'"
Adodc1.Refresh
IfNotIsNull(Adodc1.Recordset.Fields("职务名称"))Then
Text1.Text=Adodc1.Recordset.Fields("职务名称")
Text2.Text=Adodc1.Recordset.Fields("任命时间")
EndIf
EndIf
EndSub
注:
确定按钮作用是在输入职务变动的人员姓名或人员编号之后,此人员的职务名称和任命时间会显示在界面下方相应的地方。
(2)保存
PrivateSubCommand3_Click()
Adodc1.Recordset.Fields("职务名称")=Text3.Text
Adodc1.Recordset.Fields("开始时间")=Text4.Text
ming=Adodc1.Recordset.Fields("人员姓名")
bianhao=Adodc1.Recordset.Fields("人员编号")
Adodc1.Recordset.Update
Adodc1.Recordset.Close
'把改动后的信息保存在人事基本信息表里
Adodc1.RecordSource="select*from职务变动表where人员编号='"&bianhao&"'"
Adodc1.Refresh
IfAdodc1.Recordset.EOFThen
Adodc1.Recordset.AddNew
EndIf
Adodc1.Recordset.Fields("人员编号")=bianhao
Adodc1.Recordset.Fields("人员姓名")=ming
Adodc1.Recordset.Fields("开始时间")=Text2.Text
Adodc1.Recordset.Fields("结束时间")=Text4.Text
Adodc1.Recordset.Fields("原职务名称")=Text1.Text
Adodc1.Recordset.Fields("现职务名称")=Text3.Text
Adodc1.
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 人事管理系统 论文