1、管理学院人事管理系统的设计与实现 - 1 -管理学院人事管理系统的设计与实现摘要：本文论述了管理学院人事管理系统的基本开发目的、涉及人事管理系统的功能需求和分析方法，详细介绍了如何使用 Visual Basic6.0 实现人事管理系统中一些重要的功能，并且给出了一些可重用性强的代码，这些代码只要稍加修改即可用语有类似功能的其他系统中。关键词：人事管理系统；数据库；分析；设计；表；代码Abstract: This is the article of analysis the personnel management system of, including its important deman
2、d and functions. The article shows the detail how to implement some important functions with Visual Basic6.0, and gives some reusable codes, with some change this code can easily be used in other systems which have the similar function.Key word: Personnel management system； Database； Analysis； Desig
3、n； Table； Code一、引言（一）开发背景随着计算机技术、网络技术和信息技术的发展，现在办公系统更趋于系统化、科学化和网络化。网络办公自动化系统是计算机技术和网络迅速发展的一管理学院人事管理系统的设计与实现 - 2 -个办公应用解决方案，它的主要目的是实现信息交流和信息共享，提供协同工作的手段,提高办公的效率,让人们从繁琐的有纸办公中解脱出来。现在许多的机关单位的人事管理水平还停留在纸介质的基础上，这样的机制已经不能适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的管理方法必然被计算机为基础的信息管理所取代。本系统就是基于本学院的人事管理而设计的，是对学院的人事资料进行管
4、理，为人事管理人员提供了一套操作简单、使用可靠、界面友好、易于管理和使用的处理工具。本系统对人事各种数据进行统一处理，避免数据存取、数据处理的重复，提高工作效率，减少了系统数据处理的复杂性。本系统不仅使学院人事管理人员从繁重的工作中解脱出来，而且提高了人事管理的效率，提高了人事管理的科学性，方便了用户查询、管理人员进行管理。（二）系统软硬件环境1、系统运行环境系统要具有查询和数据处理功能，系统运行环境 Microsoft Windows98 以上，要求服务器最低配置：CPU： Intel Pentium内存：128M硬盘：10G网卡：10M/100M2、开发工具系统开发工具采用 Visual
5、Basic6.0，后台数据库为 access2000。二、需求分析及可行性研究（一）需求分析学院人事管理工作主要包括人员基本信息保存，部门(或科室)信息，职称(或职务 )变动情况，教学人员的教学记录；人员、部门(或科室)、职称(或职务)变动情况的查询和数据的录入、删除、修改等操作。这就要求所开发的管理系统具备基本的数据库功能如增添、删除、修改、查询以外，还应具备对大量原始数据进行自动检索整理并提取有用信息的更高层次的自动化功能以提高办公效率。为此，我们决定采用 Visual Basic6.0 作为前端应用程序的开发工具，因为其特有的数据连接技术能够为应用开发提供强大的用户数据库机构（其面向对象
6、的编程方法，减少了代码的重复编写，而且很容易设计出友好的用户界面） ，使设计者快速编写出符合要求的程序，并且对于数据库中数据进行的各项操作也能及时的进行保存和修改。另外，人事管理工作范围涉及整个学院，需要处理的数据量不是特别庞大管理学院人事管理系统的设计与实现 - 3 -复杂，所以小型的 MB 级 DBMS 如 access 就可以胜任此项工作，不需要选择大型的数据库系统浪费资源。因此我们选择 Microsoft 公司的 office 2000 的 access 2000 作为后端数据库的 DBMS 支持。（二）可行性研究此项管理系统的开发任务是作为毕业设计课题进行的，故不存在开发费用问题，可
7、行性研究的主要方面应放在开发进度的控制上。此人事管理系统初期开发目标是能够在本学院内得到应用，其使用、管理范围仅限于学院，属中小型数据库管理系统应用开发。借助 Visual Basic6.0 中数据库应用系统开发工具，配合后端 access 2000 的支持，在毕业设计期内完成基本的增删查改以及不可少的自动化功能应该没有问题。另外，为了便于日后的系统维护以及在此基础上进行功能扩充和升级，开发过程中应保持良好的代码书写风格并注意编写详细的技术说明文档。本系统中 VB 和数据库 access2000 连接是通过 VB 中的 ADO 实现的。ADO（ ActiveX Data Objects）是从多
8、个从数据源获取和修改数据的最普遍的使用方法，它提供了一个功能强大又简单的集合体。ADO 是通用数据访问（UDA ，Universal Data Access）战略的核心技术之一。它就是使用一种编程方式获得任何地方的任何数据，而这些数据源往往很复杂。基于以上 ADO 的特性，我们选择 ADO 作为我们程序与数据库连接的方式。三、总体设计（一）数据库设计人事管理系统总体设计中最重要的阶段是数据库的设计，引文数据库表项是否完备，表项间的关系是否合理直接影响到系统后期应用程序能否顺利开发。1、表数据库中的数据表分为：人事基本信息表，部门表，科室表，教学记录表，职称变动表，职务变动表，用户管理。 （各表
9、内各字段的具体设置见附录） （科室表内容如图一）（1）人事基本信息表用于保存人员的所有人事方面的信息，包括人员基本信息、联系方式、工作单位等信息以及简介、奖惩状况等信息。此表是人事管理系统中最主要的表，每个人员的基本情况都在此表中都有记录。（2）部门表用于保存部门信息，包括部门编号、部门名称和部门类别。（3）科室表用于保存科室信息，包括科室编号、科室名称、所属部门名称。管理学院人事管理系统的设计与实现 - 4 -（4）教学记录表用于保存教学人员的教学情况，包括人员编号、人员姓名、教学时间、课程名称。（5）职称变动表用于保存教学人员的职称变动信息，包括人员姓名、时间、原现职称等信息。（6）职务变
10、动表用于保存行政人员的职务变动信息，包括人员姓名、时间、原现职务等信息。（7）用户管理用于保存人事管理系统中使用用户的姓名、密码、用户权限。用户权限分为普通用户和管理人员。其中普通人员是可以进行查询操作和更改自己密码；管理人员是可以进行查询操作，数据库中各表的添加、删除、浏览和修改等数据处理，添加、删除用户等用户信息的操作。图 一2、权限设置用户管理表的用户权限分为管理人员和普通用户(数据库表内保存为 0 和 1)。管理人员可以添加、修改、删除记录，可以添加或删除用户。普通用户只能进行数据查询操作。（二）功能划分通过对学院人事管理工作的特点及其需求进行认真分析，我们总结出人事管理学院人事管理系
11、统的设计与实现 - 5 -管理系统的两个核心：一个是关于人事管理的各类信息的查询操作，另一个是关于人事管理中的各类数据的处理操作。基于以上分析结果，我们决定将本系统按其管理的不同方面划分成两个部分：1、查询系统对于人事管理中的所有的信息可以进行分类查询。2、管理系统对于人事管理中的所有的信息可以进行浏览、增添、删除、修改等基本的管理功能。并且对于数据管理中并不是所有的另外，作为整个学院的人事管理系统，其安全性不容忽视。所以上述的两大部分的功能不能对任何使用者无条件开放。因此，系统中拟设定两类权限：普通用户和管理人员。普通用户：只拥有查询数据表中数据的权力。管理人员：拥有对数据表中数据的查询以及
12、数据处理的权力。并且拥有添加或删除用户的权力。（三）系统流程图管理学院人事管理系统的设计与实现 - 6 -图 二四、各个模块功能的设计与实现（一）登录界面设计启动人事管理系统，在输入框里输入用户名称和用户密码，完成登录操作进入该系统的菜单主界面。根据用户的使用权限，普通用户可以使用查询系统下拉菜单里的各项功能，和用户管理下拉菜单的修改密码功能；管理人员可以使用查询系统、管理系统以及用户管理下拉菜单中的所有功能。 （登录界面如图三）其确定按钮的程序代码如下：人事管理系统流程登陆系统，根据用户权限显示用户可以使用的功能人事管理系统基本信息模块部门信息模块科室信息模块工作变动信息模块职务变动信息模块
13、职称变动信息模块教学信息模块查询模块 数据处理 用户管理数据浏览数据添加数据删除数据修改添加用户删除用户修改密码退出管理系统管理学院人事管理系统的设计与实现 - 7 -Private Sub Command1_Click()Adodc1.RecordSource = “select * from 用户管理 where 用户姓名=“ & Text1.Text & “Adodc1.RefreshIf Text1.Text = “ Or Text2.Text = “ Thena = MsgBox(“用户姓名或密码不能为空！“, , “ 错误！“)ElseIf Adodc1.Recordset.EOF
14、 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 定义为两个全局变量，用于记录用户的权限和用户姓名，在载入主界面时，根据权限不同
15、设置用户可以使用的功能。此程序首先是不允许用户姓名或用户密码为空，否则报错。然后判断是否存在此用户名和密码，如果用户名和密码正确，根据数据库中用户管理表中记录的用户权限显示用户可以使用的系统功能。如果用户姓名或是用户密码错误，否则报错。图 三管理学院人事管理系统的设计与实现 - 8 -（二）运行主界面设计我们在进行菜单主界面设计时，采用下拉菜单式。主要分为三个功能模块：查询系统、管理系统、用户管理。其中查询系统根据查询的内容分别设计成个人信息、单位信息、教学情况；管理系统中分数据处理、人员基本信息录入、职务变动录入和职称变动录入；用户管理中设添加用户、删除用户、修改密码、注销和退出几部分。 （
16、主界面如图四）因为在人事管理系统中，人事基本信息是整个人事管理的主要部分，所以人员信息的录入是重要而且工作量较大的工作。所以人员信息的录入我们专门做成一个菜单选项可以进行单独操作，使得大量的人员信息录入操作简单方便。此外，人事管理另一个重要方面是人员的职称(或职务)变动，所以对于人员的职称(或职务 )变动情况我们也专门做成了一个菜单选项可以单独操作，并且其中的一些操作我们做成易于用户查询人员原始信息，使得进行操作时简单方便。图 四（三）查询系统设计该功能模块包括个人信息、单位信息和教学情况三个部分，其中个人信息包括个人基本信息、教学记录、职务变动、职称变动几个查询；单位信息包括部门表和科室表的
17、查询；教学情况是查询课程信息的。 （例：图五为按所属部门编号查询科室信息）1、个人信息查询个人基本信息查询中可以选择人员编号，或是人员姓名、性别、职称、具体科室等不同的一个条件或几个条件组合查询，然后在输入框里输入想要查询的条件，按确定按钮就可以查询出人事基本信息表中符合条件的人的所有信息，查询结果将在本界面下方显示。教学记录查询是通过选择人员姓名或人员编号，输入想要查询的信息，按管理学院人事管理系统的设计与实现 - 9 -确定按钮，查询出符合条件的教学人员的教学记录，查询结果在本界面下方显示。职务变动查询和职称变动查询可以分别通过选择人员姓名、单位、职务（或职称） 、时间等某一条件进行查询，
18、输入查询条件，然后按确定按钮查询结果将在界面下方显示。2、单位信息查询可以通过输入部门（或科室）名称、编号等方式，然后输入查询条件，查询出部门信息（或科室信息）将在本界面下方显示。3、教学情况可以通过输入课程名称或课程时间进行查询，查询结果将在本界面下方显示。图 五（四）管理系统设计管理系统模块中包括数据处理，人员信息录入，职务变动录入，职称变动录入。其中数据处理是可以对人员基本信息表进行浏览和部门表、科室表、教学记录表进行数据处理的。人员信息录入是人员基本信息的录入，记录将保存在数据库的人员基本信息表里。职务（或职称）变动录入是将有职务（或职称）变动的人员的信息保存在数据库的职务（或职称）表
19、中的。因为职务（或职称）变动表中的信息不允许删除、修改，所以没有做关于职务（或职称）的删除和修改功能的操作。1、数据处理管理人员可以通过管理系统中的数据处理对数据库中人员基本信息表、部管理学院人事管理系统的设计与实现 - 10 -门表、科室表、教学记录表这几个表中的数据进行处理，处理包括对表或是表内某一记录的浏览，在表中添加记录，对表中某一记录进行修改或是删除的操作。其中人员基本信息表是只允许浏览表和浏览、删除记录而不允许添加记录和修改记录，人员基本信息表的添加记录的操作在人员信息录入中完成。进行操作时首先要选择所要操作的表，选定表后可以进行浏览表和添加记录的操作（例：图六为修改教学记录表中某
20、一条记录） 。要对表中某条记录进行操作可以按界面提示选择出符合条件的记录进行浏览、删除和修改的操作。其选择记录按钮、确定按钮、删除记录按钮、修改记录按钮的程序代码如下：（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.MoveNext
