《数据库技术与应用》课程设计报告题目人事管理系统学生姓名专业计算机科学与技术班级学号2011年12月18日计算机科学与技术专业2目录一、设计并开发人事管理系统…………………………1二、需求分析……………………………………………2三、概念设计……………………………………………4四、逻辑设计……………………………………………6五、具体设计……………………………………………8六、程序使用说明………………………………………15七、小组分工及设计体会………………………………20计算机科学与技术专业3一、设计并开发人事管理系统一直以来人们使用传统人工的方式管理员工档案,这种管理方式存在着许多缺点,譬如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。人事管理信息系统的出现轻而易举的解决了传统管理人员档案的方法的缺点。伴随着人事管理信息系统的广泛应用,它已经成为了任何一家企业公司都不可缺少的组成部分,它的存在使得管理者更容易了解自己公司的员工,便于分配人员,易于进行调整。所以人事管理信息系统能够为管理人员提供充足的信息和快捷的查询手段。二、需求分析人事管理系统题目要求:1、基本信息包括:(1)人员基本信息:编号、姓名、性别、出生日期、参加工作日期住址、电话等;(2)来本单位的日期及来自的单位;(3)职称及评定的时间和工资级别;计算机科学与技术专业4(4)职工的奖惩登录;2、工资的确定:基本工资与职称和级别有关;职务补助、房补由职称决定;工龄津贴由工龄决定;洗理费由性别决定;另有每人奖金不同。3、查询员工的各项基本信息;4、查询每个职工的详细工资清单。5、用户管理:信息录入、工资计算的工作人员及普通职工查询自己的信息人事管理系统需求分析:设计内容:设计如下主要功能模块人事档案管理模块。人员薪酬管理模块。人员培训管理模块。各类报表生成模块。人员内部调动、离岗管理模块。人员奖惩情况管理模块。分析:1.登录2.工作人员职工管理:查询、更新编号、姓名、性别、出生日期、参加工作日期、住址、电话、来自本单位日期、来自的单位、职称。计算机科学与技术专业5奖惩登录。工资管理:查询、更新工资级别、基本工资、职务补助、房补、工龄津贴、洗理费、奖金。3.职工登录后,可以查询基本信息,查询来自的单位的日期及来自的单位,职称,评定的时间和工资级别。奖惩登录。查看详细工资的清单。系统流程图:登录验证管理员职工三、概念设计通过对数据库基本信息的分析,建立E-R图如下:管理职工信息管理工资奖惩个人信息查询查看工资清单管理报表人员培训管理查看个人奖惩计算机科学与技术专业6职称工资级别职称名管理员密码登录帐号职工编号姓名性别出生日期住址电话来自本单位的时间来自的单位参加工作日期基本工资评定时间职务补助房补工龄工龄津贴工龄年数评定计算奖惩编号1金额内容登陆培训培训时间编号经费计算机科学与技术专业7四、逻辑设计将E-R图进行总结、归纳,建立如下关系图:职工(编号姓名性别出生日期参加工作日期住址电话来自单位来自单位的时间职称名评定时间工龄年数编号1)职称(职称名工资级别基本工资职务补助房补)工龄(工龄年数工龄津贴)奖惩(编号1金额内容)管理员(登录帐号密码)五、具体设计1、表结构及数据词典的设计(1)总体结构人事管理系统共包含6个表,其结构如下:人事管理系统职工表职称表工龄表奖惩管理员表(2)表结构及数据词典(3)1)职工表表结构字段名称数据类型字段大小必填字段允许空字符计算机科学与技术专业8串编号varchar50是否姓名varchar50是是性别char10是是出生日期datetime8是是参加工作日期datetime8是是住址varchar50是是电话varchar50是是来自本单位的时间datetime8是是职称名varchar50是是评定时间datetime8是是编号1varvhar50是是数据词典编号=各职工的编号,1-50个字符或数字姓名=各职工的姓名,1-50个字符性别=各职工的性别,1-10个字符出生日期=各职工的出生日期,1-8个数字参加工作日期=各职工的工资日期,1-8个数字住址=各职工的住址,1-50个字符电话=各职工的电话,1-50个字符来自本单位的时间=各职工来单位的时间,1-8个数字职称名=各职工的职称名,1-50个字符评定时间=各职工的评定时间,1-8个数字——年、月、日编号1=奖惩登录编号,1-50个字符或数字2)职称表表结构字段名称数据类型字段大小必填字段允许空字符串职称名varchar50是否工资级别int4是是基本工资money8是是职务补助money8是是房补money8是是职称名=各职工的职称名,1-50个字符或数字工资级别=各职工的工资级别,1-4个字符基本工资=各职工的基本工资,1-8个数字职务补助=各职工的职务补助,1-8个数字房补=各职工的房补,1-8个数字计算机科学与技术专业93)工龄表表结构字段名称数据类型字段大小必填字段允许空字符串工龄年数varchar50是否工龄津贴money8是是工龄年数=各职工的工龄年数,1-50个字符或数字工资津贴=各职工的工资津贴,1-8个数字4)洗理费表结构字段名称数据类型字段大小必填字段允许空字符串性别varchar50是否金额money8是是性别=各职工的性别,1-50个字符或数字金额=各职工的金额,1-8个数字5)管理员表表结构字段名称数据类型字段大小必填字段允许空字符串登录帐号varchar50是否密码varchar50是是登录帐号=管理员的登录帐号,1-50个字符或数字密码=管理员的密码,1-50个字符或数字6)奖惩表结构字段名称数据类型字段大小必填字段允许空字符串编号1varchar50是否内容varchar50是是计算机科学与技术专业102、应用程序的模块图及模块分析(1)应用程序的模块图(2)模块分析人事管理系统共包含职工登陆模块、职工奖惩登录模块、管理员登录模块、查询模块和更新模块五个模块。1.职工登陆模块:模块内容:此模块包括职工姓名、职工编号的输入。模块功能:通过运行此模块,匹配输入正确的职工姓名和职工编号,则允许进入人事管理系统。2.职工奖惩登陆模块:模块内容:此模块包括职工编号的输入。模块功能:通过运行此模块,匹配输入正确的职工编号,则允许进入奖惩查看页面。3.管理员登录模块模块内容:此模块包括管理员登录帐号、密码的输入。模块功能:通过此模块,匹配的输入正确的管理员登录帐号和密码,则允许进入管理员操作页面。4.查询模块模块内容:此模块可以查看职工的详细信息和工资信息。模块功能:通过此模块,职工与管理员都可以完成相应的查询工作。职工可以查询自己的基本信息而管理员可以查询所有的职工信息。5.更新模块模块内容:此模块可以实现修改信息的功能。模块功能:此模块是对管理员应用的,管理员可以修改职工的个人信息等等。人事管理系统职工登陆模块查询模块更新模块职工奖惩登陆模块管理员登陆模块计算机科学与技术专业11六、程序使用说明使用人事管理系统,必须先输入员工号和密码,经确认后方可进入系统主界面进行操作。您可以选择使用菜单项进行操作,也可以直接点击相应的标签进入其他的功能使用。1、菜单项的使用(1)主页面:(2)进入系统之后,显示人员管理的主模块的功能,如下图计算机科学与技术专业12(3)可以进入职工页面具体查看职工个人信息。(4)点击人员档案管理模块,可以对人员进行操作计算机科学与技术专业13(5)进入添加修改可以对员工进行操作。(6)人员薪酬管理模块计算机科学与技术专业14(7)人员培训管理。(8)报表生成管理计算机科学与技术专业15(9)人员调动管理模块计算机科学与技术专业16(10)数据备份,恢复(10)人员奖惩情况主要代码:1,登录模块PrivateSubCommand1_Click()'登陆计算机科学与技术专业17'检测帐号密码是否为空IfText1.Text=ThenMsgBox帐号不能为空!,vbCritical,登陆错误ExitSubEndIfIfText2.Text=ThenMsgBox密码不能为空!,vbCritical,登陆错误ExitSubEndIf'连接数据库SetAdo_Conn=NewADODB.ConnectionSetAdo_RS=NewADODB.Recordsetstr_CS=Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=人事管理系统;DataSource=FREESKYC-FD1640str_RS=select*from管理员表where登录账号='&Trim(Text1.Text)&'SqlConnectAdo_Conn,Ado_RS,str_CS,str_RS'检测帐号是否存在IfAdo_RS.EOF=FalseThen'如果帐号存在IfTrim(Ado_RS.Fields(登录账号))=Trim(Text1.Text)AndTrim(Ado_RS.Fields(密码))=Trim(Text2.Text)Then管理系统主界面.ShowElse'帐号密码错误MsgBox帐号、密码错误,请重新输入!,vbCritical,登陆错误EndIfElse'如果帐号不存在MsgBox帐号不存在,请重新输入!,vbCritical,登陆错误EndIf'断开数据库连接SqlDisConnectAdo_RSEndSubPrivateSubCommand2_Click()DimintResultAsInteger'请求用户确认是否真的退出系统登录intResult=MsgBox(你选择了退出系统登录,退出将不能启动企业人事管理系统!&vbcrlf_&是否真的退出?,vbYesNo,登录验证)IfintResult=vbYesThenEnd'根据用户选择结束应用程序EndSub计算机科学与技术专业182,员工添加,修改,删除PrivateSubCommand1_Click()Adodc1.Recordset.AddNewMsgBox请输入员工信息,不能为空!EndSubPrivateSubCommand2_Click()Adodc1.Recordset.Fields(编号)=Trim(Text1.Text)Adodc1.Recordset.Fields(姓名)=Trim(Text2.Text)Adodc1.Recordset.Fields(性别)=Trim(Text3.Text)Adodc1.Recordset.Fields(出生日期)=Trim(Text4.Text)Adodc1.Recordset.Fields(参加工作日期)=Trim(Text5.Text)Adodc1.Recordset.Fields(住址)=Trim(Text6.Text)Adodc1.Recordset.Fields(电话)=Trim(Text7.Text)Adodc1.Recordset.Fields(来自本单位的时间)=Trim(Text8.Text)Adodc1.Recordset.Fields(职称名)=Trim(Text9.Text)Adodc1.Recordset.Fields(评定时间)=Trim(Text10.Text)Adodc1.Recordset.Fields(工龄年数)=Trim(Text11.Text)Adodc1.Recordset.Fields(编号1)=Trim(Text12.Text)Adodc1.Recordset.UpdateEndSubPrivateSubCommand3_Click()DimintResultAsInteger'请求用户确认是否真的退出添加员工intResult=MsgBox(你选择了取消添加员工,取消将不能添加!&v