毕业设计论—潘峰—《人力资源管理系统的设计和开发》.doc

人力资源管理系统设计与实现【摘要】进入21世纪，计算机成为人类常用的工具，每一个有文化的人都应该了解计算机，学会使用计算机来处理面临的事务。学习计算机知识有两种不同的方法：一种是侧重知识的学法，从原理入手，注重理论和概念；另一种是侧重于应用，从实际入手，注重掌握其应用的方法和技能。不同的人应根据其具体情况选择不同的学习方法。Visual Basic是近年来得到迅速推广和应用的一种可视化的计算机高级语言，它适用于面向对象的程序设计。由于计算机技术的迅速发展，字符界面的DOS操作平台已让位于图形界面的Windows平台，人们需要在Windows平台上开发应用程序。Visual Basic程序设计分为两个部分：一是界面设计（包括属性的设置）；二是程序代码的设计。随着计算机技术的飞速发展，计算机在企业管理中应用的普及，利用计算机实现企业人力资源管理势在必行。对于大中型企业来说，利用计算机支持企业高效率完成劳动管理的日常事务，是适应现代企业制度要求、推动企业劳动人力资源管理走向科学化、规范化的必要条件；计算机管理所无法比拟的优点检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高人力资源管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。不同的企业具有不同的人力资源管理制度，这就决定了不同的企业需要不同的人力资源管理系统。【摘要】11前言32需求分析42.1 用户定位分析42.2 功能需求分析52.3 性能需求分析53.系统分析63.1 环境平台分析73.2 程序功能设计73.3 程序流程设计83.4 程序模块设计114. 详细设计124.1 程序单元设计124.2 程序单元编码134.3 集成开发195. 系统实现215.1部门管理模块215.1.1添加部门215.1.2删除部门225.1.3编辑部门235.1.4查询部门245.2员工管理模块255.2.1. 添加员工255.2.2 编辑员工265.2.3 删除员工275.2.4 查询员工275.3考勤管理模块285.4考评管理模块28结论与展望29参考文献301前言21世纪是知识经济的时代，经济实力的竞争更多地表现在人才的培养、争夺与竞争。如何有效地对员工实施宏观管理，对企事业单位的构成情况和发展趋势进行统计、规划、分析、预测，根据分析的结果制定切实可行的人事政策，是一项繁重而艰巨的任务。传统的人力资源管理方式和手段主要以工作为核心，抑制了人的能动性，不利于工作质量的改进和工作效率的提高，它往往注重事务性操作，不利于开发人员潜在能力。而且它主要依赖于手工操作，效率低下，不利于企事业单位的快速发展。所以，企业在一般日常工作中需要一套人力资源管理系统，以便它能够基于现代人力资源管理的理念，结合中国行业主管机关的人力资源管理经验，将现代化的信息技术引入企业人力资源管理工作，使它能够寻求人与工作相互适应的契合点，将人的发展与企业的发展有机地联系起，以便于对企业人员组成、考勤情况、 工作评估和工资信息进行管理。现代企业对人力资源管理越来越重视，主要是现在人们认为在人类所拥有的一切资源中，人力资源是最宝贵的，这是现代管理的核心。不断提高人力资源开发与管理的水平，不仅是当前发展经济、提高市场竞争力的需要，也是一个国家、一个民族、一个地区、一个单位长期兴旺发达的重要保证，更是一个现代人充分开发自身潜能、适应社会、改造社会的重要指施。信息技术的发展，让众多管理者意识到科技的应用对提高人力资源管理工作效率的重要意义，因此，人力资源管理信息系统往往广泛应用于工业、商业、企业、事业和政等单位，几乎每个进行了信息化建设的单位都具有人力资源管理信息系统。系统分为6大模块：用户管理、部门管理、员工管理、考勤管理、考评管理和工资管理。单击界面上面不同模块的按钮，可以进入该模块的界面，对相应的信息进行操作。 本系统是只是从实际系统中提取出来的一个简单的管理系统。具体到不同的企业，会有不同的需求，这里只是起一个抛砖引玉的作用。希望读者在本系统的学习基础上，开发出适用于不同企业或公司的人力资源管理系统。 人力资源管理系统作为数据库信息管理系统的一种应用，其开发流程包括需求分析、 系统设计、数据库分析和设计以及各功能模块的开发等，将在随后分别讲述。 2需求分析需求分析是数据库系统开发的第一步也是最重要的一步。对于人力资源管理系统也不例外。 软件开发的目的是为了满足客户的需求，因此，客户需求是否正确理解成了项目成败的关键。试想，如果我们不清楚自己要实现的程序功能，或者不清楚客户所需要的功能，那么我们的工作将会失去方向，或者走了弯路。需求分析就是描述系统的需求。分析的根本目的是在开发者和提出需求的用户之间建立一种理解和沟通的机制，因此，人力资源管理系统的需求分析也应该是由开发人员和用户或者客户一起完成的。下面是一份经过压缩后的人力资源管理系统的需求说明文本，这里只列出比较关键的部分。 2.1 用户定位分析（1）系统需要对不同的用户给出不同的权限，比如，公司董事长应该可以看到公司的所有信息；公司的人事管理者只能进行部门管理、员工管理、考勤管理和考评管理，他不能看到各个员工的工资信息；公司的财务管理者不能进行部门管理、员工管理、考勤管理和考评管理，他只能看到和操作各个员工的工资信息；公司还有一个超级管理者，添加用户，并为其余人员分配各种权限。（2）系统在公司新成立部门之后，人事管理者负责建立主管和人数等各个部门的基本信息，如果取消了一个部门，人事管理者负责删除，如果部门人数等信息有变化，人事管理者负责更新，以便它反映最真实的情况。管理者可以查询各部门的主管和人数等信息。（3）系统在员工进入公司时，人事管理者为员工建立人事档案，人事档案应该包含员工报到的时间、员工姓名、员工所在部门和员工的家庭成员和学习/工作经历以及其他基本信息等，如果员工获得了晋升和调岗，可以对用户的基本信息进行修改，另外，可以方便的查询和浏览员工的基本信息，浏览时，通过双击员工的基本信息，可以看到员工的家庭成员和学习/工作经历。2.2 功能需求分析（1）员工到公司上班时应该刷卡签到，签到的信息能够自动转到人力资源管理系统：离开公司时刷卡，下班的信息也能够自动转到人力资源管理系统。如果办事外出或者出差应由上级领导确认考勤情况。缺勤或者迟到按一定数额罚款。加班后可以调休，也可以发放相应的工资。（2）员工的考评由部门主管和人事人员决定，通过部门主管的评价来得到一个系数，通过人事人员的评价得到一个系数，这两个系数，共同决定了员工的年终奖和工资的增长幅度。2.3 性能需求分析（1）员工的工资包括基本工资和奖金两个部分。员工实际得到的工资是总工资加上加班费，扣除保险和个人所得税等之后的部分。 （2）系统运行在w indows平台上，要求有一个较好的图形用户界面，操作要求简单。（3）系统应该有很好的可扩展性，以便企业根据实际情况添加新的功能。3.系统分析在上节，已经对本系统的需求做了详细的阐述，本节在系统的需求分析的基础上，对人事管理系统做系统设计。主要解决实现该系统需求的程序模块设计问题。本系统的开发宗旨和总体任务就是要实现人力资源管理的信息交流上的自动化、规范化和系统化。人力资源管理系统需要完成的功能有用户管理、部门管理、员工管理、考勤管理、考评管理和工资管理六个部分：用户管理：该功能用于管理使用该系统的用户，以及按模块进行权限的分配，从而为系统提供一定的安全性。使用这个系统的用户主要包括四种，一是公司的总经理，负责浏览公司的各种信息；一个是人事人员，负责部门管理、员工管理、考勤管理和考评管理；一个是财务人员，负责员工的工资管理；最后一个是系统管理员，负责添加用户以及权限分配。部门管理：添加、修改、删除和查询部门信息。员工管理：添加、修改、删除和查询员工信息。员工的信息除了本身的基本信息，还包括家庭成员的信息和学习/工作经历信息。在查询员工信息的时候，应该可以很容易的看到家庭成员的信息和学习/工作经历信息。在删除员工信息的同时，需要把该员工的考勤信息、考评信息和工资信息删除。考勤管理：添加、修改和查询员工的考勤信息。在添加或修改考勤信息时，要求在界面中能够比较方便地选择企业的员工。考评管理：添加、修改和查询员工的考评信息。同样要求在添加或修改考勤信息时，在界面中能够比较方便地选择企业的员工。并且提供人事部门对员工的考评和上级员工对下级员工考评的两种模式。工资管理：添加、修改和查询员工的员工工资，在这个模块需要对考评、考勤信息进行统计，最后得出员工的工资信息。对上述各项功能进行集中、分块和结构化，得到如图3.1所示的系统功能模块图。 图3.1 人力资源管理系统功能模块图3.1 环境平台分析Dbuser模块由于不同的系统用户的类型和权限会有所不同，所以在不同的系统中都要稍做修改，以适应不同的情况。本案例中，正如前面所介绍的，用户的权限包括四种：总经理、系统管理员、财务人员和人事人员。在主窗体中，选择用户管理按钮，将弹出用户管理窗体，以便对用户信息进行编辑和查询。但程序第一次运行时，tbUser表可能还没有创建，我们需要首先判断该表是否存在，如果不存在，则创建它。 3.2 程序功能设计Dbuser模块由于不同的系统用户的类型和权限会有所不同，所以在不同的系统中都要稍做修改，以适应不同的情况。本案例中，正如前面所介绍的，用户的权限包括四种：总经理、系统管理员、财务人员和人事人员。在主窗体中，选择“用户管理”按钮，将弹出“用户管理”窗体，以便对用户信息进行编辑和查询。但程序第一次运行时，tbUser表可能还没有创建，我们需要首先判断该表是否存在，如果不存在，则创建它。tbUser表和系统其余的表没有关系，所以在这里我们没有对表中的字段设置外键。我们通过DBUser类返回的用户权限来决定用户可以进行的操作。3.3 程序流程设计用户的需求具体体现在各种信息的提供、保存、更新和查询，这就要求数据库结构能充分满足各种信息的输入和输出。收集基本数据、数据结构以及数据处理的流程，组成一份详尽的数据字典，为后面的具体设计打下基础。在走访，调查和讨论具体客户对企业人力资源管理系统的需求后，经过仔细分析，得到如图3.1所示的业务流程图和3.2所示的数据流图。图3.1 企业人力资源管理业务流程图3.2 企业人力资源管理数据流图首先是用户登录系统，这是进入系统前必须进行的操作。登录后系统将记录用户的信息，并读取用户的权限信息。然后用户可以进入用户管理模块，这个是可选的操作。在这里一般用户只有修改密码的权限，其他权限是超级用户所具有的。这里按5个模块来划分用户的权限，部门管理模块、员工管理模块、考勤管理模块、考评管理模块和工资管理模块。如果用户具有相应模块的权限，就可以对该模块进行管理。在这些操作都完成后，可以退出系统。针对企业人力资源管理系统的需求，通过对系统的业务流程和数据流程的分析，需要设计如下所示的数据字段和数据表。 用户信息表，包括的数据字段有：用户名、密码、用户编号、电子邮箱、联系电话、权限、家庭地址。其中用户编号是关键字段。 部门信息表，包括的数据字段有：部门编号、部门名称、部门主管、部门人数、部门描述和上级部门。其中部门编号是关键字段。 员工信息表，包括的数据字段有：工号、姓名、性别、民族、出生日期、政治面貌、学历、婚姻状况、身份证号、部门编号、工作岗位、部门主管、办公电话、手机、邮箱、籍贯、家庭住址、邮政编码、户口所在地、档案所在地、基本工资、转正日期、劳动合同日期和报到日期。其中工号是关键字段。 家庭成员信息表，包括的数据字段有：编号、姓名、称呼、员工编号、性别、出生日期、民族和政治面貌。其中编号是关键字段。 学习/工作经历信息表，包括的数据字段有：编号、开始日期、截止日期、员工编号、职务、地点、获奖状况。其中编号是关键字段。 考勤信息表，包括的数据字段有：序号、年度、月份、部门编号、员工编号、姓名、当月天数、全勤天数、病假天数、事假天数、旷工天数、法定休假天数、调休天数、出差天数、迟到天数、早退天数、延时加班天数和休息日加班天数。其中序号是关键字段。 考评信息表，包括的数据字段有：序号、年度、月份、部门编号、员工编号、姓名、主管评价、奖金系数、人事评价、奖金系数和工作业绩。其中序号是关键字段。 工资信息表，包括的数据字段有：序号、年度、月份、部门编号、员工编号、姓名、基本工资、本月奖金、加班费、迟到扣款、事假扣款、差旅补助、养老代扣、基本医疗代扣、失业保险代扣、住房公积金代扣、个人所得税、医药费报销和实发工资。其中序号是关键字段。有了上面的数据结构，数据字段和数据流程，下面进行数据库的逻辑结构设计3.4 程序模块设计这里将变换界面的创建方式，给用户耳目一新的感觉。创建好的系统主窗体如图1-5所示。由图可以看出，它与多文档窗体的界面风格已经完全不一样，界面很活泼轻松。但是无论界面怎么变化，它仍然明确地划分了系统的各个模块。它包括“用户管理”、“部门管理”、“员工管理”、“考勤管理”、“考评管理”和“工资管理管理”六个模块。程序运行时，数据库的创建在窗体的Load事件中进行，同时，在Load事件中还需要判断登陆的用户的权限，对于受限用户把他不能使用的功能模块处于失效状态。m_Privilege是一个字符串变量，存储用户的权限，在用户登陆时，由Dbuser返回。这个在前面已经介绍过了，这里不再重复。从代码中可以看出，对于除了“总经理”之外的用户总有相应的功能模块不能使用。4. 详细设计完成系统设计后，要进行的工作就是数据库设计。数据库在一个信息管理系统中占有非常重要的地位，数据库结构设计的好坏将直接对应用系统的效率以及实现的效果产生影响。合理的数据库结构可以提高数据库存储效率，保证数据的完整和一致性。设计数据库系统时应该首先充分了解用户各个方面的需求，包括现有系统的以及将来可能增加的需求。4.1 程序单元设计现在需要将上面的数据库概念结构转化为SQL Server 2005数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。根据数据库的需求分析和概念结构设计，设计了名称为HumanResource的数据库。数据库由下面多个表组成，每个表格表示在数据库中的一个表。各个表的设计结果如下面的表格所示。表4.1为用户信息表，命名为tbUser。表4.1 用户信息表字段名字段类型字段大小可否为空关键字用户名nchar6NOT NULL密码nchar16NOT NULL用户编号nchar3NOT NULL是电子邮箱nchar20NULL联系电话nchar20NULL权限nchar10NOT NULL家庭地址nchar50NULL表4.2为部门信息表，命名为Department。表4.2 部门信息表字段名字段类型字段大小可否为空关键字部门编号nvarchar20NOT NULL是部门名称nvarchar20NOT NULL部门主管nvarchar10NOT NULL部门人数int4NOT NULL部门描述nvarchar100NULL上级部门nvarchar11NULL表4.3为员工信息表，命名为Employee。表4.3 员工信息表字段名字段类型字段大小可否为空关键字工号nvarchar20NOT NULL是姓名nvarchar20NOT NULL性别nvarchar10NOT NULL民族nvarchar5NOT NULL4.2 程序单元编码Imports System.Data.SqlClientModule mdlDisplayOtherformData Public Sub DataBind(ByVal ConnStr As String, ByVal Table1 As String, ByVal Table2 As String, _ ByVal ColumnParent As String, ByVal ColumnChild As String, ByVal frmConntrol1 As DataGridView, _ ByVal bn As BindingNavigator, ByVal frmConntrol2 As DataGridView) 连接数据库 Dim CONN As String = DataBase Dim cn As SqlConnection = New SqlConnection(ConnStr) 打开数据库 cn.Open() 设置查询语句 Dim strSQL1 As String = Select * from + Table1 Dim cmd As SqlCommand = New SqlCommand(strSQL1, cn) cmd.CommandType = CommandType.Text Dim da As New SqlDataAdapter() da.SelectCommand = cmd 执行查询命令 cmd.ExecuteNonQuery() 填充数据集 Dim ds As New DataSet da.Fill(ds, Table1) 设置绑定控件的数据源 Dim bindingSource1 As BindingSource = New BindingSource bindingSource1.DataMember = Table1 bindingSource1.DataSource = ds.Tables(Table1) 绑定控件到数据源 bn.BindingSource = bindingSource1 frmConntrol1.DataSource = bindingSource1 设置查询子表语句 Dim strSQL2 As String = Select * from + Table2 Dim cmd2 As SqlCommand = New SqlCommand(strSQL2, cn) cmd2.CommandType = CommandType.Text Dim da2 As SqlDataAdapter = New SqlDataAdapter() da2.SelectCommand = cmd2 执行查询命令 cmd2.ExecuteNonQuery() 填充数据源 da2.Fill(ds, Table2) 建立数据表之间的关系 Dim parentColumn As New DataColumn parentColumn = ds.Tables(Table1).Columns(ColumnParent) Dim childColumn As New DataColumn childColumn = ds.Tables(Table2).Columns(ColumnChild) Dim relClassStudent As DataRelation = New DataRelation(ClassStudent, parentColumn, childColumn) ds.Relations.Add(relClassStudent) 绑定控件DataGridView到数据源 Dim bindingSource2 As New BindingSource bindingSource2.DataMember = ClassStudent bindingSource2.DataSource = bindingSource1 frmConntrol2.DataSource = bindingSource2 End SubEnd ModuleDim conn As SqlConnection = New SqlConnection(connStr) conn.Open() 创建SQL命令 Dim strSQL As String = Select 部门编号from Department Dim myCommand As SqlCommand = New SqlCommand(strSQL, conn) 设置适配器 Dim adapter As New SqlDataAdapter adapter.TableMappings.Add(Table, TEMP) adapter.SelectCommand = myCommand 填充数据集 Dim ds As New DataSet() adapter.Fill(ds) cmbDepartment.DataSource = ds.Tables(TEMP) cmbDepartment.DisplayMember = 部门编号 关闭数据库连接 conn.Close() LoadDepartment() txtDepartmentName.Select()部门编号被选择的项发生改变时，触发SelectedIndexChanged事件，在该事件中调用LoadDepartment子例程更新其余控件中的内容。代码如下：Private Sub cmbDepartment_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbDepartment.SelectedIndexChanged LoadDepartment() End Sub编辑完毕后，单击确定按钮更新数据。该按钮的Click事件中添加代码如下：设置修改数据的命令 Dim SQLString As String SQLString = 部门名称= + txtDepartmentName.Text + , 部门主管= + txtDepartmentLeader.Text _ + , 部门人数= + txtDepartmentCount.Text + ,部门描述= + txtDepartmentDetails.Text _ + ,上级部门= + txtHighDepartment.Text + 调用编辑数据的模块 Dim count As Integer = EditData.Update(connStr, Department, SQLString, 部门编号, cmbDepartment.Text) If count 0 Then MsgBox(编辑部门成功！, MsgBoxStyle.OkOnly, 编辑部门) End If在该按钮的Click事件中添加如下代码：Private Sub btnSearch_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click Dim op As String = = Dim field As String If RadioButtonID.Checked Then field = 部门编号 ElseIf RadioButtonName.Checked Then field = 部门名称 ElseIf RadioButtonLeader.Checked Then field = 部门领导 Else field = 部门人数 op = 0 Then Dim strNumber As String = txtDepartment.Text SQLString = Select 部门人数from Department where 部门编号= + strNumber + Dim table As DataTable = EditData.Search(connStr, SQLString) Dim strCount = table.Rows(0)(部门人数) Dim nCount As Integer = System.Convert.ToInt32(strCount) nCount += 1 strCount = Convert.ToString(nCount) EditData.Update(connStr, Department, 部门人数= + strCount, 部门编号, strNumber) If MessageBox.Show(添加员工信息成功！您可以继续添加员工详细信息，也可以以后在编辑员工信息是添加员工 & _ 的详细信息。是否继续添加员工详细信息？, 添加员工信息, MessageBoxButtons.YesNo, _ MessageBoxIcon.Question) = Windows.Forms.DialogResult.No Then Return End If frmEmployeeDetail.Show() frmEmployeeDetail.SetEmployeeID(txtWorkID.Text) End If End Sub4.3 集成开发本案例使用了一些前面创建的通用模块，并根据实际情况进行了调整。用到的模块主要有：创建数据库的模块mdlCreateDataBase、新建表的模块mdlCreateTable、显示搜索数据的模块mdlDisplaySearchData、数据编辑的模块EditData、在另外一个窗体显示相关表的模块mdlDisplayRelatedData、用户登录和用户管理的模块DBuser。DBuser将在下一节进行详细介绍，这里粗略介绍一下其余所用到的模块。在前面创建这些模块时曾经说过，在对SQL SERVER数据库进行操作时，这些模块的数据提供者需要改成SqlClient提供者，这是因为OLE DB引入了影响性能的额外的间接层。另外，SQL SERVER数据库支持的数据类型和ACCESS也有所不同。这里以mdlDisplaySearchData为例，来详细地介绍对这些通用模块的修改。mdlDisplaySearchData模块在SQL SERVER中进行了一定的修改，让我们先来看看它的代码，请读者注意和前面章节创建该模块时的代码有何区别如代码所示，为了便于对ADO.NET对象的引用，这里使用Imports导入了命名空间SqlClient。此外，原来OleDB提供者的类都被SqlClient的类替换。其余模块都和此模块类似，请自己比较这些公用模块在SQL SERVER和ACCESS中使用时有何区别，这里就不再一一介绍了。5. 系统实现 现在已经完成了程序各个功能模块的创建，现在来看看整个系统的运行吧。对于登陆之后进入的界面以及程序的运行，我们以员工管理模块来演示，其余模块，读者可以自己运行来查看效果。下面将实现系统各个模块的代码并对其进行分析。 5.1部门管理模块部门管理模块实现的功能主要包括以下几方面： 添加部门删除部门 编辑部门 查询部门图5.1 部门管理下面分别介绍各个功能。5.1.1添加部门添加部门的功能是：当企业中增加部门时，把该部门的信息添加到数据库中。在“部门管理”窗体选择“添加部门”按钮，弹出“添加部门”窗体。该窗体包括六个Label控件，六个TextBox控件和两个Button控件。如图5.2所示：图5.2 添加部门编辑信息完毕后，用户单击“确定”按钮把部门信息添加到数据库中，这个功能通过按钮单击事件来完成。5.1.2删除部门删除部门的功能是：当企业中的部门被撤消后，删除该部门，同时删除该部门的员工。因为撤消部门并不意味着该部门的员工被解雇，为了提高工作效率，用户最好在删除部门之前，先编辑该部门的员工，修改员工的部门编号字段为他们改派到的新部门，这样删除部门时，只需要把该部门被解雇的员工删除，转到其它部门的员工信息就不必重新输入了。删除部门窗体包括一个ListView控件和两个Button按钮，如图5.3所示： 图5.3 删除部门该窗体运行时，首先需要从数据库中查询用户信息，并把符合要求的信息显示到ListView控件上。删除选定的部门后，也需要根据数据库的信息刷新该控件显示的内容。因为这部分代码会在多个地方用到，所以我们把这部分代码放在一个子例程中。5.1.3编辑部门编辑部门的功能是：窗体登陆时，根据数据库中的信息填充部门编号控件，用户从该控件中选择需要编辑的部门编号。选定部门编号之后，系统要根据新的部门编号来填充其余控件。用户根据该部门发生的变化，修改相应控件的内容，更新该部门的信息。编辑部门包含六个Label控件、一个ComboBox控件和两个Button按钮。如图5.4所示： 图5.4 编辑部门窗体登陆和部门编号控件的选项改变时都需要填充更新其余控件的内容，所以这里把更新代码放在一个函数中。5.1.4查询部门查询部门的功能是：根据指定的查询选项和查询条件，在ListView控件中显示从数据库中查询到的内容。该窗体包括一个GroupBox控件、一个ListView控件，四个RadioButton控件、一个Label控件、一个TextBox控件和一个Button控件，如图5.5所示： 图5.5查询部门用户设置好查询选项和查询条件后，单击查询按钮，执行查询操作。5.2员工管理模块员工管理模块实现的功能主要包括以下几方面： 添加员工 删除员工 编辑员工 查询员工下面依次介绍各个功能：5.2