工资管理系统毕业设计论文

1、摘要1.第一章开发软件简介8.2.1 VisualBasic6.0简介8s恁润属钞瘗尻赖。2.2 Access简介1.02.3 开发工具的使用112.3.1 VisualBasic的使用及安装步骤12哪沟第獭t爱建谴净。2.3.2 数据库：MicrosoftAccess1笑鹫楼静WB淑塑藏2.3.3 数据库访问方式：ADO12r钢极OB镇桧猪锥。第三章数据库应用系统开发1.33.1 数据库管理系统143.2 数据库模式1.43.3 数据库信息管理系统分析1.4第二章系统设计与概要分析154.1 系统概要设计思路164.2 系统结构图和功能结构图1.74.3 运行设计1.84.4 数据库设计1.

2、94.5 数据库表格设计.19第三章系统部分代码与分析设计20军贸摄尔霁毙挪专卤尻。5.1 系统应用程序设计215.2 用户密码认证窗体的的实现2悌养技箧献铜类蒋蔷。5.3 系统各功能的实现及一些故障解析24厦礴恳蹒骈暗S的骚。第四章参考文献33工资管理系统摘要企业的工资管理是公司管理的一个重要内容。随着企业人员数量增加，企业工资管理系统的工资管理工作也变得越来越复杂。工资管理既涉及到企业劳动人事的管理，同时也是企业财务管理的重要组成部分。工资管理需要和人事管理相联系，同时连接工时考勤、奖惩、津贴和医疗保险等等，来生成企业每个职工的基本工资、津贴、医疗保险、保险费、实际发放工资等。资金是企业生

3、存的主要元素，资金的流动影响到企业的整体运作，企业员工的工资是企业资金管理的一个重要的组成部分。早期的工资统计和发放都是使用人工方式处理纸质材料，不仅花费财务人员大量的时间且不易保存，往往由于个人的因素抄写不慎或计算疏忽，出现工资发放错误的现象。早期工资管理多采取纸质材料和具有较强的时间限制。基于以上原因，企业工资管理系统使用电脑安全保存、快速计算、全面统计，实现工资管理的系统化、规范化、自动化。企业工资管理系统是典型的信息管理系统(MIS),前台程序开发工具采用微软的VISUALBASIC,后台数据库采用ACCESS数据库。VISUALBASIC是一种面向对象的开发工具，具有组件丰富、语言简

4、单、功能强大的优点。ACCESS数据库具有与VISUALBASIC无缝连接、操作简单、易于使用的优点。运行结果证明，它成为了现代化企业管理的标志。茕桢广鲍触选块网踊泪。关键词：工资管理信息管理数据查询数据库VISUALBASICACCESS工资管理系统工资管理系统第一章开发软件简介1.1 VISUALBASIC6.0简介VisualBasic6.0是用来创建高性能的企业应用及基于Web的应用程序的最有效工具。集成进来的可视化数据库工具和一个RAD（快速应用开发）环境能提高生产效率，而自然代码编译则能生成运行速度更快的应用程序。鹅娅尽揖鹤惨屣茏使用集成在VisualBasic6.0里的可视化数据

5、库工具和新的数据环境设计器工资管理系统（DataEnvironmentDesigned可视化地设计Oracle和MicrosoftSQLServer数据库，创建可重用的数据查询语句、过程这些都不必离开VisualBasic环境。K丛妈趣为瞻债蛭练浮。创建在任何一个装有VisualBasic6.0Web类库的平台上使用任何一个浏览器都可轻松地访问的服务器方Web应用程序。使用新的动态HTML页面设计器编制高交互性的Web页面象编制VisualBasic表格一样轻松。51m圣的破龈讶骅汆。使用下列工具可获得组开发特性和可调节性：MicrosoftVisualSourceSafe6.0工程元素管理器

6、、VisualModeler、MicrosoftSQL服务器6.5开发版、Microsoft事务服务器、MicrosoftInternet信息服务器和Microsoft消息队列服务器。渗彰呛俨匀谓鳖调砚金帛。一.VisualBasic6.0有以下特点：1 .可视化VisualBasic是可视化编程的先驱和典范，Visual的英文含义就是可视性。实际上，VisualBasic所展现出来的可视性风格，已经成为了诸多可视化集成开发工具的参照标准。可视化环境下创作前端界面就如同做拼图游戏那样简单，VisualBasic之所以成为Windows环境下快捷、便利的前端开发工具，并获得最广泛的用户群体支持，

7、其所具有的高度智能的人性化可视开发环境起了很大的作用。钱卧泻噬圣骋睨项廉。2 .面向对象面向对象编程（OOP）诞生于20世纪80年代初期，并先期在SmallTalk、C+等程序设计语言中实现，随着面向对象编程方法的成熟，它所具有的优越性愈趋明显，于是被渐渐引入到各种传统高级编程语言中，自然也被嵌入到了VisualBasic中。施凤袜备音晴S轮烂蔷。面向对象编程是建立在类模块基础上的，并通过类的封装、继承、多态性获得代码重用。和C+相比，VisualBasic6.0的面向对象特性是不够完全的，它缺少类的继承性，因此依靠类获得代码重用在VisualBasic6.0中受到了一定程度的限制。尽管如此，

8、通过类来构造应用系统，则仍是VisualBasic6.0最有效的手段，这个特点尤其体现在它所具有的基于部件的编程方法上。irn俣阍部t阊邺钱鼠3 .部件编程基于部件的编程方法是分布式构架思想体系的具体化。在VisualBasic中进4工资管理系统行部件编程是通过微软的部件对象模型(COM,ComponentObjectModel)实现的。COM是建立在二进制标准上的对象模型，其具有通用性。因此，在VisualBasic中创建的部件，可以自用，也可以在其他开发环境中(如VisualC+)使用，同时VisualBasic也可以引用由其他开发工具建立的部件。由于COM建立的是基于二进制标准的对象，并

9、具有接口继承性，因此可以通过部件编程，而使用VisualBasic6.0所缺乏的对类的继承特性有所弥补。坛搏乡it忏篓锲铃电。4 .事件驱动基于事件编程是通过VisualBasic创建软件系统时的最主要手段之一。事件概念是面向对象方法中，外界操作对象由一种状态过度到另一种状态时，对象对外界的感应接口。基于事件驱动的编程方法体现在：程序的执行是依靠系统能够被识别的触发事件启动的。用户操作、系统消息，以及程序等各种因素都可能触发事件。当对象由一种状态过渡到另一种状态时，可能会发生许多个与时间相关的有序事件，而事件顺序又将决定着代码执行顺序，因此，基于事件驱动编写程序也就成为了根据有待解决的问题性质

10、合理安排事件和根据事件顺序有效地组织程序。蜡燮夥寤幸艮住铉锚金市赘。1.2 ACCESS简介建立一个数据库我们有多种选择，现在市场上有各种各样的数据库，而且每一种数据库都有其自身的特点，不能说哪一种更好，只能在其中寻找一种能更好地适应系统需求、更好地满足用户的要求以及适应开发人员的习惯。在本系统中，做为图书仓库管理系统是一个比较小的应用系统，它所产生和处理的数据量也比较小。因此，没有必要使用像SQLServer和Oracle这样的大型数据库。我首先想到的数据库是Borland公司的Paradox数据库。另外，MicrosoftOffice中的Access数据库在计算机上的应用比较普及,是开发小

11、型数据库系统的比较理想的选择，所以，在本系统中我选择了Access数据库。翼雕辅昙叫闫撷凄。Access做为一个数据库管理系统，它被集成在MicrosoftOffice中。Access数据库处理的基本结构，采取关系型数据库模式。与其他的数据库系统相比，Access更加简单易学，一个普通的计算机用户可以很快地掌握它。Access2000的功能十分强大，利用它可以方便地实现对信息保存、维护、查询、统计、打印、交流、发布，而且它可以十分方便地与Office其他组件交流数据，这些功能对一工资管理系统个一般用户而言已经足够了。铺鹏踪韦辕耀。数据库是有结构的数据集合，它与一般的数据文件不同，(其中的数据是

12、无结构的)是一串文字或数字流。数据库中的数据可以是文字、图象、声音等。嬲通!彦决绥Hi饴31锦。MicrosoftAccess是一种关系式数据库，关系式数据库由一系列表组成，表又由一系列行和列组成，每一行是一个记录，每一列是一个字段，每个字段有一个字段名，字段名在一个表中不能重复。图1是一个产品”表的例子。产品”表由10个记录组成，一个记录占一行，每一个记录由产品ID、产品名称、库存量、订货量、单价和折扣率6个字段组成。产品ID”是字段名，其下面的1,2等是字段的值。表与表之间可以建立关系，以便查询相关联的信息。Access数据库以文件形式保存，文件的扩展名是MDBo猫蚕11绘熠f诛髅既尻。1

13、.3 开发工具的使用2 .VisualBasic6.0的使用及安装步骤：VisualBasic是微软推出的基于窗口的可视化开发工具。其中，Visual所指的是开发图形拥护界面(GUI,GraphicalUserInterfaced的可视化方法。无需编写大量原代码去描叙用户界面元素的外观位置，而只要把预先建立好的控件对象用鼠标拖入到设计窗体上，这就是可视化方法带来的便利。锹籁饕迳琐箝奥鸥娅番BASIC是微软最早期的传统产品，VisualBasic继承了BASIC最显著的简单、易用的特色。但是，VisualBasic却又和传统BASIC有着本质的区别，主要表现在可视化、面向对象、部件编程、时间驱动

14、等方面。VisualBasic是Windows环境下最快捷、便利的通用开发工具之一，且有只能特性集成开发环境，拥有广泛的拥护群。横氽if簧硕饨芹龈话鸯。1VisualBasic6.0安装方便快捷易于操作。(1)启动安装程序。通过Windows的控制面板添加删除程序”、资源管理器”、我的电脑”运行VisualBasic6.0安装光盘上的Setup.exe程序。U峰隔槿喇询偎虢荥。(2)输入CD号。在安装过程中，安装程序会要求输入CD号，它是安装口令，用户可以从软件商提供的资料找到该CD号。尧侧叫旬融盛t(3)输入姓名及用户单位。在安装过程中系统会要求用户输入姓名和用户单工资管理系统位。可以在姓名

15、”输入框中输入用户的姓名，在单位”输入框中输入工作单位。单击安装程序界面上确定”按钮继续安装。识蒯醐缢雕!嗜俨豪(4)安装路径的选择。安装程序允许选择安装路径。通过单击安装程序界面上的更改文件夹”按钮，可以设置安装路径。潮姬劳1储痫嫦胫汆。三.安装方法的选择。VisualBasic6.0提供典型安装”和自定义安装”两种方式：(1)典型安装：在这种安装方式中，VisualBasic6.0的所有文件都将安装到硬盘上。(2)自定义安装：按用户的要求安装所要求安装所需要的VisualBasic6.0组件。VisualBasic6.0经过磁盘空间检查后，开始进行安装。在安装过程中会提示用户是否要安装大量

16、的联机手册，如果有很充足的硬盘空间，建议安装这些文件。安装程序最后会要求重新启动计算机，并完成安装过程。底翱T灭萦欢壕爵询。3 .数据库：MicrosoftAccessAccess是关系数据库开发的工具，数据库能汇集各种信息以查询、存储和检索。Access的优点在于它能使用数据表示图提供了一种类似于Excel的电子表格,可以是数据一目了然。另外，Access允许创建自定义报表用于打印或输出数据库中的信息。Access也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。Access是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。Acc

17、ess多用于中小型企业来设计中小型数据库，一般的学校教务系统的数据库用Access来设计完全能达到要求。由于考虑到本系统是应用在单机系统上，只建立起一个数据库。鲨胃输出4 .数据库访问方式：ADOADO(ActiveDataObjects)实际是一种提供访问各种数据类型的连接机制。ADO设计为一种极简单的格式，通过ODBC的方法同数据库接口。可以使用任何一种ODBC数据源，即不止适合于SQLServer、Oracle、Access等数据库应用程序，也适合于Excel表格、文本文件、图形文件和无格式的数据文件。ADO是基于OLE-DB之上的技术，因此ADO通过其内部的属性和方法提供统一的数据访问

18、接口方法。其主要优点是易于使用、高速度、低内存支出和占用磁盘空间较少0硕顽诒撵樽哮效。工资管理系统第二章数据库应用系统开发在数据库应用系统开发之前，对开发数据库的基本概念应当了解，对数据库的结构，开发数据库应用程序的步骤，开发体系及方法都应当有相当清晰的了解工资管理系统和认识。数据应用系统开发的目标是建立一个满足用户长期需求的产品。开发的主要过程为：理解用户的需求，然后，把它们转变为有效的数据库设计。把设计转变为实际的数据库，并且这些数据库带有功能完备，高效能的应用。数据库技术在计算机软件领域研究中一直是非常重要的主题，产生于60年代，30多年来数据库技术得到了迅速发展，并已形成较完善的理论体

19、系和一大批实用系统。并且，近年来，随着WorldWideWeb(WWW)的猛增及Internet技术的迅速发展，使得数据库技术之时成为最热门技术之一。阕擞榭豳i迁择植秘H。3.1 数据库管理系统数据库管理系统(DBMS)是指数据库系统中管理数据的软件系统。DBMS是数据库系统的核心组成部分。对数据库的一切操作，包括定义，更新及各种控制，都是通过DBMS进行的。DBMS总是基于某种数据模型，可以把DBMS看成是某种数据模型在计算机系统上的具体实现。根据数据模型的不同，DBMS可以分成层次型，网状型，关系型，面向对象型等。MSSQLSerever2000就是一种关系型数据库管理系统。量啕腼贸恳哪S

20、颔杲。关系模型。关系模型主要是用二维表格结构表达实体集，用外键表示实体间联系。关系模型是由若干个关系模型式组成的集合。关系模式是相当于前面提到的记录类型，它的实例称为关系，每个关系实际上是一张二维表格。关系模型和层次，网状模型的最大判别是用关键码而不是用指针导航数据。SQL语言是关系数据库的标准化语言，已得到了广泛的应用。设计子系统有一个方便数据库及其应用创建的工具集。它典型地包含产生表，窗体，查询和报表的工具。DBMS产品还提供编程语言和对编程语言的接口。运行子系统处理用设计子系统开发的应用组建。它所包含的运行处理器用来处理窗体和数据库的数据交互，以及回答查询和打印报表等。数循瓷B剌#孙碱前

21、赘。3.2 数据库模式数据库模式定义了数据库的结构，表，关系，域和业务规则。数据库模型是一种设计，数据库和应用正是建立在此基础上的。域是一列可能拥有的值的集合。必须为每一个表的每一列确定域。除了数据的物理格式外，还需要确定是否有些工资管理系统域对*表来说是唯一的。怂阐阖陵迳醇啸重是凉。数据库模式的最后一个要素是业务规则，它是对需要反映在数据库和数据库应用程序中的业务活动的约束。业务规则是模式的一个重要部分，因为他们指定可无论什么数据变化到达DBMS引擎，允许的数据值必须满足的约束。不管无效的数据变化请求是来自窗体的用户，查询/修改请求还是应用程序，DBMS都应该才巨绝。谚辞担谄动律泻第3.3

22、数据库信息管理系统分析信息系统的主要任务是通过大量的数据获得管理所需要的信息，这就是必须存储和管理大量的数据。因此建立一个良好的数据组织结构和数据库，使整个系统都可以迅速，方便，准确地调用和管理所需的数据，是衡量信息系统开发工作好坏的主要指标之一。啜觐言圭缘砌嗫俱触铃铸。数据库设计主要是进行数据库的逻辑设计，即将数据按一定的分类，分组系统和逻辑层次组织起来，是面向用户的。数据库设计时需要综合企业各个部门的存档数据和数据需求，分析各个数据之间的关系，按照DBMS提供的功能和描述工具，设计出规模适当，正确反映数据关系，数据余少，存取效率高，能满足多种查询要求的数据模型。樊绐剧幅龈库。关系数据结构的

23、建立：在进行了数据基本结构的规范化重组以后，还必须建立整个数据的关系结构。这一步设计完成后数据库和书记结构设计工作基本完成只待系统实现时将数据分析和数据字典的内容代入到所设计的数据整体关系结构中，一个规范化的数据库系统结构就建立起来了。11渍蟆俾阅剜鲫胃暹藏。建立关系数据结构涉及三方面内容：确定关联的关键指标项并建立关联表；确定单一的父系记录结构：建立整个数据库的关系结构。封忧蒋氯僦B躁悯鹫。第三章系统设计与概要分析4.1 系统设计思路10工资管理系统在软件需求分析阶段，搞清楚了软件做什么"的问题，形成了目标系统的逻辑模型。现在我们所要做的就是要把软件做什么”的逻辑模型变换为怎么做”

24、的物理模型，即着手实现软件的需求。首先，我们需要描述的是系统的总的体系结构。颖刍堇蚊库亿顿裳赔洸。系统的概要设计中最重要的就是系统的模块化。模块化是指解决一个复杂问题时自项向下逐层把软件系统划分成若干个模块的过程。每个模块完成一个特定的功能，所有的模块按某种方法组织起来，成为一个整体，完成整个系统所要求的功能。濡潺月詹理聚翅PfitB寝聪。将系统划分为多个模块是为了降低软件系统的复杂性，提高可读性、可维护性，但模块的划分不能是任意的，应尽量保持其独立性。也就是说，每个模块只完成系统要求的独立的子功能，并且与其他模块的联系最少且接口简单，提高模块的独立性，为设计高质量的软件结构奠定基础。跳第曼底

25、鳗鸿钱蹲京。我首先将整个系统化分为几个小问题，小模块，进一步细分模块，添加细节。比如:工资管理系统分为工资系统管理模块、工资输入模块、工资查询模块和系统维护模块等。挤火§电恭吉的#哓类。一个基本的工资管理系统有利于对工资进行方便的录入、查询、显示等，不但可以提高工作效率，还可以提高单位人员的积极性，增强单位的活力。平时在工资的统计和发放中难免会出现一些差错，既浪费人力又不能很好的提高计算的准确性。而工资的发放又有较强的时间限制。开发工资管理系统，用计算机来统计和计算工资，可以避免了许多人工发放时工资的差错，不仅可以保证计算的准确性，还可以对各种信息进行统计。其主要任务是用计算机对各种

26、工资信息进行日常的管理，如查询、修改、增加、删除以及存储等，迅速准确地完成各种工资信息的统计工作。针对系统服务对象的具体要求，设计了本工资管理系统。通过对用户需求的分析，我们可以分析出工资管理系统大致可以分为4个模块：登录模块，工资输入模块，工资查询模块，系统维护模块。结构与功能模块如下：赔前余申谄命骤辽辈袜金卷。4.2 .工资管理系统结构图与功能结构图工资管理系统结构图11工资管理系统工资管理系统系统管理输入模块查询模块维护模块本工资管理系统主要有以下几大功能:(1)可对人员的工资进行修改、录入、删除。(2)查询功能。要求即可以按照一定的查询方式进行，比如按照车间，科室，姓名，工号等基本信息

27、来进行查询。埴雕画!决穗赛金卜册箪(3)系统登录管理方便安全，采用了账号密码，防止了信息的泄漏。(4)维护性大大提高了，有利于工作人员随时快捷的对本系统进行维护和删改措施。.工资管理系统功能结构图12工资管理系统工资管理系统系统管理用户管理退出系统输入模块员工基本信息员工照片信息员工奖惩情况查询模块按工号查询按姓名查询按车间科室号维护模块员工信息维护员工信息删除13工资管理系统裳棣祕JMffi颤谚剑芈蔺。本工资管理系统功能结构模块的特点：(1)本工资管理系统的登录状态大大提高了其系统的安全运行，以防人们可以随意的更改信息，用户只能通过帐号密码来登录本工资管理系统。仓嫄黯世嘱珑t”襦。(2)由管

28、理信息系统的父模块的向后延伸成几个具有各自间独立功能的子模块甚至子模块下的二级模块，具有易辨认性、准确性、高效性可观性等。绽郁螂娱wm蠲络淆鼠(3)系统管理模块下的用户管理和退出系统模块既让用户清楚的了解整个系统的设计，又能够在第一时间内退出登录，节省了时间。骁顾烽果琉意翰®(4)当进入输入模块时候，用户可以清晰的知道自己想要如何根据自己的需要来查询到自己想要查询的员工信息以及该员工的奖惩情况。底横暧障银缰!孀凉。(5)当用户找到该确定员工时，可依照其工号、姓名、以及车间或科室号来进行查询其工资等信息情况。(6)最后进入到管理员的维护模块了.此模块的设计都依据着以员工为本的思想，对员

29、工的基本信息包括其工资、奖惩、照片及信息等基本情况，有效的时时保护着整个系统的稳定运行，如发生需要变动或者删除、添加及更改的，管理员能够对其系统进行相应的维护措施，有效的避免了信息的错误及做好安全性的防范。和寺浬艳损楼期覆觞类乳4.3 运行设计(1)运行模块的单独运行具体软件的单独运行模块为程序提供了良好的运行环境，使其不易在查询信息的时候发生错误以及发生系统冗余，各个模块在软件运行过程中能较好的查询信息,处理数据等。栉缎欧锄a种瑶镂。(2)运行控制软件运行时有较友好的界面，基本能够实现用户的数据信息处理要求。4.4 数据库设计数据库设计属于系统设计的范畴。通常把使用数据库的系统统称为数据库应

30、14工资管理系统用系统，把数据库应用系统的设计简称为数据库设计。辔惮楝刚殓撰瑶丽阉应。按照软件工程对系统生命周期的定义，软件生命周期分为指定计划、需求分析、设计、程序编制、测试以及运行维护6个阶段。在数据库设计中也参照这种划分，把数据库应用系统的生命周期分为数据库规划、需求收集与分析、数据库设计与应用程序设计、实现、测试以及运行维护6个阶段。崛扬1黯调辐浸兴涣氤在信息世界中，信息从客观事物出发流经数据库，通过决策机构最后又回到客观世界，信息的这一循环经历了三个领域：信息世界，数据世界，现实世界。现实世界的事物反映到人的头脑中，人的大脑对它有个认识过程，经过分析（选择、命名、分类等）进入信息世界

31、。这些信息再进一步加工、编码，然后进入数据世界，而软件系统的开发工作需要考虑这两个方面的问题，也就是要考虑系统开发所需要的数据，以及如何对这些数据进行操作。这两个问题贯穿了整个软件系统的开发过程，这也就是数据库的设计问题，软件设计的一个核心。爵叁港内烬忧毁厉鹫。4.5 数据库表格设计我在系统中定义的表格都基本地按照范式的思想和要求去完成，数据是用ACCESS2003,系统中所有数据都存放在data.mdb中，定义了如下几张表格，分别是accounts系统用户表、车间信息表、科室工资信息表、奖惩信息表、基本工资信息表、员工信息表、工号信息表、通过对这几张表格的操作可以较好地完成系统设计的各项功能

32、，几张表格之间有着不同程度的联系。下面列出一些制作的表格分析。则觎惬靠痪K晖园栋游.admin表字段名称数据类型说明id数字登陆编号username文本登录名password数字密码typeid数字登陆次数15工资管理系统.员工信息表字段名称数据类型说明Id数字员工编号Number数字工号realname文本真实姓名age数字年龄sex文本性别room文本车间pic文本员工照片gongzi数字员工工资buzhu数字补助三.奖惩信息表字段名称数据类型说明userid文本用户名字title文本标题type文本奖惩类型money数字奖惩金额body文本奖惩情况16工资管理系统第四章系统部分代码和分析

33、设计5.1系统应用程序设计各功能细节的总体分析：1 .整个系统内的主要功能是添加，删除，修改。虽然从功能上看来比较简单但它们必须受到严格的制约。添加：不能添加已经存在或者关键字相同的数据删除：由于许多数据是互相关联的一一如：没有员工的基本信息，哪来员工的基本工资？所以在删除此类数据的时候一定要注意。胀鳗弹奥秘舔户挛钮聪。修改：同样的，不能修改成已经存在或者关键字相同的数据。有许多数据必须加以规范。比如说年龄和公司对福利的承担比例。2 .公司对福利的承担也不可能是100%,一般在015%左右。奖金的发放不能单纯的在部门内人数平分，这很可能要和他日常表现要有关联，所以每个人在最后工资发放阶段必须要

34、可以单独修改的可能。解W喇寿朗诵帮废捕叫3 .2用户认证系统密码窗体的实现本窗体是为了让工作人员按照用户和密码进行登陆。窗体界面、源代码如下：17工资管理系统源代码：Ifusername.Text=""Orpassword.Text=""ThenMsgBox"没有输入用户名，请输入!",vbOKOnly+vbExclamation,"警告username.SetFocusElseOnErrorResumeNextDimsqlDimrsAsNewADODB.Recordset'SQL查询语句，从管理员表中查询匹配用户名

35、和密码的记录sql="select*fromadminswhereusername='"&username.Text&"'andpassword1='"&password.Text&"'"rs.Opensql,conn,1,1IfErr.number<>0Then'错误捕捉，判断SQL语句是否出错MsgBoxErr.DescriptionEndIfIfrs.EOFThenMsgBox”没有这个用户，请重新输入用户名!",vbOKOnly+vb

36、Exclamation,吕口username.SetFocuspassword.Text=""Else18工资管理系统usernamel=rs（"username"）'usernamel为全局变量，用来标识管理员登录的标识conn.Closemain.ShowUnloadMeEndIf禀虚媛赈维跻脓扩枭。使用方法与功能介绍：用户名、密码不得随意输入，用户信息必须是已经存在与系统数据库中的，如果输入了错误的用户名或密码系统将提示你重新输入。如下图所示：随塞班M1烷呜旧指如果输入正确将进入系统主界面。主界面如下图所示:工资管理系统数据添加】【信息查询

37、】1信目雉1广】界面上有基础信息（里面包括：系统管理、数据添加、信息查询、信息维护）、用户管理（里面包括：用户管理、密码修改、退出登陆）数据添加（里面包括：员工信息、员工照片、奖惩情况）、信息维护（里面包括：员工信息、奖惩情况）、19工资管理系统还有员工信息、工资调整、基本工资、奖惩调整、几个小选项，你可根据你所要进行的事物来选择你所需要的功能。加唠麓苣楮阍S。(1).当进入者不是管理员身份时，我做了如下的设置：例如这是员工的帐号密码，进入后只能进行相关密码修改和系统退出，却不能进行查询等模块的功能的浏览。5.3系统各功能实现DimrsAsNewADODB.Recordset'判断新添

38、加的用户是否已经存在，如果存在，给出提示20工资管理系统sql="select*fromadminswhereusername='"&Textl.Text&"'"rs.Opensql,conn,1,1Ifrs.RecordCount>0Then'记录存在，提示，关闭对象，退出模块MsgBox"此用户名已经存在"rs.Closeconn.CloseExitSubElsers.Clone'"&'执行SQL语句插入指令insertintosql="in

39、sertintoadmins(username,password1Values('"&Text1.Text&"'Text2.Text&"')"conn.ExecutesqlMsgBox"添力口成功”钢璜荣产涛困蔺。DimrsAsNewADODB.Recordsetsql="select*fromusers"21工资管理系统rs.Opensql,conn,1,3IfErr.number<>0ThenMsgBoxErr.Descriptionrs.Closeconn.C

40、loseExitSubEndIf将数据插入到数据表中rs.AddNewrs("number")=number.Textrs("realname")=realname.Textrs("room")=room.Textrs("age")=age.Textrs("gongzi")=gongzi.Textrs("buzhu")=qita.TextIfsex(0).Value=TrueThenrs("sex")=sex(0).CaptionElsers("

41、sex")=sex(1).CaptionEndIfrs.Updaters.Close22工资管理系统，卜懿磅惬触乐鹏烬解鼠'显示对话框控件'从通用对话框返回的图片文件路径则获得©后面的字符串，即为dial.ShowOpenappa=dial.FileNameFori=Len(appa)To1Step-1IfMid(appa,i,1)<>""Then最右侧开始向左挨个字符进行判断，如果是图片文件名j=j+1Elsestrimage=Mid(appa,Len(appa)-j+1,j)'获得图片文件名，放至Ustrimage

42、变量中ExitForEndIfNextiIfappa<>""Thenappb=dia1.FileTitle'文件名称num=InStrRev(strimage,".")str1=Right(strimage,Len(strimage)-num)str2=Replace(Now,"-","")23工资管理系统str2=Replace(str2,".","")str2=Replace(str2,"","")str2=Re

43、place(str2,":","")获取图片后缀名FileName=str2&"."&strlfilel="uploadImage"&FileNameCommand2.Enabled=TrueFileCopyappa,App.Path&"uploadImage"&FileName'将图片复制到指定路径Image1.Picture=LoadPicture(App.Path&"uploadImage"&FileNam

44、e)EndIfChDriveLeft(App.Path,1)ChDirApp.Path饱竞争音馥就台癞别演。通加奖感X金额:备注：CallconDimrsAsNewADODB.Recordsetsql="select*fromuser_jc"rs.Opensql,conn,1,3rs.AddNew'添加记录，将数据插入数据库24工资管理系统rs("userid")=Combo2.Textrs("type")=Combol.Textrs("title")=Textl.Textrs("money&qu

45、ot;)=Text2.Textrs("body")=Text3.Textrs.UpdateIfErr.number<>0Then'判断金额是否为数字，如果不为数字，则程序出错,捕捉错误MsgBox"发生错误，请正确录入金额"Text2.SetFocusrs.Closeconn.CloseExitSubEndIfrs.Closeconn.CloseMsgBox"添加成功"吊铉俯欤谦鹃饺竞荡赚。DimrsAsNewADODB.Recordset25工资管理系统sql="select*fromuserswher

46、enumberlike'%"&Textl.Text&"%'andrealnamelike'%"&Text2.Text&"%'androomlike'%"&Text3.Text&"%'"'此句SQL查询语句Adodc1.RecordSource=sqlAdodc1.RefreshSetDataGrid1.DataSource=Adodc传谐龌新U组鬣绐殿减OnErrorResumeNextIfid.Text=""ThenMsgBox"请选择要修改的记录"ExitSubEndIfCallconDimrsAsNewADODB.Recordset26工资管理系统sql="select*fromuser_jcwhereid="&id.Text'SQL查询语句，与ID字段匹配的记录'修改指定记录rs.Opensql,conn,1,3rs("title")=title.Text'rs("userid")=realname.