员工信息管理系统设计与实现【数据库】.pdf

《员工信息管理系统设计与实现【数据库】.pdf》由会员分享，可在线阅读，更多相关《员工信息管理系统设计与实现【数据库】.pdf（39页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、摘要近年来,随着企业彼此间的竞争日趋激烈，信息管理技术在企业的发展中占据着越来越重要的地位。在企业的经营生产中,员工信息已成为企业经营管理中不可或缺的一部分,为管理者进行管理决策和进行各种人事调配活动提供了重要的依据,在生产分配安排中发挥了越来越重要的作用.通过分析企业员工信息管理的内容及特点，提出了企业员工信息管理系统的解决方案。系统基于 B/S 模式，采用 ASP,MICROSOFT，ACCESS，DREAMWEAVER 作为主要开发工具进行开发。系统由员工信息查询模块；人事变动记录模块;考勤记录与统计模块；员工信息分类薪资管理模块；公司信息及部门管理等组成。文章以需求分析;总体规划;模块

2、划分;数据库设计与实现功能等为主线，详细介绍了基于 B/S 结构的企业员工信息管理系统.首先,根据企业员工信息管理的内容及用户特点对系统作了需求分析,其次，根据系统的实现功能和适用环境对系统作了总体规划,最后完成了模块的划分和数据库的设计与实现，并对系统进行了测试。关键词: 数据库；模块;ASP- 1 -目录摘要. 1目录. 11 绪论 . 21.1 前言. 21.2 当前企业员工管理软件的现状. 21.3 选题原则. 31。4 开发运行环境及相关理论知. 32 需求分析. 42.1 系统功能需求 . 42。2 数据流图. 52.3 数据字典. 63 系统总体设计. 83。1 可行性研究. 8

3、3.1.1 技术可行性. 83.1.2 经济可行性. 83.1。3 社会可行性. 83.1.4 操作方式可行性. 83.2 系统功能模块图. 83。2 系统主要功能模块. 94 系统详细设计. 104。1 数据库设计. 104.1。1 系统总体 E-R 图. 104。1。2 数据库逻辑结构设计. 114。1。3 数据库物理设计. 124。2 界面设计. 154。2.1 用户登录模块 . 154.2。2 页面框架. 164.2。3 员工列表查看模块. 174.2。4 员工档案管理模块. 194.2.5 考勤记录及统计管理模块. 224。2.6 各种事项记录模块. 284.2。7 辅助功能模块.

4、304.2。8 系统管理模块. 315 系统实施 . 335.1 系统运行环境要求 . 335。2 系统使用说明书 . 336 系统测试与结论 . 346。1 系统测试. 346。1。1 测试举例. 346。1.2 系统测试. 35- 1 -6.2 系统特色与不足. 356。3 系统调试. 356.4 结论. 36参考文献. 371 绪论1.1 前言管理信息系统是当今高度信息化社会中任何企业/事业战略发展要素的重要组成部分，它的成功建设和应用是企业在竞争中立于不败之地,进而发展壮大的有力保证。随着市场竞争的日趋激烈,人力已成为实现该企业自身战略目标的一个非常关键的因素。 企业中人心的向背和员工

5、对工作的投入程度在很大程度上决定了该企业的兴衰与成败。如何能保持本企业员工的工作责任感，激励他们的工作热情，减少人才的流失,已成为困扰企业主管和人力资源经理的一个日益尖锐的问题。随着企业人员数量不断增加、分工的不断细化、各行业间联系的不断密切。对人事管理的要求也不断提高，实现员工档案管理自动化,无疑将带来高效率的企业管理。因此要实现企业管理的“公平、公正、高效” 。不仅要靠规章制度和政策的规范，还需要一个透明、相容、一致、易查和全面的员工档案信息管理系统的配合，二者相辅相成，使企业管理更加的合理、高效，为企业带来更多的效益。员工档案管理信息系统 主要是通过计算机进行信息的收集、 传递、 存储、

6、加工、维护和使用。利用计算机系统分析数据，实现人机辅助决策，提高工作效率和资源利用率.将企业的员工档案管理、考勤管理等日常管理工作从简单的手工作业全面转向自动化、系统化，是企业档案管理员能够从繁琐的管理实务中解放出来，减少工作量，提高工作效率。1.2 当前企业员工管理软件的现状员工档案信息管理系统是企业公司在员工人事管理活动中形成的重要人事记录.员工档案在发展中国特色社会主义过程中，是人力资源储备、促进人才合理流动、科学配置和合理使用人才，全面考察了解、正确评价和使用人才的重要依据。 但是， 有的企业公司却片面的认为， 员工的人事档案不过是人的经历记录，其本身不能直接带来经济效益，管好管坏无所

7、谓，所以对员工档案工作在管理制度、 管理手段、 管理模式、 管理人员等方面不够重视， 存在着这样和那样的问题，影响了企业的改革和发展。因此,研究开发出一套比较通用、功能比较完善的员工档案信息管理软件，力求在这一领域取得一些新的成果。- 2 -1。3 选题原则伴随着信息社会的快速发展，计算机在企业管理中应用的普及 ,利用计算机实现员工档案管理势在必行。对于中小型企业来说 ,利用计算机支持企业高效率完成员工档案管理的日常事务,是适应现代企业制度要求、推动企业劳动人事管理走向科学化、规范化的必要条件。面对新的机遇与挑战，企业必须通过改革创新，完善管理机制 ,提高管理水平，进而增加企业的核心竞争力。通

8、过高效的，规范的信息管理系统，合理有效地运用各种员工档案信息制定企业的战略决策，促进企业人才的发展 .由于原始的手工管理模式的大工作量、低效率、 时效性差，不能使员工档案信息得到及时的运用，使企业急需专门的管理软件来管理企业的各种员工档案信息， 员工档案管理信息系统就是在这种情况下开发的。员工档案管理信息系统 的开发可以实现企业对员工档案信息的规范化管理，增大管理系统的存储量、提高系统的可靠性和保密性、方便用户使用，降低企业成本。员工档案信息的集中管理可以降低差错率,提高管理效率。1.4 开发运行环境及相关理论知1。4.1 运行环境软件环境:windows 98/2000/XP1。4。2 开发

9、工具及平台微软公司的 Active Serverv Pages（简称 ASP，动态服务器页面）数据库管理系统 access2003网页设计和网站管理工具 dreamweaver1。4。3 相关理论知识（1) ASP 简介ASP 是 Active Server Page 的缩写，意为“动态服务器主页。ASP 是微软公司开发的代替 CGI 脚本程序的一种应用,它可以与数据库和其它程序进行交互，是一种简单、方便的编程工具.ASP 的网页文件的格式是.asp，现在常用于各种动态网站中。 ASP 是一种服务器端脚本编写环境，可以用来创建和运行动态网页或 Web 应用程序。ASP 网页可以包含 HTML

10、标记、普通文本、脚本命令以及 COM 组件等。利用 ASP 可以向网页中添加交互式内容（如在线表单） ，也可以创建使用 HTML 网页作为用户界面的 web 应用程序。（2）关系型数据库-accessAccess 是微软公 司推出的基于Windows 的桌面关系数据库管理系统(RDBMS).是 Office 系列应用软件之一.它提供了表.查询.窗体.报表。页.宏.模- 3 -块 7 种用来建立数据库系统的对象，提供了多种向导。生成器.模板。把数据存储。数据查询.界面设计。报表生成等操作规范化,为建立功能完善的数据库管理系统提供了方便。也使得普通用户不必编写代码。就可以完成大部分数据管理的任务。

11、（3） IIS 服务Internet Information Server 的缩 写为 (IIS)是一个 World Wide Webserver。Gopher server 和 FTP server 全部包容在里面。 IIS 意味着你能发布网页,并且有 ASP(Active Server Pages） 、JAVA、VBscript 产生页面,有着一些扩展功能。IIS 支持一些有趣的东西，象有编辑环境的界面（FRONTPAGE） 、有全文检索功能的（INDEX SERVER） 、有多媒体功能的(NET SHOW)其次,IIS 是随 Windows NT Server 4。0 一起提供的文件和应

12、用程序服务器，是在 Windows NT Server 上建立 Internet 服务器的基本组件。它与 Windows NTServer 完全集成，允许使用 Windows NT Server内置的安全性以及 NTFS 文件系统建立强大灵活的 InternetIntranet 站点。(4) DREAMWEAVER 简介Dreamweaver 是美国 MACROMEDIA 公司开发的集网页制作和管理网站于一身的所见即所得网页编辑器,它是第一套针对专业网页设计师特别发展的视觉化网页开发工具， 利用它可以轻而易举地制作出跨越平台限制和跨越浏览器限制的充满动感的网页.优点就是直观性，使用方便,容易上

13、手，您在所见即所得网页编辑器进行网页制作和在 WORD 中进行文本编辑不会感到有什么区别,2 需求分析2。1 系统功能需求员工档案信息管理系统主要由查询管理、基本管理、考勤管理、系统操作等几大部分紧密结合组成。针对这份需求说明,我们进行了研究和分析，对该系统做了详细的需求分析。系统功能简明描述如下：（1） 员工基本档案“员工基本档案功能模块用于维护公司员工的人事基本档案信息，它是员工其他人事信息的基础，包括员工编号、部门、姓名、性别、出生日期、身份证号、学历、职称、职务、毕业学校、进厂时间、合同期、电话、手机号码、email、家庭住址、邮政编码、备注等信息。(2） 员工奖惩记录- 4 -“员工

14、奖惩记录功能模块用于维护公司员工一生工作历程中所获得的奖励或处罚信息，特别是在本单位所获得的奖励信息，包括姓名、编号、奖惩事项、日期、奖惩决定、原因说明等信息。（3） 员工培训记录“员工培训记录” 功能模块用于维护公司员工在一生工作历程中所接受的培训或学习信息，包括姓名、编号、开始日期、培训单位、培训地点、培训项目、培训时间等信息。（4） 员工考勤记录“员工考勤记录”功能模块用于记录公司各个部门员工的每日考勤信息，包括姓名、编号、月份、考勤信息等信息.（5） 员工其他记录“员工其他记录”功能模块用于记录公司各个部门员工的其它一些信息，包括姓名、编号、记录事项、日期,详细记录等信息。（6） 查看

15、考勤信息“查看个人考勤”功能模块用于查询公司员工的个人考勤信息，包括按月查看，查看考勤历史和查看考勤统计。(7） 查询部门档案“查询部门档案”功能模块用于查询公司各个部门信息,包括部门名称和编号等信息。(8） 提醒功能“提醒功能模块包括生日提醒和合同到期提醒两种，帮助公司内部人员增加沟通和了解。（9） 系统管理“系统操作”主要用于对本软件进行新建管理员用户、修改普通用户密码的工作，以满足不同的权限需求。2。2 数据流图本节中我们主要利用数据流图、及数据字典来了解系统结构。通过这几种逻辑模型加深用户对员工档案信息管理系统的了解， 进一步的认清本员工档案管理信息系统的基本逻辑功能，建立系统结构。-

16、 5 -用户名密码登陆人员D1员工事项记录录 入分 类管 理员 权限D2员工奖惩查 询 考勤普 通用 户权限D3员工档案D4考勤记录D5 公司信息表查询个人档案公 司 部门设置D9公司部门系统管理员退 出系 统图 2-1 系统数据流图2。3 数据字典数据字典就是数据流图上所有成分的定义和解释的文字集合， 对数据流图中的各种成分起注释、说明作用，并给这些成分赋以实际的内容。除此之外 ,数据词典还要对系统分析中其他需要说明的问题进行定义和说明。 数据字典是开发者与用户相互沟通的有效途径之一。它能形象的向用户描述开发者的意图，使用户明白数据库可能具有的项目，可有效的缓解开发者与用户之间的交流鸿沟。数

17、据字典包括数据元素、数据流、数据存储、数据加工和外部项。主要数据字典用卡片表示如下:名字：员工基本档案表别名：worker描述：保存员工的基本档案信息定义：员工基本档案信息=姓名+编号+密码+电话+家庭住址+身份证号+性别+出生日期+文化程度+进厂时间+职称+职务+合同号+合同到期+手机+email+毕业学校+英文名+照片+备注+专业 +特长+部门号- 6 -位置：员工基本档案管理，名字：管理员用户表别名：user描述：存储员工档案信息管理系统的管理员用户及其操作权限信息定义：管理员用户=用户名+密码位置：登陆管理系统。名字：公司信息表别名：company描述：存储企业活公司的基本信息定义：公

18、司信息=公司名称+英文名+服务电话+邮政编码+电子信箱+公司地址位置：公司基本信息管理名字：部门信息表别名：dept描述：存放公司部门信息定义：公司部门表=部门名称+部门编号+时间+联系电话+说明位置：部门管理名字：事项记录统计表别名：others描述：存放员工重要事项记录,如奖惩记录、培训记录、调动记录等信息。定义：事项记录=员工号+事项+记录+数量+备注+日期+详尽信息位置：培训记录，奖惩记录，其他事项纪录名字：考勤记录信息表别名：rool描述：存放员工一个月的考勤记录定义：考勤记录=员工号+日+缺勤+迟到早退时间+加班时间+上下午+月+年位置：考勤记录名字：考勤记录统计表别名：rools

19、tat描述：存放员工一个月的考勤记录定义：考勤记录统计=月份+年份+迟到+事假+病假+矿工+加班+调休+迟到累计+加班早退时间+事假日期+加班时间+旷工时间+病假时间+备注+员工号+早退时间+迟到时间+时间+上班时间位置：考勤统计，考勤查看图 32 数据字典- 7 -3 系统总体设计3。1 可行性研究3。1.1 技术可行性现在，市场上流行的应用开发产品很多,如 Visual Basic6.0、Visual C#、Delphi7。0、Java、.NET 等都可以作为开发该管理系统的软件开发工具。本系统采用 ASP 核心组件技术，Dreamweaver/Microsoft Access 网页编辑器

20、和数据库管理系统进行开发。Dreamweaver 第一套针对专业网页设计师特别发展的视觉化网页开发工具， 利用它可以轻而易举地制作出跨越平台限制和跨越浏览器限制的充满动感的网页. 它简单易学、效率高，且功能强大，使我们比较熟悉的网页制作软件之一.自己也具备一定的专业技术水平，能够胜任该系统的开发。3。1。2 经济可行性该系统采用 PC 机开发，节省人力物力，以最小的代价提高效率,具有很好的经济前景和效益.本系统不仅开发成本较低，还能降低人事专员的工作量，提高日常工作效率，从而降低人力资源管理成本，减少人事开销.因此使用该系统可以为企业带来极大的方便与快捷，增加经济效益.3。1.3 社会可行性该

21、系统符合当前社会生产管理经营体制的要求， 符合信息化社会发展的需求,提高企业的运作效率。3.1.4 操作方式可行性该系统是完全的人机交互式界面，由一个主菜单构成，每一个主功能选项卡下都有详细的相关内容选项的分类，文字表达简单明确。友好的用户界面，简明易懂的使用方法，使用户可以不经过任何培训就能轻松的掌握系统的操作。管理人员可以及时准确的收集各种信息，修改管理系统中的资料，加强企业公司内部沟通和了解，是各个部门根据相关的信息作出决策并及时采取行动。3。2 系统功能模块图系统开发的总体任务是实现员工档案信息管理的系统化、规范化和自动化，并根据用户需求、综合考虑实际应用要求和系统的发展扩充，本系统划

22、分为六大子系统(包括：员工列表、员工档案、考勤记录、重要事项纪录、辅助功能，系统管理）.通过这六个子系统使员工档案信息管理系统管理员可以用本系统完成日常员工档案管理工作,同时其他用户也可以用此系统查询到自己的档案信息，使档案信息得到及时有效的运用，同时做到了档案管理的“公开、公正、公平”。本系统功能模块划分如图 3-1 所示：- 8 -员工档案管理信息系统员工档案管理信息系统员工列表员工列表员工档案员工档案考勤记录考勤记录重要事项记录重要事项记录辅助功能辅助功能系统管理系统管理员工列表员工列表查看离职员工查看离职员工按部门查看按部门查看增加员工增加员工辞退员工辞退员工更改员工档案更改员工档案考

23、勤记录考勤记录考勤统计考勤统计考勤查询考勤查询培训记录培训记录奖惩记录奖惩记录其他事项记录其他事项记录部门管理部门管理公司基本信息公司基本信息管理管理生日提醒生日提醒合同到期提醒合同到期提醒更改密码更改密码添加管理员添加管理员图 3-1员工档案管理信息系统功能模块图3.2 系统主要功能模块系统主要功能模块包括以下六个部分:(1） 系统管理模块用户登录：用于普通用户和管理员用户登录系统。添加管理员：用于添加管理员用户信息。更改密码：用于普通用户更改登录密码。（2) 考勤管理模块考勤记录：按月输入到本系统中，本系统将记录所有考勤记录。考勤统计：对考勤记录自动统计，记录出每个员工每月的出勤统计。考勤

24、查询：用于进行考勤历史记录的查询。(3） 员工列表模块员工列表：用于列表查看所以员工信息。按部门查看：用于查询各个部门员工的基本档案信息。查看离职员工：用于查询已离职的员工的基本档案信息。（4) 辅助功能模块错误错误! !部门管理： 用于公司部门信息的管理。错误错误! !公司基本信息管理： 用于公司基本信息的管理。，3生日提醒： 用于自动提醒员工生日.- 9 -合同到期提醒： 用于提醒员工合同到期。（5） 员工档案新增员工： 用于增加公司员工档案信息.辞退员工： 用于删除公司员工档案信息。更改员工档案： 用于修改公司员工档案信息。（ 6 ） 重要事项记录模块培训记录：用于记录公司员工的培训记录

25、。奖惩记录：用于记录公司员工的奖惩记录。其他事项记录: 用于记录公司员工的其他事项记录。4 系统详细设计4。1 数据库设计员工档案管理信息系统是一个数据库应用系统， 员工的档案信息都是保存在数据库中。在数据库应用系统的开发过程中，数据库的结构设计是一个非常重要的问题.本员工档案信息管理系统从表设计到用户界面设计、 从录入到查询形式，都来源于规范的数据库。数据库的创建和维护是开发系统的至关重要的一步。在开发数据库应用程序之前必须仔细了解用户需求,对数据库进行认真规划设计，这是决定开发是否成功的关键。数据库结构设计的好坏将直接对应用系统的效率以及实现的效果产生影响，好的数据库结构设计会减少数据库的

26、存储量，数据的完整性和一致性相比较高，系统具有较快的响应速度.效率是数据库里头等重要的。如果数据库的结构设计不合理，其效率是无法让人忍受的。通常，数据库所包含的大量信息都是以表的形式贮存的。数据库包含多个表，有的表相互之间存在着一定的关系。设计数据库就是将大量的信息经过分析和归纳，分到多个表中，确定表之间的相互关系,使表内信息既要完整的反映主题,又不能重复。数据结构作为数据库的要素之一是数据库对象类型的集合， 这些对象通常分为两类：一类是与数据类型、内容、性质有关的对象；另一类是与数据之间联系有关的对象.在实际数据库中,表现为数据项、记录、属性、关系等.4。1.1 系统总体 E-R 图-10登

27、录1管理员修改11管理1管理公司1包含mN1员工基本资料N1包含部门n1用户员工登录信息11登录111查询管理N1考勤管理m考勤信息1查询图 4-1 信息管理系统总体E-R 图4。1。2 数据库逻辑结构设计设计如下面所示的数据项和数据结构：（1）员工基本档案表：包括姓名、编号、密码、电话、家庭住址、身份证号、性别、出生日期、文化程度、 进厂时间、职称、职务、合同号、合同到期、手机、email、毕业学校、英文名、照片、备注、专业 、特长、部门号（2）管理员用户表：用户名，密码。（3)公司信息表：公司名称、英文名、服务电话、邮政编码、电子信箱、公司地址-11（4）部门信息表：部门名称、部门编号、时

28、间、联系电话、说明(5）事项记录统计表：员工号、事项、记录、数量、备注、日期、详尽信息（6)考勤记录信息表:员工号、日、缺勤、迟到早退时间、加班时间、上下午、月、年（7)考勤记录统计表:月份、年份、迟到、事假、病假、矿工、加班、调休、迟到累计、加班时间、备注、员工号、早退时间、迟到时间、早退时间、事假日期、加班时间、旷工时间、病假时间、上班时间4。1。3 数据库物理设计表 4-1 管理员用户表字段名称Uesr_idadminUsernameadminPassword数据类型自动编号文本文本是否为空Not nullNullNull表 42 员工档案信息表字段名称IdNameMimaCard_no

29、teladdcardnoSexbirthdayWhJcZczwHthHtdqsjmailbyxx数据类型自动编号文本文本文本文本文本文本文本日期/时间文本文本文本文本文本日期/时间文本文本文本-12是否为空Not nullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullenamepicmenozytcpartOutoneoutdatagldata文本文本文本文本备注数字数字日期/时间数字日期/时间NullNullNullNullNullNullNullNullNullNull表 4-3 部门信息表字段名称u

30、ses_iduses_namememopantentdatedeptno数据类型自动编号文本文本数字日期/时间文本是否为空Not nullNullNullNullNullNull表 44 企业信息表字段名称uses_idCnameEnameTelZipEmailadd数据类型自动编号文本文本文本文本文本文本是否为空Not nullNullNullNullNullNullNull表 45 考勤记录表字段名称IdWid数据类型自动编号数字-13是否为空DataKqCtimeJtimeSxKmKy数字文本数字数字文本数字数字表 46 考勤统计表字段名称IdMonthkyearCdSjBjKgJbZt

31、CtimeJtimeBzWidztimeCddZddSddJddKddBddsbgddgj数据类型自动编号数字数字数字数字数字数字数字数字数字数字数字数字数字文本文本文本文本文本文本数字文本数字是否为空Not nullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNullNull-14表 4-4 部门信息表字段名称uses_iduses_namememopantentdatedeptno数据类型自动编号文本文本数字日期/时间文本是否为空Not nullNullNullNullNul

32、lNull4.2 界面设计本系统是一个基于网站模式的小型员工档案信息管理系统 ,为了方便用户操作,并使整个页面简洁、清晰，在设计时参照一般网页的设计方法进行设4。2.1 用户登录模块（1）用户登录页面 login。asp打开本系统后，进入如图所示的首页.现在还没有登录,系统会提示输入用户名和密码进行登录，并选择权限,只有输入正确的用户名，密码和权限才能进入本系统，其他访问者将无权访问该系统。图 4-1 用户登录页面(2）loginchk。aspsession（”dlm）=dlmsession(type)=databaseend ifif session（dlm)” then-15if sess

33、ion（”type)=管理员”thenSession（”userlogin）=trueResponse。Redirect main.asp”Session（userlogin”）=”trueelseResponse.Redirect mainyh.asp”end ifend ifset Conn=nothingset rs=nothing%/验证具有不同权限的登陆用户登录（3）Opendb。inc文件主要代码如下：Set conn = Server.CreateObject(ADODB。Connection”）conn.open ”DRIVER=Microsoft Access Driver

34、（.mdb)； DBQ= DefaultDir server.mappath(”worker.mdb）;”Set rs = Server.CreateObject（ADODB.Recordset）Set rs1 = Server.CreateObject（ADODB。Recordset”)Set rs2 = Server。CreateObject(ADODB.Recordset”）Set rs3 = Server。CreateObject(”ADODB.Recordset)%/连接数据库4。2.2 页面框架（1）main.asp图 4-2 管理登陆页面（2)menu。asp-16图 4-3 菜

35、单页面4.2。3 员工列表查看模块（1)list.asp图 43 员工列表页面（2）搜索员工 sreach。aspsql=”select * from worker where name like t1” and card_no like”&t2&%elsesql=select * from worker where name like %t1 and card_nolike %t2” and part= ”&t3end ifrs.open sql,conn，1，1if rs.eof thenresponse。write”alert(对不起,-17没有符合搜索条件的记录！)；”response

36、.writejavascript:history.go(-1)；response。endend ifrs.pagesize=10if pagecountrs。pagecount or pagecount=0 thenpagecount=1end ifrs。AbsolutePage=pagecount （3)离职员工列表页 listout。aspalert(对不起，没有离职员工的记录！);”response。write”javascript：history.go(1）;/SCRIPT”response。endend ifrs。pagesize=10 %（4） 员工详尽信息显示页 disp。asp

37、代码如下：Set rs = Server.CreateObject(”ADODB。Recordset)-18sql=select * from worker where id=” request(id)rs。open sql,conn，3，2。elseSet rs = Server。CreateObject(ADODB。Recordset”）sql=”select top 1 * from worker order by id desc”rs.open sql,conn，3,2end if /td4。2.4 员工档案管理模块（1)新增员工页 addnew。asp图 44 分配用户权限页面(2）

38、保存员工信息记录页 saveinfo.asp代码如下：Set rs = Server。CreateObject(”ADODB。Recordset）sql=select from worker”rs。open sql，conn,3,2name=trim(request.FORM（”name”） ）memo=trim(request.FORM（memo)）if len（memo)1 thenmemo=” ”-19end ifcard_no=trim（request.FORM(”card_no”)）if len(card_no） 1 thencard_no=” ”end ifpart=trim(re

39、quest.FORM(selparts”） ）if len(part） 1 thenpart= end iftel=trim(request.FORM(”tel”）)if len（tel)1 thentel=” end ifadd=trim（request.FORM(”add） ）if len(add）1 thenadd= ”end ifsex=trim（request。FORM(sex）)if len（sex）1 thensex=” end ifwh=trim(request.FORM(”wh)if len(wh)1 thenwh= ”end ifjc=trim（request。FORM（j

40、c）)if len(jc） 1 thenjc=2000-11 ”end ifzc=trim（request。FORM（”zc”）)if len（zc)1 thenzc=” end ifzw=trim（request。FORM（”zw”)）-20if len（zw)1 thenzw= end ifgl=trim(request。FORM（gl”)if len(gl）1 thengl=0end ifhth=trim(request。FORM（hth）)if len(hth）1 thenhth=” ”end ifhtq=trim（request.FORM（htq”)if len（htq)1 then

41、htq=0end ifhtdq=trim(request。FORM（”htdq） ）cardno=trim（request.FORM(cardno”）)if len(cardno） 1 thencardno= ”end ifsj=trim(request。FORM（”sj） ）if len(sj）1 thensj= end if（3)修改员工信息记录页 editinfo.asp-214。2。5 考勤记录及统计管理模块（1)考勤记录页 kq.asp(2）保存考勤记录页 savekq。asp代码如下:Set rs = Server.CreateObject（”ADODB.Recordset”)sq

42、l=”select from worker where name=name” and card_no =”cno”rs。open sql，conn,3,2if rs。EOF thenresponse。writeSCRIPT language=JavaScriptalert(对不起，请输入正确的员工姓名和编号！） ；response.writejavascript：history.go（1);”response。endend ifwid=rs（id”)rs。closeSet rs = Server。CreateObject(”ADODB.Recordset）sql=select from roo

43、lrs。open sql,conn，3,2for i= 1 to 31-22cs=trim（request.FORM（”cs”i&） ）if cs” thenrs。AddNewrs(”wid”）=widrs（”kq）=”迟到rs（”ctime”)=csrs(date”)=irs（”km”）=kmonthrs（”ky)=kyearrs（”sx”）=上午”end ifcs=trim(request.FORM（”zsi”）)if cs” thenrs。AddNewrs(wid”)=widrs(kq”）=早退rs（”ctime）=csrs(”date）=irs（ky）=kyearrs(”km”)=km

44、onthrs(”sx”)=”上午end ifcs=trim（request.FORM（bs”i”）)if cs” thenrs。AddNewrs(wid”)=widrs（kq”)=”病假rs(”date)=irs(ky”)=kyearrs(”km)=kmonthrs(sx”)=”上午”end ifcs=trim（request。FORM(ss&i”） ）if cs” then-23rs.AddNewrs(”wid”)=widrs（kq”）=事假”rs（date)=irs(ky”)=kyearrs(km)=kmonthrs(sx”)=”上午end ifcs=trim（request。FORM（”

45、gs”&i&”)if cs” thenrs.AddNewrs(”wid)=widrs(kq）=”公假rs(”date”）=irs(”ky)=kyearrs（km)=kmonthrs(sx”)=上午end ifcs=trim（request。FORM（ks”i”） ）if cs” thenrs。AddNewrs(”wid”）=widrs(”kq）=加班rs(jtime）=cs-24rs（date）=irs(ky”)=kyearrs（km）=kmonthrs（sx”）=”上午”end ifcs=trim（request.FORM（cx”i&)if cs” thenrs。AddNewrs（wid”)

46、=widrs（”kq)=”迟到”rs（”ctime)=csrs(”date”）=irs（”ky”）=kyearrs（”km)=kmonthrs（sx”）=下午end ifcs=trim(request。FORM(zx”&i”）)if cs” thenrs。AddNewrs（”wid）=widrs（”kq”)=”早退rs（ctime”)=csrs(”date)=irs(”km)=kmonthrs（”sx”）=”下午rs(”ky”)=kyearend ifcs=trim(request.FORM(”bx”&i”)）if cs” thenrs.AddNewrs(”wid”)=widrs（kq”)=病

47、假”rs(”date”）=irs（”ky”）=kyear-25rs(”km”)=kmonthrs(”sx”)=下午end ifcs=trim（request.FORM（”gx&i”)）if cs” thenrs.AddNewrs（”wid”）=widrs(”kq)=”公假rs（”date)=irs（”ky”)=kyearrs(km”）=kmonthrs(sx”)=下午end ifcs=trim(request。FORM（”sx”&i&） ）if cs” thenrs.AddNewrs（”wid”)=widrs（kq)=事假”rs（”date)=irs（ky）=kyearrs(km”）=kmon

48、thrs(sx”)=下午end ifcs=trim（request.FORM(”kx”i”)）if cs thenrs.AddNewrs(”wid）=widrs(”kq）=”旷工rs（”date)=irs（ky)=kyearrs(”km)=kmonthrs（”sx”）=”下午”end ifcs=trim（request。FORM（jx”&i”)）-26if cs” thenrs.AddNewrs(”wid)=widrs(”kq”)=加班”rs(jtime)=csrs（”date”）=irs(ky”）=kyearrs(”km”)=kmonthrs（sx）=下午”end ifnextrs。upda

49、ters.closeresponse.redirect tj。asp？mm=”kmonth&yy=kyear&”&wid=”wid&”(3）考勤统计页 tj。asp（4)考勤记录汇总页 listkq。aspset rs=server.createobject(”adodb.recordset)if not isempty（request(page)） thenpagecount=cint(request(”page） ）pagecount=1elseend if-27sql=select from worker order by ”&gzdd” ”&keyrs.open sql，conn，1，

50、1if rs.eof and rs.bof thenresponse。 write” SCRIPT language=JavaScriptalert(对不起，没有符合搜索条件的记录!）;response.writejavascript:history.go（1);rs。pagecount or pagecount=0 thenpagecount=1end ifrs.AbsolutePage=pagecount 4。2。6 各种事项记录模块(1)员工培训记录页 px.asp(2）保存员工培训记录页 savepx。aspSet rs = Server。CreateObject（”ADODB。Rec