搜索
※1※用Access2003开发人事管理系统内容提要：本文介绍了一个适合于中小型企业的人事管理系统的开发设计和各种功能实现过程。学完本文后，读者应能使用Access提供的VBA来编写时间驱动程序、创建VBA通用模块，解决Access向导无法实现的复杂处理和判断控制等问题，使开发出来的系统更具灵活性和自主性，从而满足用户的实际需求。这个实例还介绍了如何设置密码保护源代码，使系统可以安全地运行，以及如何设置员工的登录权限和用户密码，从而使这个系统的使用和运行更具安全性。关键字：VBA编程、人事管理引言：人事管理系统主要处理公司人事资料。利用本系统，可以对人事资料进行查询、修改、增加、删除及存储，并快速、准确地完成各种档案资料的统计和汇总工作，还可迅速打印出各种报表资料以供使用。使用该人事管理系统，便于单位领导掌握人员的动向，及时调整人力资源的分配。正文：1系统的分析和设计1.1功能分析企业人事管理系统主要用于员工个人资料的录入、职务变动的记录和管理，其功能主要有以下几个方面：（1）能将新员工的个人资料输入到数据库中。（2）可以自动分配员工号，并且设置初始的用户密码。（3）可根据不同的方法对员工的资料进行查询、修改。（4）人事变动的详细记录，包括岗位和部门的调整。1.2模块的设计根据上述的分析，可以将系统的主要功能分解成几个模块，基本设计结构如图1所示。人事管理系统新员工档案输入人事变更员工档案查询图11.3信息流程图的设计该系统的信息流程图如图2所示。用户添加新员工查询修改员工信息添加变动信息人事管理系统图2※2※2数据表的创建和设计使用Access数据库管理系统建立应用系统，首先需要创建一个数据库。然后在该数据库中添加所需的表、查询、窗体、报表、宏等对象。2.1数据库的创建首先，使用向导创建“人事管理系统”数据库，然后才进行表的设计。具体步骤如下：（1）启动MicrosoftAccess2003，出现“MicrosoftAccess”数据库设计界面。（2）单击工具栏上的新建按钮，在Access2003窗体的右边出现“新建文件”任务窗格。（3）在该任务窗格中选择项，系统弹出“模板”对话框。单击“常用”选项卡，然后选择其中的模板。（4）单击“确定”按钮，这时出现要选择数据库的保存路径的对话框。在“文件名”下拉列表框中输入文件名为“人事管理系统”。（5）单击“创建”按钮，就进入数据库窗口，就创建了“人事管理系统”数据库。2.2设计和建立数据表1.数据表的逻辑结构设计根据上述的分析，本系统应该包括八个表：管理员表、计数器表、部门表、员工教育程度表、职位表、员工个人信息表、员工变动信息表和员工变动代码表。各表的逻辑结构设计如下：（1）管理员表的逻辑结构设计，如表1所示。表1管理员表的逻辑结构字段名称数据类型字段大小允许空值ID自动编号缺省UserName文本20必填PassWord文本20必填设置“ID”为主键。（2）计数器表的逻辑结构设计，如表2所示。表2计数器表的逻辑结构字段名称数据类型字段大小允许空值计数器编号文本10必填计数值数字长整型说明文本50设置“计数器编号”为主键。（3）部门表的逻辑结构设计，如表3所示。表3部门表的逻辑结构字段名称数据类型字段大小允许空值部门编号文本10必填部门名称文本20部门经理文本50介绍文本50设置“部门编号”为主键。（4）员工教育程度表的逻辑结构设计，如表4所示。表4员工教育程度表的逻辑结构字段名称数据类型字段大小允许空值教育代码文本10必填说明文本20必填设置“教育代码”为主键。（5）职位表的逻辑结构设计，如表5所示。※3※表5职位表的逻辑结构字段名称数据类型字段大小允许空值职位代码文本10必填职位文本20必填设置“职位代码”为主键。（6）员工个人信息表的逻辑结构设计，如表6所示。表6员工个人信息表的逻辑结构字段名称数据类型字段大小允许空值员工编号文本10必填员工密码文本20必填权限文本20员工姓名文本20必填性别文本2出生日期日期/时间短日期部门文本20职位文本20教育程度文本20专业文本20住址文本50电话文本20Email文本50状态文本10备注文本50设置“员工编号”为主键。（7）员工变动信息表的逻辑结构设计，如表7所示。表7员工变动信息表的逻辑结构字段名称数据类型字段大小允许空值ID自动编号缺省必填员工编号文本10必填变动代码文本10变动时间日期/时间短日期说明文本50设置“ID”为主键。（8）员工变动代码表的逻辑结构设计，如表8所示。表8员工变动代码表的逻辑结构字段名称数据类型字段大小允许空值变动代码文本10必填说明文本20设置“变动代码”为主键。2.创建数据表设计好数据表的逻辑结构后，就可以在数据库里创建数据表，并按上述表的内容来设置表的属性。下面通过创建员工个人信息表为例来说明创建的具体步骤：（1）在数据库窗口中的“表”对象选区中双击选项，系统进入表的设计视图。（2）单击工具栏上的保存按钮，系统弹出“另存为”对话框，输入表名为“员工个人信息”，然后单击“确定”按钮。（3）在列的第一行中输入第一个字段名“员工编号”，在列表框中选择“文本”，然后在下边的“字段属性”框中，在“字段大小”的文本框中将属性值改为“10”，在“必填字段”的文本框中选择“是”，在“允许空字符串”的文本框中输入“否”。※4※（4）在表设计视图中再分别输入表6中的其他字段名，并设置相应的字段属性。（5）选中“员工编号”字段行，然后单击工具栏上的主键按钮，设置“员工编号”为主键，这时该行左方出现一个钥匙形图标，结果如图3所示。图3（6）关闭表设计视图，在“表”对象选区中双击打开“员工个人信息”表，这时可在字段名行下边的文本框中输入数据，如图4所示。输入数据后，就完成了这个表的设计。图4按照上述的步骤，再分别创建管理员表、计数器表、部门表、员工教育程度表、职位表、员工变动信息表和员工变动代码表，并分别按照对应的表的内容设置各表的属性，创建结果分别如下：（1）管理员表，如图5所示。（2）计数器表，如图6所示。（3）部门表，如图7所示。图5图6图7（4）员工教育程度表，如图8所示。（5）职位表，如图9所示。（6）员工变动信息表，如图10所示。（7）员工变动代码表，如图11所示。图8图9图10图11向表中输入数据后，就完成了“人事管理系统”的数据库及数据表的设计。※5※建立好的表会显示在数据库窗口的“表”对象选区内，如图12所示。图122.3创建表间关系（1）单击Access2003窗口中菜单栏上的菜单，选择菜单项，或者直接单击工具栏上的关系按钮，系统弹出如图13所示的“显示表”对话框和“关系”窗口。图13（2）在“显示表”对话框中，分别双击要建立关系的表项目：“部门”、“员工教育程度”、“职位”、“员工变动信息”、“员工变动代码”和“员工个人信息”，将这六个表添加到“关系”窗口中，然后单击“关闭”按钮，关闭“显示表”对话框。然后调整成一对多的布局。（3）用鼠标从“部门”字段列表中选定“部门编号”字段，按住鼠标左键将其拖动到“员工个人信息”字段列表中的“部门”字段，然后放开鼠标左键，这时会出现“编辑关系”对话框，如图14所示。（4）单击“创建”按钮，两个表间就建立了一个联系。（5）用同样的方法创建其他表间的关系，结果如图15所示。图14图15※6※这样，各个表间的关系就创建了。3查询的设计对于数据库应用系统的普通用户来说，数据库是不可见的。用户要查看数据库中的数据都要通过查询操作，所以查询是数据库应用程序当中非常重要的一个部分。查询可以对一个表进行简单的查询操作，还可以把多个表的数据连接在一起，进行整体的查询。使用向导设计查询虽然快捷方便，但在实际应用中存在很多的限制，这里用查询设计视图来设计一个“员工变动查询”查询。设计步骤如下：（1）在“人事管理系统”数据库窗口，单击“对象”栏中的按钮，然后单击工具栏上的按钮，这时会弹出“新建查询”对话框，如图16所示。（2）在“新建查询”对话框中选择“设计视图”项，然后单击“确定”按钮，这时会出现如图17所示的对话框。图16图17（3）在“显示表”对话框中单击“表”选项卡，选择“员工变动信息”和“员工变动代码”项，然后单击“添加”按钮，然后再单击“关闭”按钮，将“显示表”对话框关闭，这时在查询设计视图的上半部分会显示刚添加的两个字段列表。（4）依次双击“员工变动信息”字段列表中的“ID”、“员工编号”和“变动时间”字段，以及“员工变动代码”字段列表中的“说明”字段，这时这四个字段都出现在查询设计视图的下半部分的设计网格中，如图18所示。（5）其实也可以利用设计SQL语句来设计查询语句。在窗口中单击鼠标右键，在弹出的快捷菜单中选择命令，会弹出如图19所示的SQL视图。图18图19（6）在图19所示的SQL设计视图中编写对应的SQL语句代码来完成查询功能，如图20所示。图20（7）单击工具栏上的保存按钮，在系统弹出“另存为”对话框中输入查询名为“员工变动查询”，然后单击“确定”按钮。（8）设置完成后，关闭查询设计视图，在数据库窗口中的对象选区中，双击“员工变动※7※查询”，这时会弹出如图21所示的查询结果。图214窗体的设计这一节根据人事管理系统的需要来设计功能窗体，包括“添加新员工”窗体、“人事变动信息”窗体、“查询修改”窗体和“登录”窗体。下面逐一介绍这些窗体的设计过程。4.1添加新员工窗体的设计1.用向导创建窗体雏形“添加新员工”窗体的设计步骤如下：（1）在数据库窗口中，单击对象，单击按钮，这时系统会弹出“新建窗体”对话框。这里选择“窗体向导”项，并不选择任何数据源。（2）单击“确定”按钮，出现“窗体向导”的第一个对话框。在下的下拉列表框中选择“表:员工个人信息”，选择除“权限”和“状态”字段以外的所有字段，然后单击按钮，所选的字段就会出现在右边的“选定的字段”列表框中。（3）单击“下一步”按钮，出现“窗体向导”的第二个对话框，要求选择表格形式，这里选择“纵栏表”项。（4）单击“下一步”按钮，出现“窗体向导”的第三个对话框，要求确定所用的样式，这里选择“工业”样式。（5）单击“下一步”按钮，出现“窗体向导”昀后一个对话框，要求为窗体指定标题，这里输入“添加新员工”。（6）单击“完成”按钮，窗体的结果如图22所示。2.在设计视图修改窗体用“窗体向导”创建的窗体只是一个雏形，还不符合要求，还有很多要修改的地方。修改窗体是在设计视图中进行的。修改“添加新员工”窗体的步骤如下：（1）这里是紧接着上面的步骤（6），单击Access2003窗口的工具栏上的按钮，便立即切换到窗体设计视图，如图23所示。图22图23（2）因为“部门”、“职位”、“性别”和“教育程度”的内容都是选择给定的值，所以这里可以使用组合框。使用工具箱中的按钮，就可以为该窗体添加组合框了。下面先添加“性别”组合框。①删除设计视图上的“性别”文本框。②确保控件向导按钮按下的情况下，单击工具箱上的按钮，然后单击设计视图要放置组合框的位置，这时会弹出“组合框向导”的第一个对话框。因为性别只有两种选择，所以不需要从数※8※据库读取，这里选择“自行键入所需的值”项，如图24所示。③单击“下一步”按钮，出现“组合框向导”的第二个对话框，在列字段文本框中输入“男”和“女”，如图25所示。图24图25④单击“下一步”按钮，出现“组合框向导”的第三个对话框，这里选择默认值，如图26所示。⑤单击“下一步”按钮，出现“组合框向导”的昀后一个对话框，设置该组合框的名称，这里输入“性别：”，如图27所示。图26图27⑥单击“完成”按钮，完成“性别”组合框的添加。（3）继续添加“教育程度”组合框。①删除设计视图上的“教育程度”文本框。②确保控件向导按钮按下的情况下，单击工具箱上的按钮，然后单击设计视图要放置组合框的位置，这时会弹出“组合框向导”的第一个对话框。这里不同的是选择“使用组合框查阅表和查询中的值”选项，如图28所示。③单击“下一步”按钮，出现“组合框向导”的第二个对话框，要求确定要查询的表和查询。这里选择“表：员工教育程度”