当前位置:首页>> >>


VB人事管理系统(源代码 论文).rar

收藏

资源目录
    文档预览:
    编号:20180913212522330    类型:共享资源    大小:3.15MB    格式:RAR    上传时间:2018-09-13
    尺寸:148x200像素    分辨率:72dpi   颜色:RGB    工具:   
    35
    金币
    关 键 词:
    VB 人事管理系统 源代码 论文
    资源描述:
    《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 1 -一、引言(一)开发背景随着计算机技术、网络技术和信息技术的发展,现在办公系统更趋于系统化、科学化和网络化。网络办公自动化系统是计算机技术和网络迅速发展的一个办公应用解决方案,它的主要目的是实现信息交流和信息共享,提供协同工作的手段,提高办公的效率,让人们从繁琐的有纸办公中解脱出来。现在许多的机关单位的人事管理水平还停留在纸介质的基础上,这样的机制已经不能适应时代的发展,因为它浪费了许多人力和物力,在信息时代这种传统的管理方法必然被计算机为基础的信息管理所取代。本系统就是基于本学院的人事管理而设计的,是对学院的人事资料进行管理,为人事管理人员提供了一套操作简单、使用可靠、界面友好、易于管理和使用的处理工具。本系统对人事各种数据进行统一处理,避免数据存取、数据处理的重复,提高工作效率,减少了系统数据处理的复杂性。本系统不仅使学院人事管理人员从繁重的工作中解脱出来,而且提高了人事管理的效率,提高了人事管理的科学性,方便了用户查询、管理人员进行管理。(二)系统软硬件环境1、系统运行环境系统要具有查询和数据处理功能,系统运行环境 Microsoft Windows98 以上,要求服务器最低配置:CPU: Intel PentiumⅡ内存:128M硬盘:10G网卡:10M/100M2、开发工具系统开发工具采用 Visual Basic6.0,后台数据库为 access2000。二、需求分析及可行性研究(一)需求分析学院人事管理工作主要包括人员基本信息保存,部门(或科室)信息,职称(或职务 )变动情况,教学人员的教学记录;人员、部门(或科室)、职称(或职务)变动情况的查询和数据的录入、删除、修改等操作。这就要求所开发的管理系统具备基本的数据库功能如增添、删除、修改、查询以外,还应具备对大量原始数据进行自动检索整理并提取有用信息的更高层次的自动化功能以提高办公《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 2 -效率。为此,我们决定采用 Visual Basic6.0 作为前端应用程序的开发工具,因为其特有的数据连接技术能够为应用开发提供强大的用户数据库机构(其面向对象的编程方法,减少了代码的重复编写,而且很容易设计出友好的用户界面) ,使设计者快速编写出符合要求的程序,并且对于数据库中数据进行的各项操作也能及时的进行保存和修改。另外,人事管理工作范围涉及整个学院,需要处理的数据量不是特别庞大复杂,所以小型的 MB 级 DBMS 如 access 就可以胜任此项工作,不需要选择大型的数据库系统浪费资源。因此我们选择 Microsoft 公司的 office 2000 的 access 2000 作为后端数据库的 DBMS 支持。(二)可行性研究此项管理系统的开发任务是作为毕业设计课题进行的,故不存在开发费用问题,可行性研究的主要方面应放在开发进度的控制上。此人事管理系统初期开发目标是能够在本学院内得到应用,其使用、管理范围仅限于学院,属中小型数据库管理系统应用开发。借助 Visual Basic6.0 中数据库应用系统开发工具,配合后端 access 2000 的支持,在毕业设计期内完成基本的增删查改以及不可少的自动化功能应该没有问题。另外,为了便于日后的系统维护以及在此基础上进行功能扩充和升级,开发过程中应保持良好的代码书写风格并注意编写详细的技术说明文档。本系统中 VB 和数据库 access2000 连接是通过 VB 中的 ADO 实现的。ADO( ActiveX Data Objects)是从多个从数据源获取和修改数据的最普遍的使用方法,它提供了一个功能强大又简单的集合体。ADO 是通用数据访问(UDA ,Universal Data Access)战略的核心技术之一。它就是使用一种编程方式获得任何地方的任何数据,而这些数据源往往很复杂。基于以上 ADO 的特性,我们选择 ADO 作为我们程序与数据库连接的方式。三、总体设计(一)数据库设计人事管理系统总体设计中最重要的阶段是数据库的设计,引文数据库表项是否完备,表项间的关系是否合理直接影响到系统后期应用程序能否顺利开发。1、表数据库中的数据表分为:人事基本信息表,部门表,科室表,教学记录表,职称变动表,职务变动表,用户管理。 (各表内各字段的具体设置见附录) (科室表内容如图一)(1)人事基本信息表用于保存人员的所有人事方面的信息,包括人员基本信息、联系方式、工《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 3 -作单位等信息以及简介、奖惩状况等信息。此表是人事管理系统中最主要的表,每个人员的基本情况都在此表中都有记录。(2)部门表用于保存部门信息,包括部门编号、部门名称和部门类别。(3)科室表用于保存科室信息,包括科室编号、科室名称、所属部门名称。(4)教学记录表用于保存教学人员的教学情况,包括人员编号、人员姓名、教学时间、课程名称。(5)职称变动表用于保存教学人员的职称变动信息,包括人员姓名、时间、原现职称等信息。(6)职务变动表用于保存行政人员的职务变动信息,包括人员姓名、时间、原现职务等信息。(7)用户管理用于保存人事管理系统中使用用户的姓名、密码、用户权限。用户权限分为普通用户和管理人员。其中普通人员是可以进行查询操作和更改自己密码;管理人员是可以进行查询操作,数据库中各表的添加、删除、浏览和修改等数据处理,添加、删除用户等用户信息的操作。图 一2、权限设置《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 4 -用户管理表的用户权限分为管理人员和普通用户(数据库表内保存为 0 和 1)。管理人员可以添加、修改、删除记录,可以添加或删除用户。普通用户只能进行数据查询操作。(二)功能划分通过对学院人事管理工作的特点及其需求进行认真分析,我们总结出人事管理系统的两个核心:一个是关于人事管理的各类信息的查询操作,另一个是关于人事管理中的各类数据的处理操作。基于以上分析结果,我们决定将本系统按其管理的不同方面划分成两个部分:1、查询系统对于人事管理中的所有的信息可以进行分类查询。2、管理系统对于人事管理中的所有的信息可以进行浏览、增添、删除、修改等基本的管理功能。并且对于数据管理中并不是所有的另外,作为整个学院的人事管理系统,其安全性不容忽视。所以上述的两大部分的功能不能对任何使用者无条件开放。因此,系统中拟设定两类权限:普通用户和管理人员。普通用户:只拥有查询数据表中数据的权力。管理人员:拥有对数据表中数据的查询以及数据处理的权力。并且拥有添加或删除用户的权力。《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 5 -(三)系统流程图图 二四、各个模块功能的设计与实现(一)登录界面设计人事管理系统流程登陆系统,根据用户权限显示用户可以使用的功能人事管理系统基本信息模块部门信息模块科室信息模块工作变动信息模块职务变动信息模块职称变动信息模块教学信息模块查询模块 数据处理 用户管理数据浏览数据添加数据删除数据修改添加用户删除用户修改密码退出管理系统《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 6 -启动人事管理系统,在输入框里输入用户名称和用户密码,完成登录操作进入该系统的菜单主界面。根据用户的使用权限,普通用户可以使用查询系统下拉菜单里的各项功能,和用户管理下拉菜单的修改密码功能;管理人员可以使用查询系统、管理系统以及用户管理下拉菜单中的所有功能。 (登录界面如图三)其确定按钮的程序代码如下:Private Sub Command1_Click()Adodc1.RecordSource = “select * from 用户管理 where 用户姓名='“ & Text1.Text & “'“Adodc1.RefreshIf Text1.Text = ““ Or Text2.Text = ““ Thena = MsgBox(“用户姓名或密码不能为空!“, , “ 错误!“)ElseIf Adodc1.Recordset.EOF Thena = MsgBox(“不存在此用户!“, , “ 错误!“)ElseIf Adodc1.Recordset.Fields(“用户密码“) = Text2.Text Thenquanxian = Adodc1.Recordset.Fields(“用户权限“)Form1.Showxingming = Text1.TextUnload MeElsea = MsgBox(“用户密码不正确!“, , “错误!“)End IfEnd IfEnd IfEnd Sub注:程序中的 quanxian 和 xingming 定义为两个全局变量,用于记录用户的权限和用户姓名,在载入主界面时,根据权限不同设置用户可以使用的功能。此程序首先是不允许用户姓名或用户密码为空,否则报错。然后判断是否存在此用户名和密码,如果用户名和密码正确,根据数据库中用户管理表中记录的用户权限显示用户可以使用的系统功能。如果用户姓名或是用户密码错误,否则报错。图 三(二)运行主界面设计我们在进行菜单主界面设计时,采用下拉菜单式。主要分为三个功能模块:查询系统、管理系统、用户管理。其中查询系统根据查询的内容分别设计成个人信息、单位信息、教学情况;管理系统中分数据处理、人员基本信息录入、职务变动录入和职称变动录入;用户管理中设添加用户、删除用户、修改密码、《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 7 -注销和退出几部分。 (主界面如图四)因为在人事管理系统中,人事基本信息是整个人事管理的主要部分,所以人员信息的录入是重要而且工作量较大的工作。所以人员信息的录入我们专门做成一个菜单选项可以进行单独操作,使得大量的人员信息录入操作简单方便。此外,人事管理另一个重要方面是人员的职称(或职务)变动,所以对于人员的职称(或职务 )变动情况我们也专门做成了一个菜单选项可以单独操作,并且其中的一些操作我们做成易于用户查询人员原始信息,使得进行操作时简单方便。图 四(三)查询系统设计该功能模块包括个人信息、单位信息和教学情况三个部分,其中个人信息包括个人基本信息、教学记录、职务变动、职称变动几个查询;单位信息包括部门表和科室表的查询;教学情况是查询课程信息的。 (例:图五为按所属部门编号查询科室信息)1、个人信息查询个人基本信息查询中可以选择人员编号,或是人员姓名、性别、职称、具体科室等不同的一个条件或几个条件组合查询,然后在输入框里输入想要查询的条件,按确定按钮就可以查询出人事基本信息表中符合条件的人的所有信息,查询结果将在本界面下方显示。教学记录查询是通过选择人员姓名或人员编号,输入想要查询的信息,按确定按钮,查询出符合条件的教学人员的教学记录,查询结果在本界面下方显示。职务变动查询和职称变动查询可以分别通过选择人员姓名、单位、职务(或职称) 、时间等某一条件进行查询,输入查询条件,然后按确定按钮查询结果将在界面下方显示。《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 8 -2、单位信息查询可以通过输入部门(或科室)名称、编号等方式,然后输入查询条件,查询出部门信息(或科室信息)将在本界面下方显示。3、教学情况可以通过输入课程名称或课程时间进行查询,查询结果将在本界面下方显示。图 五(四)管理系统设计管理系统模块中包括数据处理,人员信息录入,职务变动录入,职称变动录入。其中数据处理是可以对人员基本信息表进行浏览和部门表、科室表、教学记录表进行数据处理的。人员信息录入是人员基本信息的录入,记录将保存在数据库的人员基本信息表里。职务(或职称)变动录入是将有职务(或职称)变动的人员的信息保存在数据库的职务(或职称)表中的。因为职务(或职称)变动表中的信息不允许删除、修改,所以没有做关于职务(或职称)的删除和修改功能的操作。1、数据处理管理人员可以通过管理系统中的数据处理对数据库中人员基本信息表、部门表、科室表、教学记录表这几个表中的数据进行处理,处理包括对表或是表内某一记录的浏览,在表中添加记录,对表中某一记录进行修改或是删除的操作。其中人员基本信息表是只允许浏览表和浏览、删除记录而不允许添加记录和修改记录,人员基本信息表的添加记录的操作在人员信息录入中完成。进行操作时首先要选择所要操作的表,选定表后可以进行浏览表和添加记录的操作《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 9 -(例:图六为修改教学记录表中某一条记录) 。要对表中某条记录进行操作可以按界面提示选择出符合条件的记录进行浏览、删除和修改的操作。其选择记录按钮、确定按钮、删除记录按钮、修改记录按钮的程序代码如下:(1)选定表,选择要操作的字段名称 Private Sub Command3_Click()Adodc1.RecordSource = “select * from “ & Combo1.Text & ““Adodc1.Refresha = Combo2.ListCountIf a 0 ThenFor i = 0 To a - 1Combo3.RemoveItem 0Next iEnd IfWhile Not Adodc1.Recordset.EOFCombo3.AddItem Adodc1.Recordset.Fields(zd)Adodc1.Recordset.MoveNextWend'把记录列在 combo3 里End Sub(3)删除记录Private Sub Command6_Click()《管理学院人事管理系统的设计与实现》 2001 级信息管理与信息系统专业 刘若冰- 10 -a = MsgBox(“确实要删除此条纪录吗?“, 1, “a“)If a = 1 ThenAdodc1.RecordSource = “select *from “ & Combo1.Text & “ where “ & Combo2.Text & “ = '“ & Combo3.Text & “'“Adodc1.RefreshDataGrid1.AllowAddNew = FalseDataGrid1.AllowDelete = TrueDataGrid1.AllowUpdate = TrueAdodc1.Recordset.DeleteEnd IfEnd Sub(4)修改记录Private Sub Command7_Click()If Combo1.Text = “人事基本信息表“ Thena = MsgBox(“人事基本信息表不允许修改记录!“, , “ 注意!“)ElseDataGrid1.AllowAddNew = FalseDataGrid1.AllowDelete = FalseDataGrid1.AllowUpdate = TrueEnd IfEnd Sub注:如果选择的是人事基本信息表则不允许进行修改记录。只允许进行前边的浏览和删除操作。因为人事基本信息表中的很多项内容是不允许随便修改的。例如职务(或职称)变动是不能在人事基本信息表中直接修改的,而是在职务(或职称)变动表中记录后再在人事基本信息表中自动更改。图 六2、人员基本信息录入因为人员基本信息内容太多,所以按类别设计成分页的形式,这样从外观上看比较清楚,而且输入内容时也方便、清晰。人员基本信息中性别、部门名称、科室名称、职务名称、职称名称和是否是合同制设计成列表的形式。用户可以根据人员的情况选择列表中的内容,但不允许自己输入信息,以防止输入的信息不正确或是不符合规定。3、职务(或职称)变动录入职务(或职称)变动录入是通过人员姓名或人员编号选择出职务(或职称)变动的人员,按确定按钮后人员的职务(或职称)信息会自动的显示出来,然后输入新的信息,按保存按钮后人员的职务(或职称)变动信息将保存在职务
    展开阅读全文
    1
      金牌文库所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
    0条评论

    还可以输入200字符

    暂无评论,赶快抢占沙发吧。

    关于本文
    本文标题:VB人事管理系统(源代码 论文).rar
    链接地址:http://www.gold-doc.com/p-138619.html
    关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服客服 - 联系我们
    copyright@ 2014-2018 金牌文库网站版权所有
    经营许可证编号:浙ICP备15046084号-3
    收起
    展开