人事信息管理系统.docx
《人事信息管理系统.docx》由会员分享，可在线阅读，更多相关《人事信息管理系统.docx（29页珍藏版）》请在冰点文库上搜索。
人事信息管理系统
人事信息管理系统
《数据库原理与应用》
课程设计
题目人事信息治理系统
院（系）信息工程学院
专业班级2011级计科本1班
学生姓名任王
项我
学号1142151118、27、28、30
1042151130
设计地点信息工程学院
指导教师胡贤
起止时刻：
2013年12月23日至2014年1月4日
《数据库原理与应用》课程设计任务分配
院（系）：
信息工程学院教研室：
软件教研室
课程设计题目
人事信息治理系统
课程设计目的
《数据库原理与应用》课程设计是运算机类专业的集中实践性环节之一，是课程教学中的一项重要内容，是完成教学打算达到教学目标的重要环节，是关心学生全面牢固地把握课堂教学内容、培养学生分析咨询题、解决咨询题的能力进行的一次全面的综合练习。
通过结合设计题目进行综合性应用，对所学知识达到融会贯穿的程度，对提升学生的综合素养具有重要的意义。
1、加深对数据库基础理论和差不多知识的明白得。
2、把握数据库设计与使用的差不多方法。
3、提升运用数据库解决实际咨询题的能力
小组成员及任务分配
姓名
学号
承担任务
是否组长
王
1142151127
概要设计，详细设计和编码
是
任
1143151118
数据库设计
否
王
1042151130
约束和规则
否
王
1142151128
查阅和收集文献
否
项锐
1142151130
撰写报告
否
摘要
随着运算机信息技术的飞速进展，人类进入信息时代，社会的竞争越来越猛烈，人事信息治理系统就越显示出其不可或缺性。
人事信息治理系统在现代社会中的应用十分广泛，它是利用VB开发的基于windows的小型数据库治理软件。
后台数据库的设计采纳SQLserver2000，这些流行软件的应用也使系统更容易爱护。
该系统使用结构化方法，按照系统调查、系统分析、系统设计、系统实施的步骤，采纳结构化的编程方法而完成的。
在设计中，关于系统总体方案的设计，专门是数据窗口这一方便而简洁操纵数据库的智能化对象,从而建立一套完善科学的治理信息系统，对职员的差不多信息、教师信息、科研信息等实现全面、动态、及时的治理。
因此，该设计的方案差不多上满足了系统的需求，具有一定的可用性。
[6]
关键词：
数据表，系统分析，结构
1绪论
1.1背景讲明
最初的人事信息治理，差不多上靠人力来完成的。
但近几年我国企业经营规模日趋扩大，人员的大幅度增加，而且许多企业正在查找新的突破，向多样化进展。
认识信息需要处理大量的信息，还要时刻更新人员的信息，持续添加人员信息，并对各种信息进行统计分析。
因此，在企业治理中引进现代化的办公软件，实现人事信息的治理和可操纵，从而方便进行行业的治理和调配，为企业和学校治理人员解除后顾之忧。
[1]
1.2设计目标
开发那个系统的目的确实是关心人事信息治理部门提升工作效率。
通过本治理系统软件，能关心企业工作人员利用运算机，极为方便的对人员的有关数据进行治理、输入、输出、查找、修改等有关操作，使人员的数据信息能够具体化、直观化、合理化等。
[3]
人事信息治理系统能减少专门多不必要的时刻，不用像往常那样用冗余的纸张式治理。
大大节约了治理人员的工作量以及时刻，而且不易出错，同时运算机的储备与系统快速查询功能大大提升了，提升治理人员的效率。
本系统方便快捷的操作界面，提升了企业与学校工作效率。
[2]
1.3设计目的
1．把握数据库设计的一样方法，要紧包括需求分析，系统设计的组织与实施，设计出完整的数据库结构。
2.数据库查询系统的编程技术，并能独立设计，完成一样查询语句的设计及调试运行等工作。
3.培养把所学知识运用到具体对象，并能求出解决方案的能力。
4.运用开发工具VB为前台，SQLSERVER2000为后台,前后台的结合开发的人事信息治理系统。
[4]
2需求分析
2.1项目打算
2.1.1系统开发目的
（1）大大提升企业的运作效率；
（2）通过全面的信息采集和处理，提升企业的决策水平；
（3）使用本系统，能够迅速提升企业的治理水平，为降低经营成本，提升效益，提供有效的技术保证。
2.1.2应用背景
目前，在国内外各大企事业单位中，人事治理系统的使用是专门广泛的。
同时，有专门多的软件开发商也开发了许多基于各种行业的企业人事治理学系统，其中有单机版的，也有C/S和B/S模式的。
而不同的企业具有不同的人事治理制度，这就决定了不同的企业需要不同的人事治理系统。
[5]而且，企业治理信息量大、操作繁琐、传统的方式不再适应新的工作需要，开发研制适合企业的人事治理系统，使其具有整体性强、流程简单、操作方便、功能丰富和通用性强等特点，是加快企业人才治理工作办公自动化、信息资源化和治理科学化建设进程必要途径。
因此建立适合企业的治理信息系统，是促进企业信息高速公路的进展，为企业的进展提供条件的重要课题。
然而关于有些中小企业来讲，不需要大量的数据库，因此我们的目标是开发一个功能使用，操作简单的人事治理系统。
[7]
2.1.3应用范畴
本系统适应于各种中小型企业和学校。
2.2系统处理流程
1．通过验证后，对系统进行初始化；
2.进入系统，通过事件驱动机制激活相应的功能模块，并执行相应的功能；
3.通过关闭系统事件，激活关闭系统模块，退出系统。
系统处理流程如图所示：
否
是
否否
是是是
图2.1系统登录流程图
2.3系统功能模块分析
通过对上面有关人事信息治理的功能需求分析以后，可知人事信息治理系统的功能有：
职员信息治理，教师信息治理，科研信息治理。
系统功能菜单按以下方法进行设计。
2.3.1系统功能菜单要求
本系统要求对人事信息的治理，其中包括：
（1）登录治理
（2）职员治理
（3）教师治理
（4）科研治理
其中职员治理包括：
查询，添加，删除，修改；教师治理包括查询，添加，删除，修改；科研治理包括查询，添加，删除，修改。
2.3.2系统功能设计分析
职员治理：
职员信息的查询、添加、删除、修改。
图2.2职员治理ER图
教师治理：
教师信息的查询、添加、删除、修改。
图2.3 教师治理ER图
科研治理：
科研信息的查询、添加、删除、修改。
图2.4 科研治理ER图
3数据分析与建模
3.1功能模块简介
3.1.1系统功能爱护模块
用户治理：
设定本系统的系统操作员，能够一个也能够多个治理员。
口令治理：
在不退出系统的情形下，凭借个人的编号，能够修改个人的有关信息。
退出系统：
在使用完系统之后，能够退出系统。
3.1.2差不多资料治理模块
职员信息治理：
职员信息的查询、添加、删除、修改。
教师信息治理：
教师信息的查询、添加、删除、修改。
科研信息治理：
科研信息的查询、添加、删除、修改
数据治理：
对采集到的数据在后台进行数据库治理。
3.1.3人事信息治理模块
人员信息录入治理:
当有新人员入库的时候,分为以下几个步骤:
人员编号录入后台数据库，在人事信息治理模块中使人员编号与人员的姓名等有关信息相对应，储存之后,后台数据库中库存自动更新。
人员治理治理：
当人员流失时，库存自动减少。
3.1.4查询模块
能够按照某个条件进行查询，如:
编号\姓名等，查询人员的有关信息。
3.2系统E-R图
图3.1整个系统关系E-R
4数据库建立
4.1系统关系模型
（1）职员信息表（编号，姓名，性不，学历，毕业院校，职务，差不多工资，岗位津贴，应发工资）
（2）教师信息表（编号，姓名，性不，课程名称，课时）
（3）科研信息表（编号，姓名，研究方向，论文，职务）
4.2后台功能实现（SQLServer）
4.2.1用户表实现
用户表的建立：
图4.1所用表格的表属性
在各表中模拟输入数据
职员信息表内容
图4.2职员信息表的图
教师信息表内容
图4.3教师信息表图
教研信息表内容
图4.4教研信息表图
4.1.2用户储备过程的实现
图4.5用户储备过程图
4.1.3用户触发器的实现
图4.6用户触发器图
4.2前台功能实现（VisualBasic6.0）
4.2.1登录窗体的实现
图4.7登录窗口
5数据库应用开发
5.1连接数据库
通过ADO控件来连接数据库：
1）添加ADO控件，如图
图5.1ADO控件
2）更换ADO控件属性如图
图5.2设置AD0控件属性
5.2通过前台对后台操作
5.2.1人员信息查询
图5.3人员信息查询界面
人员信息查询代码：
PrivateSubCommand1_Click（）
Ifi=1Then
str1="select*from职员信息表where编号='"&Text1.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
Ifrs.EOFThen
MsgBox"该编号不存在"
Else
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndIf
EndIf
Ifi=2Then
str1="select*from教师信息表where编号='"&Text1.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
Ifrs.EOFThen
MsgBox"该编号不存在"
Else
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndIf
EndIf
Ifi=3Then
str1="select*from科研信息表where编号='"&Text1.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
Ifrs.EOFThen
MsgBox"该编号不存在"
Else
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndIf
EndIf
EndSub
1）职员信息的添加和删除
图5.4添加与删除职员信息
2）教师信息的添加和删除
图5.5添加与删除教师信息
3）科研人员信息的添加与删除
图5.6添加与删除科研人员信息
人员信息添加与删除代码：
PrivateSubCommand1_Click（）
str1="select*from职员信息表where姓名='"&Text1.Text&"'and编号='"&Text2.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,3
Ifrs.EOFThen
str1="select*from职员信息表where编号='"&Text2.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,3
Ifrs.EOFThen
rs.AddNew
rs（"姓名"）=Text1.Text
rs（"编号"）=Text2.Text
rs（"性不"）=Text3.Text
rs（"学历"）=Text4.Text
rs（"毕业学校"）=Text5.Text
rs（"职务"）=Text6.Text
rs（"差不多工资"）=Text7.Text
rs（"岗位津贴"）=Text8.Text
rs.Update
str1="select*from职员信息表"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
MsgBox"添加成功！
",64,"信息提示"
Text1.Text=""
Text2.Text=""
Text4.Text=""
Else
MsgBox"该课程已存在，请重新输入！
",16,"警告"
EndIf
Else
MsgBox"课程编号或名称输入不正确，请重新输入！
",16,"警告"
EndIf
EndSub
PrivateSubDataGrid1_Click（）
str1="select*from教师信息表"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndSub
PrivateSubDataGrid1_Click（）
str1="select*from科研信息表"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
EndSub
5.2.3人员信息修改
1）职员信息修改
图5.7修改职员信息
2）教师信息修改
图5.8修改教师信息
3）科研人员信息修改
图5.9修改科研人员信息
人员信息修改代码：
PrivateSubCommand2_Click（）
strsql="select*from职员信息表where姓名='"&Text1.Text&"'and编号='"&Text2.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstrsql,cn,1,3
Ifrs.EOFThen
cn.Execute（"update职员信息表set毕业学校='"&Text5.Text&"',姓名='"&Text1.Text&"'where编号='"&Text2.Text&"'"）
str1="select*from职员信息表"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
MsgBox"信息修改完成"
Else
MsgBox"没有那个职员",16,"警告"
EndIf
EndSub
PrivateSubCommand2_Click（）
strsql="select*from科研信息表where姓名='"&Text4.Text&"'and编号='"&Text1.Text&"'"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstrsql,cn,1,3
Ifrs.EOFThen
cn.Execute（"update科研信息表set研究方向='"&Text2.Text&"',论文='"&Text3.Text&"',姓名='"&Text4.Text&"'where编号='"&Text1.Text&"'"）
str1="select*from科研信息表"
Ifrs.State=1Then
rs.Close
EndIf
rs.Openstr1,cn,1,1
SetDataGrid1.DataSource=rs
DataGrid1.Refresh
MsgBox"信息修改完成"
Else
MsgBox"没有那个职员",16,"警告"
EndIf
EndSub
6总结
在此次课程设计的全过程中，我们对本学期所学的知识有了一个比较系统的认识和明白得。
进一步把握了数据库的方法和技术，提升软件开发的实际能力，培养综合分析、解决咨询题的能力。
涉及了各方面的知识，大大扩展了我们的知识面，同时使我们学会了如何使用所学的知识去解决一些实际咨询题。
在设计中，我们深知自己所把握的知识还远远不够，把握的一些理论知识应用到实践中去，总会显现如此或那样的咨询题，不是理论没把握好，而是光明白书本上的知识是远远不够的，一定要把理论知识和实践结合起来。
把学到的知识应用到实践中去，多做多练，才能够把理论的精华发挥出来。
知识不是明白、了解就好，一定要去应用它，进展它，让它在现实生活中得到充分的应用，从而解决一些咨询题，这才是学习的全然目的。
而且知识又不是单一的，它是互相联系的，学科与学科之间都有着内在的联系。
这次数据库课程设计经历了从选题、名目、摘要、前言、系统设计、需求分析到E-R图设计，再到关系模型设计，最后建立数据库。
在这其中我们组的每个成员通过查阅有关书籍，分工合作，进行了专门多次大大小小的扩充和修改，使数据库结构和内容更趋于完善。
通过这次课程设计，我们收益颇丰，感受深刻。
尽管我们这次做的设计可能不够好，然而为我对以后的数据库设计打下了专门好的基础。
在做这次课程设计的过程中，我们每个人都专门努力，尽管当中我们有过争吵与吵闹，然而最终我们达成了共识同时顺利地完成了此次工作。
7参考文献
[1]徐鹏，满娜，于艳杰主编。
SQLSERVER2008数据库基础及应用，中国水利水电出版社，2010。
[2]刘智勇，刘径舟等编著。
SQLSERVER2008宝典。
电子工业出版社，2011。
[7]数据库系统原理及应用教程，苗雪兰等编著，机械工业出版社，2008（2013.2重印）ISBN978-7-111-08594-2。
升级会员 