《ACCESS数据库》报告 工资管理系统

1、德阳广播电视大学 数据库原理及应用 课程设计题目： 工资管理系统 专业班级： 学 号： 学生姓名： 指导教师： 教师职称： 起止时间： 课程设计（论文）任务及评语 学 号学生姓名专业班级课程设计题目工资管理系统课程设计任务课程设计任务及要求：工资管理是现代企业管理中的一个部分，完善的工资管理系统可以有效的管理职工，可以提高对职工的管理，还能节省企业的费用。工资管理系统用于每个月员工实发工资的计算，计算的项目包括基本工资、奖金、福利和津贴等。本系统主要功能有：（1）员工基本工资的设定。 （2）奖金以及福利补贴的设定。 （3）实发工资计算公式的调整。 （4）调整出勤统计结果计算本月各项实际金额。

2、（5）报表的输出。 指导教师评语及成绩成绩： 指导教师签字： 年 月 日目 录第1章课程设计目的与要求41.1 课程设计目的41.2 课程设计的实验环境41.3 课程设计的预备知识41.4 课程设计要求4第2章课程设计内容52.1 选题说明及需求介绍53、软件定义：工资管理系统54、开发环境：Access200352.2数据库设计说明52.2.1概念设计52.2.2逻辑设计62.2.3建立数据库和基本表82.2.4定义基本表之间的关系82.3系统的功能模块划分92.4实现过程及完成效果介绍92.4.1实现过程简要说明92.4.2系统实现效果13第3章课程设计总结15第4章参考文献15第1章 课

3、程设计目的与要求1.1 课程设计目的本课程的课程设计实际是计算机信息管理专业学生学习完数据库原理与应用课程后，进行的一次全面的综合训练，其目的在于加深对数据库基础理论和基本知识的理解，掌握运用数据库应用系统开发软件的基本方法。1.2 课程设计的实验环境硬件要求能运行WindowsXP操作系统的微机系统。数据库应用系统开发软件可以选用Microsoft Access 2003，或其他数据库管理系统。1.3 课程设计的预备知识熟悉数据库的基本知识及一种以上数据库系统开发软件。1.4 课程设计要求必须独立完成课程设计报告的撰写，不得抄袭他人或网上的社会实践报告，如有雷同，抄袭者和被抄袭者的成绩均为不

4、合格，不能取得学分。按课程设计指导书提供的课题，独立设计，要求书写详细的设计说明书，对复杂的代码段和程序段，应画出程序流程图。在界面设计中，画出每个窗口的布局，有多个窗口时，按模块调用的方式画出窗口调用图。要求书写规范、文字通顺、图表清晰、数据完整、结论明确。第2章 课程设计内容2.1 选题说明及需求介绍选题说明：1、 项目背景：数据库原理课程设计2、 编写目的：掌握数据库设计原理及相关软件的使用3、软件定义：工资管理系统4、开发环境：Access2003需求分析：1、问题的提出：工资管理是现代企业管理中的一个部分，完善的工资管理系统可以有效的管理职工，可以提高对职工的管理，还能节省企业的费用

5、。工资管理系统用于每个月员工实发工资的计算，计算的项目包括基本工资、奖金、福利和津贴等。采用计算机信息技术和网络技术来管理工资信息是大势所趋，为了更好地为公司企业做好工资管理发放的情况，决定开发工资管理系统。2、需要完成的功能：（1）员工基本工资的设定。（2）奖金以及福利补贴的设定。（3）实发工资计算公式的调整。（4）根据出勤统计结果计算本月各项实际金额。2.2数据库设计说明工资管理系统的输出结果是对员工工作的一个评价。本系统中，计算工资的基本依据是考勤管理系统的统计结果。同时统计和查询时需要用到人事管理系统中的员工信息和部门信息。所以这个系统是在前面两个系统的基础上实现的，这里为了简便，直接

6、把需要的表从前面的数据库中导入。2.2.1概念设计本系统中，计算工资的基本依据是考勤管理系统的统计结果。同时统计和查询时需要用到人事管理系统中的员工信息和部门信息。所以这个系统是在前面两个系统的基础上实现的。这个系统总共需要7个数据表。其中员工信息、部门设置、计数器和考勤统计，可以使用前面设计好的数据表。另外需要建立3个数据表用于保存工资设置、福利津贴扣发记录和工资统计结果。另外福利津贴扣发记录中，需要用到1个记录类别代码表，用于标识记录数据是津贴、福利还是扣发项，还需要一个表格用来记录各类行为相对的金额。2.2.2逻辑设计Attendance_State 表的逻辑结构字段名称数据类型字段大小

7、允许空值说明ID自动编号长整型必填记录编号（主键）Year_Month 文本10必填统计月份Person 文本10必填员工编号Work_Hours数字长整型累计工作时间Over_Hours数字长整型累计加班时间Leave_Hday 数字长整型累计请假时间（半天）Errand_Hday数字长整型累计出差时间（半天）Late_Times数字长整型迟到次数Early_Times数字长整型早退次数Absent_Times数字长整型旷工次数Person 表的逻辑结构字段名称数据类型字段大小允许空值说明ID文本10必填员工编号（主键）PwssWord文本20必填密码Authority文本20权限Name文

8、本20必填员工姓名Gender文本2性别Birthday日期/ 时间短日期出生日期Department文本20部门Job文本20职位Edu_Level文本20教育程度Specialty文本50专长Address文本20住址Tel文本20电话Email文本50电子邮箱State文本10状态Remark文本50备注Department 表的逻辑结构字段名称数据类型字段大小允许空值说明ID文本10必填部门编号（主键）Name文本20必填部门名称Manager文本20部门经理Introduce文本50介绍Counter 表的逻辑结构字段名称数据类型字段大小允许空值说明ID文本10必填计数器编号Coun

9、ter_Value数字长整型计数值Description文本50具体描述Salary_Other 表的逻辑结构字段名称数据类型字段大小允许空值说明ID自动编号长整型必填记录编号（主键）YeahMonth文本20必填年月Person文本10员工编号Type文本6类型Name文本10必填员工姓名Money货币缺省金额Description备注具体描述Salary 表的逻辑结构字段名称数据类型字段大小允许空值说明ID自动编号长整型必填记录编号（主键）YeahMonth文本20必填年月Person文本10必填员工编号Basic货币缺省基本工资Bonus货币缺省奖金Add_Detail备注缺省其他应发明

10、细Add_Total货币缺省其他应发总额Sub_Detai备注缺省扣发明细Sub_Total货币缺省扣发总额Total货币缺省实发金额Fee 表的逻辑结构字段名称数据类型字段大小允许空值说明OverTime货币缺省必填加班Errand货币缺省必填出差Late货币缺省必填迟到Absent货币缺省必填旷工Salary_Set 表的逻辑结构字段名称数据类型字段大小允许空值说明Person文本10必填员工编号Salary货币缺省工资（元/小时）Type 表的逻辑结构字段名称数据类型字段大小允许空值说明Code文本2必填类型代码Description文本20说明2.2.3建立数据库和基本表以下是数据库建

11、立的基本表：Attendance_State、Person、Department、Counter、Salary_Other、Salary、Salary_Set、Type、Fee逻辑设置以上逻辑表为例，以下以Person表为例利用表设计器新建这个表。2.2.4定义基本表之间的关系上图为各表之间的关系分布图2.3系统的功能模块划分工资管理系统的输出结果是对员工工作的一个评价。本系统中，计算工资的基本依据是考勤管理系统的统计结果。同时统计和查询时需要用到人事管理系统中的员工信息和部门信息。所以这个系统是在前面两个系统的基础上实现的，这里为了简便，直接把需要的表从前面的数据库中导入，具体的方法后面介绍

12、。2.4实现过程及完成效果介绍在Access 2003中，对基本对象表、查询、窗体、报表行了设计，设计成功后，可实现基本工资、奖金、福利和津贴等查询，实现了员工工资计算的调整，利用报表打印查询结果。2.4.1实现过程简要说明1、建立数据基本表首先，使用向导创建“工资管理系统”数据库，然后才进行表的设计。按照表格的逻辑结构将表格的数据填入，具体逻辑结构如2.2.2逻辑设计所示2、建立各表之间的关系：建立关系如“2.2.4定义基本表之间的关系”所示3、工资统计查询的设计以工资统计查询为例，具体设置如下图所示：运行该查询，系统出现如图所示的“输入参数值”对话框，该查询建立成功其他还建立了工资统计查询

13、、固定福利查询、统计结果查询、员工查询、月度福利查询、月度奖金查询、月度扣发查询、以及总查询4、窗体设置窗体设置主要以工资计算窗体为例，具体操作如下：利用“Fee”表所建字段建立新的窗体，同时添加新的标签，调整窗体结构，单击工具栏上的【视图】按钮，预览该窗体，结果如下图所示。编写代码在窗体设计视图所在的窗口中单击工具栏上的 按钮，这时系统弹出 Microsoft Visual Basic 编辑器。 在代码窗口中，输入如下代码： Option Compare Database Option Explicit Private Sub cmdSave_Click() On Error GoTo Er

14、r_cmdSave_Click DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Exit_cmdSave_Click: Exit Sub Err_cmdSave_Click: MsgBox Err.Description Resume Exit_cmdSave_Click End Sub Private Sub cmdReset_Click() Me.OverTime = 150 Me.Errand = 100 Me.Late = 10 Me.Absent = 50 End Sub Private S

15、ub cmdClose_Click() On Error GoTo Err_cmdClose_Click DoCmd.Close Exit_cmdClose_Click: Exit Sub Err_cmdClose_Click: MsgBox Err.Description Resume Exit_cmdClose_Click End Sub以上工资计算窗体设置完成，其他还建立了工资管理窗体、工资统计结果、固定福利查询、记录统计、员工列表窗体、月度福利津贴窗体、月度奖金窗体、月度考勤统计、月度扣发统计、月度扣发查询、总查询窗体、主菜单窗体、登陆窗体。5、通用模块的设计本系统包括两个模块：“DB

16、Control ”和“Functions ”。（1）、DBControl 模块的设计在数据库窗口中单击【模块】对象，然后单击【新建】按钮，这时系统会弹出新窗口。单击工具栏上的保存按钮“保存”，在弹出的“另存为”的对话框中输入“DBControl ”，然后单击“确定”按钮。然后在代码窗口输入如下代码： Option Compare Database Option Explicit Public Function GetRS(ByVal strQuery As String) As ADODB.Recordset Dim rs As New ADODB.Recordset Dim conn As

17、New ADODB.Connection On Error GoTo GetRS_Error Set conn = CurrentProject.Connection 打开当前连接 rs.Open strQuery, conn, adOpenKeyset, adLockOptimistic Set GetRS = rs GetRS_Exit: Set rs = Nothing Set conn = Nothing Exit Function GetRS_Error: MsgBox (Err.Description) Resume GetRS_Exit End Function Public S

18、ub ExecuteSQL(ByVal strCmd As String) Dim conn As New ADODB.Connection On Error GoTo ExecuteSQL_Error Set conn = CurrentProject.Connection 打开当前连接 conn.Execute Trim$(strCmd) ExecuteSQL_Exit: Set conn = Nothing Exit Sub ExecuteSQL_Error: MsgBox (Err.Description) Resume ExecuteSQL_Exit End Sub（2）、Functions 模块的设计按同样的方法，在【模块】对象中新建一个模块，然后保存为“Functions ”，在代码窗口输入如下 代码： Option Compare Database Option Explicit Public Sub EnterToTab(Keyasc As String) 回车代替TAB 键 If Keyasc = 13 Then 判断是否是回车键 SendKeys TAB End If End Sub以上系统需要建立的两个模块建立完成6、系统的启动 其中，将“主菜单窗体”窗体作为启动后显示的第一个窗体。这样，在重新打开“工资管理系统”数据库时，Acce