企业设备管理系统_毕业论文.doc

蒂强网络 资源下载站专科生毕业设计（论文）摘 要随着计算机技术的飞速发展，计算机在日常管理中应用迅速得到了普及，利用计算机进行设备信息的管理势在必行。本系统是为了适应企业设备管理的信息化建设需要而设计的。整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发，完成企业部门管理、设备分类管理、设备的基本信息管理、设备使用管理、设备调拨管理、设备维护管理、设备报废管理、综合查询管理、用户信息管理及报表打印输出等功能。并通过设置权限管理来实现系统的安全性和可靠性的管理。本系统采用功能强大的Visual Basic 6.0面向对象编程语言设计而成，能够稳定而快捷地完成企业设备管理的信息化任务，从而取代了以往繁杂的人工劳动，提高了工作效率。通过实际应用，本系统能够满足需求，为企业的设备管理带来方便，提高了工作效率，具有较强的实用性和可行性。关键词：设备管理；信息管理；面向对象；实用性AbstractAlong with the computer technology rapid development, the computer applied in the daily management rapidly obtains the popularization, carried on the information imperative using the computer the management. This system is for adapt the unit enterprise equipment management information construction needs to design, uses function formidable Visual basic6.0 object-oriented programming language design becomes, can stabilize but quickly completes the unit enterprise equipment management the information duty, thus substituted for formerly the numerous and diverse artificial work, improved the working efficiency.The entire system from conforms to the operation is simple, the contact surface is friendly, is nimble, is practical, the safe request embarks, completes enterprise department management, equipment type management, equipment basic information management, equipment use management, equipment lend management, equipment maintenance management, equipment discard management, query management, user information management and report forms printout etc. And pass to establish usage legal power management to realize security and reliability of the system.Undergo the actual use proof, this system which this article designs satisfy the enterprise need. The system can bring convenience for equipment management, improve wok efficiency, and have quite practicability and feasibility. Key words：Equpment Management;Information Management;Object-oriented；practicability目 录第1章 绪 论11.1 选题背景11.2 课题来源及意义11.3 系统基本达到的目标及结论1第2章 可行性分析22.1可行性研究22.1.1 技术可行性22.1.2 经济可行性22.1.3 操作可行性22.2 软、硬件配置及结构32.2.1 硬件配置32.2.2 软件配置32.3 设计方法32.4 系统结构42.4.1 B/S模式简介42.4.2 B/S模式的优点4第3章 系统需求分析53.1 需求分析的任务53.2 系统数据流图的创建53.3 数据字典的创建6第4章 系统概念结构设计84.1 系统结构设计84.2 系统E-R图设计8第5章 系统逻辑结构设计115.1系统逻辑结构设计主要任务115.2 E-R图转换成关系模型115.3 数据模型的优化14第6章 数据库的物理实现156.1 数据库的物理设计的内容和方法156.2 数据库表的创建15第7章 系统应用程序设计187.1 系统功能设计187.2 系统功能模块设计187.3 系统的详细设计197.3.1登陆界面设计197.3.2用户管理界面设计227.3.3修改密码界面设计237.3.4设备分类管理界面设计257.3.5部门信息管理界面设计267.3.6设备基本信息管理界面设计267.3.7设备使用信息管理界面设计287.3.8设备调拨信息管理界面设计297.3.9设备维护信息管理界面设计297.3.10设备报废信息管理界面设计307.3.11设备信息查询界面设计307.3.12设备使用信息查询界面设计317.3.13设备调拨信息查询界面设计317.3.14设备维护信息查询界面设计327.3.15设备报废信息查询界面设计33第8章 调 试348.1系统运行调试情况348.3系统设计的特点34第9章 结 论35参考文献36致 谢37IV第1章 绪 论1.1 选题背景随着我国国民经济建设的蓬勃发展和具有中国特色的社会主义市场经济体制的迅速完善，各个行业都在积极使用现代化的手段，不断改善服务质量，提高工作效率，这些都在很大程度上给企业提出越来越严峻的挑战，对企业体系在企业管理水平以及优质服务上都提出更高的要求。建设一个科学高效的信息管理系统是解决这一问题的必经之路。1.2 课题来源及意义企业设备管理系统是一个企业单位不可缺少的部分,它对于企业的决策者和管理者来说都至关重要,所以企业设备管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件信息，这种管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。1.3 系统基本达到的目标及结论随着计算机技术的飞速的发展，计算机在企业管理中的应用越来越普及，企业要想生存和发展，要想在激烈的市场竞争中立于不败之地，没有现代化的管理是万万不行的，企业设备管理的全面自动化、信息化则是其中极其重要的部分。为了加快设备管理自动化的步伐，提高企业设备的管理业务处理效率，建立企业设备管理系统已变得十分必要。第2章 可行性分析2.1可行性研究随着科学技术的发展，社会进步，计算机技术迅速的发展,设备管理的方法也日新月异,以前全是由人工管理的方法现存在很多的缺点：管理效率低，劳动强度大，信息处理速度低而且准确率也不够令人满意。为了提高设备管理效率，减轻劳动强度，提高信息处理速度和准确性，为设备管理员提供更方便、科学的服务项目。我选择了由计算机来设计一个设备管理系统的方案。让计算机对设备进行自动管理，设备管理员可以直接在计算机上实现设备信息的管理，并能在一定程度上实现自动化。通过对一些企业进行的实际深入调研，我开发出这套功能比较完整、通用性比较强、成本低廉的企业设备管理系统。 2.1.1 技术可行性根据管理员提出的系统功能、性能及实现系统的各项约束条件，本系统是一个数据库管理和查询的系统，因此，要使用一种具有强大的数据库操作功能、面向对象的可视化语言来进行代码的编写。 Microsoft Visual Basic 6.0 中文版的使用简单，功能强大，完全可以实现这些功能。Visual Basic 6.0使用灵活，操作简单，可视化的操作界面为高效的开发过程提供了前提。而Microsoft SQL Server 2000 功能强大，可以很好的完成数据库的建立，并可以与 Visual Basic 6.0 进行配合，两者相辅相成，共同开发数据库软件是一种很合理的选择。此系统采用微软 SQL Server 2000 建立数据库，用 Visual Basic 6.0 来创建界面，并且用它来访问数据库，实现用户的基本要求。2.1.2 经济可行性现在市场上流行的企业设备管理系统之类的软件通用性、灵活性稍微要差一些，不能完全提供所需的要求。另外，该系统的价格一般相当昂贵，一般的中小型企业承受不了昂贵的支付能力。所以应该根据企业的具体情况设计适合企业的软件系统。2.1.3 操作可行性采用此系统，可以减轻管理人员的工作量，使管理人员从大量繁琐的添表、查表、手工制表中解放出来。能够节省大量的人力、物力，工作效率大大提高，预计查询速度可以比原人工查询提高几倍以上，并且可以大大提高准确性和精确性，而且可以安全地、完整地保存大量的设备记录。使设备的管理更加规范化，系统化。此项目虽然经济效益不是太大，但可以减轻工作人员的劳动强度，并可以促进企业对设备管理的规范化和自动化，而且价格低廉，所以是有应用价值的，而且在技术上完全是可行的，可以马上进行开发工作。2.2 软、硬件配置及结构2.2.1 硬件配置硬件： 586 型号以上计算机一台，打印机一台。2.2.2 软件配置软件： Windows95/98/2000/XP 操作平台（中文版） Microsoft SQL Server 2000、Visual Basic6.0 （中文版）。1使用工具介绍VB6.0全称为VisualBasic 6.0，是微软公司推出的可视化编程工具MSDN之一，是目前世界上使用最广泛的程序开发工具。即使考虑到VB程序本身编译和运行效率较低的不足，单是它的快捷的开发速度，简单易学的语法，体贴便利的开发环境，它仍不失一款优秀的编程工具。2后台数据库的介绍SQL Server 2000 是Microsoft 公司推出的SQL Server 数据库管理系统的最新版本该版本继承了SQL Server 7.0 版本的优点同时又比它增加了许多更先进的功能具有使用方便可伸缩性好与相关软件集成程度高等优点可跨越从运行Microsoft Windows 98 的膝上型电脑到运行Microsoft Windows 2000 的大型多处理器的服务器等多种平台使用。2.3 设计方法本系统是以Visual Basic作为前台开发工具，以SQL Server 2000作为后台数据库实现信息管理。2.4 系统结构2.4.1 B/S模式简介B/S结构（Browser/Server结构）结构即浏览器和服务器结构。它是随着Internet技术的兴起，对C/S结构的一种变化或者改进的结构。在这种结构下，用户工作界面是通过WWW浏览器来实现，极少部分事务逻辑在前端（Browser）实现，但是主要事务逻辑在服务器端（Server）实现，形成所谓三层3-tier结构。这样就大的总体成本（TCO）。以目前的技术看，局域网建立B/S结构的网络应用，并通过Internet/Intranet模式下数据库应用，相对易于把握、成本也是较低的大简化了客户端电脑载荷，减轻了系统维护与升级的成本和工作量，降低了用户。它是一次性到位的开发，能实现不同的人员，从不同的地点，以不同的接入方式（比如LAN, WAN, Internet/Intranet等）访问和操作共同的数据库；它能有效地保护数据平台和管理访问权限，服务器数据库也很安全 。2.4.2 B/S模式的优点用户可以通过WWW例览器去访问Internet上的文本、数据、图像、动画、视频点播和声音信息，这些信息都是由许许多多的Web服务器产生的，而每一个Web服务器又可以通过各种方式与数据库服务器连接，大量的数据实际存放在数据库服务器中。客户端除了WWW创览器，一般无须任何用户程序，只需从Web服务器上下载程序到本地来执行，在下载过程中若遇到与数据库有关的指令，由Web服务器交给数据库服务器来解释执行，并返回给Web服务器，Web服务器又返回给用户。在这种结构中，将许许多多的网连接到一块，形成一个巨大的网，即全球网。而各个企业可以在此结构的基础上建立自己的Intranet。B/S结构的优点1具有分布性特点，可以随时随地进行查询、浏览等业务处理。 2业务扩展简单方便，通过增加网页即可增加服务器功能。 3维护简单方便，只需要改变网页，即可实现所有用户的同步更新。 4开发简单，共享性强。第3章 系统需求分析3.1 需求分析的任务需求分析是对用户需求的真正明确，是对要解决的问题的彻底理解。在解决问题之前要理解问题，只有真正的理解问题才能更好的解决问题。需求分析就是给系统分析、设计人员一个和用户交流来理解问题的机会了解用户究竟需要什么。3.2 系统数据流图的创建数据流程图是软件工程学和管理信息系统科学中的概念,它描述的是一个具体的业务处理系统的信息来源,存储,处理和信息将要流到何处去的全面情况,它可以辅助计算机专业人员更好的了解现有系统的一些状况,但还需要一些工具来补充系统的流程细节。数据流图就是采用图形方式来表达系统的逻辑功能、数据在系统内部的逻辑流向和逻辑变换过程，是结构化系统分析方法的主要表达工具及用于表示软件模型的一种图示方法。图3.1数据流程图3.3 数据字典的创建数据字典是一种用户可以访问的记录数据库和应用程序元数据的目录。主动数据字典是指在对数据库或应用程序结构进行修改时，其内容可以由DBMS自动更新的数据字典。被动数据字典是指修改时必须手工更新其内容的数据字典。数据字典是以数据中数据基本单元为单位，按一定顺序排列，对其内容作详细说明的数据集。数据字典中存放着系统中所有数据的定义，即对所有数据库结构的描述。数据字典提供了对数据库描述的集中管理手段。数据字典是一个定义应用程序中使用的所有数据元素和结构的含义、类型、数据大小、格式、度量单位、精度以及允许聚值范围的共享仓库。作用是确保开发人员使用统一的数据定义，数据字典中有关系统的详细信息是系统设计、系统实施与维护的重要依据。是关于数据信息的集合，也就是对数据流图中包含的所有元素定义的集合。任何字典最主要的用途都是供人查阅不了解的条目的解释，数据字典的作用也正是在软件分析和设计过程中给人提供关于数据的描述信息。数据流图和数据字典共同构成系统的逻辑模型，没有数据字典数据流图就不严格，然而没有数据流图数据字典也难于发挥作用。只有数据流图和对数据流图精确的定义放在一起，才能共同构成系统的规格说明。 由于元素太多我们只对其中主要的元素定义说明。由于暂时还没有自动的数据字典处理程序，我们采用卡片形式书写数据字典，每张卡片上保存描述一个数据元素的信息。这种做法较好的实现了上述要求，特别是更新修改起来很方便，能够单独处理每个数据元素的信息。每张卡片上包含的信息有：名字，别名，描述，定义，位置。以下是数据流图中主要元素的数据字典卡片:名字：数据库文件别名：描述：是企业设备管理系统的数据库。是软件的核心数据库，有软件主窗体的所涉及的数据库。定义：数据库文件=部门信息表 +设备分类表+用户信息表+设备信息表+设备使用表+ 设备借入借出表+设备维护表+设备报废表位置：系统磁盘存储器名字：数据库备份文件别名：描述：是企业设备管理系统数据库的备份文件。以防数据库崩溃或出现其他问题，可以进行数据库恢复。定义：位置：自定义的系统磁盘位置名称：用户实体别名：描述：记录客户的身份等详细信息。便于管理。定义：用户实体=用户名+用户密码+用户权限位置：系统数据库名称：部门分类实体别名：描述：记录各部门的基本信息定义：部门分类实体=分类编号+部门名称位置：系统数据库名称：设备分类实体别名：描述：记录各个设备的类别。定义：设备分类实体=分类编号+设备名称位置：系统数据库名称：设备信息实体别名：描述：记录各个设备的信息定义：设备信息实体=编号+设备名称+设备型号位置：系统数据库名称：设备使用实体别名：描述：记录各个设备的状态。定义：设备使用实体=设备编号+设备名称+编号+设备状态位置：系统数据库名称：设备借入借出实体别名：描述：记录各个设备的使用信息定义：设备借入借出实体=设备编号+设备名称+所在部门+所借部门+状态位置：系统数据库名称：设备维护实体别名：描述：记录各个设备的使用情况。定义：设备维护实体=设备编号+设备名称+所在部门位置：系统数据库名称：设备报废实体别名：描述：记录各个设备的信息，以及使用期限定义：设备报废实体=设备编号+设备名称+所在部门位置：系统数据库第4章 系统概念结构设计4.1 系统结构设计系统总体结构设计是要根据系统分析的要求和组主的实际情况来对新系统的总体结构形式等进行大致的设计，是宏观上的规划。数据库设计是分析和创建保存系统数据的数据库结构设计，数据库的设计将直接影响系统的运行效率和系统进度。4.2 系统E-R图设计E-R图也即实体-联系图(Entity Relationship Diagram)，提供了表示实体型、属性和联系的方法，用来描述现实世界的概念模型。构成E-R图的基本要素是实体型、属性和联系，其表示方法为：实体型(Entity)：用矩形表示，矩形框内写明实体名；比如学生张三丰、学生李寻欢都是实体。如果是弱实体的话，在矩形外面再套实线矩形。属性(Attribute)：用椭圆形表示，并用无向边将其与相应的实体连接起来；比如学生的姓名、学号、性别、都是属性。如果是多值属性的话，再椭圆形外面再套实线椭圆。如果是派生属性则用虚线椭圆表示。联系(Relationship)：用菱形表示，菱形框内写明联系名，并用无向边分别与有关实体连接起来，同时在无向边旁标上联系的类型（1 : 1，1 : n或m : n）。 比如老师给学生授课存在授课关系，学生选课存在选课关系。如果是弱实体的联系则在菱形外面再套菱形。 下面是各个实体的E-R图：图4.1用户实体E-R图图4.1部门分类实体E-R图图4.3设备分类实体E-R图图4.4设备信息实体E-R图图4.5设备使用实体E-R图图4.6设备借入借出实体E-R图图4.7设备维护实体E-R图图4.8设备报废实体E-R图第5章 系统逻辑结构设计5.1系统逻辑结构设计主要任务本系统采用Microsoft SQL Server 2000 建立数据库，包括八张表：“部门信息表” 、“设备分类表” 、“用户信息表”、“设备信息表”、“设备使用表”、 “设备借入借出表”、“设备维护表” 、“设备报废表”。5.2 E-R图转换成关系模型E-R转换为关系模型一般遵循的原则:一个实体型转换为一个关系模型.实体的属性就是关系的属性,实体的码就是关系的码.对于实体型图的联系则有以下不同的情况:1一个1:1联系可以转换为一个独立的关系模型,也可以与任意一端对应的关系模型式合并，如果转换为一个独立的关系模式，则与该联系相联的各实体的码以及联系本身的属性均转换为关系的属性，每个实体的码均是该关系的候选码。如果与某一个实体对应关系模式合并，则需要在该关系模式的属性中加如入一个关系模式的码和联系本身的属性。2一个1:n联系可以转换为一个独立的关系模式，也可以与n端对应的关系模式合并。如果转换模式为一个独立的关系模式，则与该联系相连的各个实体的码以及联系本身的属性均转换为关系的属性，而关系的码为n端实体的码。3一个m：n联系转换为一个关系模式，与该联系相连的各实体的码以及联系本身的属性均转换关系的属性，各实体的码组成关系的码或关系码的一个部分。43个或3个以上的实体间的一个多元联系可以转换为一个关系模式。与该多元联系相连的各实体的码以及联系本身的属性均转换为关系的属性，各实体的码组成关系的码或关系码的一部分。5具有相同码的关系模式可合并。表5.1部门信息表列名数据类型长度允许空id int4不允许空depIdnvarchar50不允许空depNamenvarchar50主键表5.2 用户信息表列名数据类型长度允许空IdInt 4主键UserNamenvarchar4不允许空UserPwdnvarchar50不允许空UserTypeint4不允许空表5.3 设备信息表列名数据类型长度允许空Idnvarchar50主键Namenvarchar50不允许空Modelnvarchar50不允许空Pricefloat8不允许空Dcountint4不允许空Dsumfloat8不允许空PurchaseDatedatetime8不允许空Posternvarchar10不允许空madeplacenvarchar200不允许空 表5.4设备使用信息表列名数据类型长度允许空deNonvarchar50不允许空DevIdnvarchar50主键DevNamenvarchar50不允许空Ucountint4不允许空续表5.4Statusnvarchar50不允许空UseDatedatetime8不允许空Mannvarchar50不允许空 表5.5设备借入借出信息表列名数据类型长度允许空Idint4主键DevIdnvarchar50不允许空Depnameint4不允许空Operationnvarchar50不允许空LendDeptNamedatetime8不允许空LendDatedatetime8不允许空LendMannvarchar50不允许空表5.6 设备维护信息表列名数据类型长度允许空Idint4主键DevIdnvarchar50不允许空DevNamenvarchar50不允许空DepNamenvarchar50不允许空MnDatedatetime8不允许空MnSumfloat8不允许空MnNamenvarchar50不允许空Statusnvarchar50不允许空Reasonnvarchar200不允许空huiDatedatetime8不允许空表5.7设备分类表列名数据类型长度允许空Idnvarchar4不允许空DevIdnvarchar50不允许空DevTypenvarchar50主键表5.8设备报废信息表列名数据类型长度允许空DevIdnvarchar50主键DevNamenvarchar50不允许空DepNamenvarchar50不允许空CreateDatedatetime8不允许空Dsumfloat8不允许空Reasonnvarchar200不允许空UserNamenvarchar50不允许空5.3 数据模型的优化优化操作系统为了获得最佳的服务器性能, 对操作系统的优化也是很必要的, 因为操作系统性能问题通常会涉及到进程管理、内存管理、调度等，所以用户需要确保有足够的I/O带宽、CPU的处理能力、交换空间来尽可能的降低系统时间。如果应用程序在缓冲区出现过多的”忙”等待, 那么系统调用的进程将会增加, 虽然可以通过优化SQL语句等方法来降低调用的数目，但是这也是治病不治根的。用户可以启动Oracle的初始化参数timed_statistics来增加系统调用的数目, 反之如果关闭此参数,那么系统调用的数目也会减少。操作系统的缓存和Oracle自己的缓存管理是不相冲突的, 虽然它能消耗一定的资源, 但是它对性能还是有一定好处的, 因为一般所有数据库的I/O需要通过系统文件缓存来访问文件存储器。 Oracle的操作可能会用到许多的进程(有的系统叫线程), 所以用户应该确保所有Oracle的进程、后台进程、用户进程具有相同的优先级, 否则就会产生恶化的现象, 导致高优先级的进程等待低优先级的进程处理完毕释放出CPU资源后再处理, 更不能将Oracle的后台进程绑定到CPU中, 这样一来也会导致被绑定的进程被CPU资源饿死。优化的方法是确定数据库的函数依赖，对各个关系模式之间的数据依赖进行极小化处理，消除冗余，按照数据依赖的理论对关系模式进行逐一分析，确定个关系模式属于第几范式，按用户需求分析这些模式是否合适，是否需合并或分解，对关系模式进行必要的分解，提高数据操作效率和存储空间利用率。第6章 数据库的物理实现6.1 数据库的物理设计的内容和方法我们无论使用哪种数据库，无论怎样设计数据库，我想都会遵从一个原则：数据安全性和性能高效这两个主要方面，但是关于这两个方面的话题太多，在这里就不一一陈述，我只是从数据库物理分布设计方面和大家一起简单的探讨一下。因为数据库良好的物理分布设计也是对数据安全性和性能高效影响比较大, 就象我们在建大楼之前一定要先打好地基一样。現实中我们在应用各种不同数据库的时候，往往会忽略数据库的物理布局，只有在数据库性能遇到问题的时候才去考虑，但这是得不偿失的，这样一来不仅会导致与设计相关的问题出现，而且会影响性能的调整效果，所以我们在创建数据库之前先进行规划数据库的物理布局也是很必要的，这也符合人们常说的”磨刀不误砍柴工”的道理。要确定数据库的物理结构。确定数据库存储结构时要综合考虑存取时间、存储空间利用率和维护代价三方面的因素。这三个方面常常是相互矛盾的，例如消除一切冗余数据虽然能够节约存储空间，但往往会导致检索代价的增加，因此必须进行权衡，选择一个折中方案。在关系数据库中，选择存取路径主要是指确定如何建立索引。例如，应把哪些域作为次码建立次索引，建立单码索引还是组合索引，建立多少个为合适，是否建立聚集索引等。为了提高系统性能，数据应该根据应用情况将易变部分与稳定部分、经常存取部分和存取频率较低部分分开存放。数据库物理设计过程中需要对时间效率、空间效率、维护代价和各种用户要求进行权衡，其结果可以产生多种方案，数据库设计人员必须对这些方案进行细致的评价，从中选择一个较优的方案作为数据库的物理结构。评价物理数据库的方法完全依赖于所选用的DBMS，主要是从定量估算各种方案的存储空间、存取时间和维护代价入手，对估算结果进行权衡、比较，选择出一个较优的合理的物理结构。如果该结构不符合用户需求，则需要修改设计。6.2 数据库表的创建打开SQL数据库，单击“创建数据库表”菜单的“新建数据库表结构”菜单项。在弹出的“创建数据库表结构”界面中，单击“新建模板”按钮。在弹出的对话中，输入数据库表名，然后，单击确定。所建的表如下所示：图6.1部门信息图6.2设备信息图6.3维护信息图6.4报废信息第7章 系统应用程序设计7.1 系统功能设计系统功能结构图主要从功能的角度描述了系统的结构，但并未表达各功能之间的数据传送关系。事实上，系统中许多业务或功能都是通过数据文件联系起来的。例如，某一功能模块向某一数据文件中存入数据，而另一个功能模块则从该数据文件中取出数据。再比如，虽然在数据流程图中的某两个功能模块之间原来并没有通过数据文件发生联系，但为了处理方便，在具体实现中有可能在两个处理功能之间设立一个临时的中间文件以便把它们联系起来。上述这些关系在设计中是通过绘制信息系统流程图来从整体上表达的。下图为系统功能图。图7. 1系统功能图7.2 系统功能模块设计1管理系统：本模块包括用户管理、修改密码、退出系统三个部分。此模块中的用户管理普通用户没有使用的权限。所有用户可以通过修改密码的来修改本人的密码。2基本信息管理：本模块包括部门信息管理和设备分类信息管理两部分。可以实现对部门信息和设备分类信息的添加、删除和修改的功能。此模块中的添加、更新、删除功能普通用户没有使用的权限。3设备信息管理：本模块完成设备的添加、删除、更新功能。其中添加、删除、更新功能普通用户没有使用权限。此处添加的是设备的批次信息。4设备运作管理：本模块包括设备使用信息管理、设备调拨管理、设备维护管理、设备报废管理四个部分。其中设备使用信息管理是将所有的设备进行编号，然后分配给各部门使用。设备调拨管理是对设备的借出和归还的管理。设备维护管理是对有损坏需要维修的设备的管理，如果设备正处于借出状态必须先归还才可以维修。设备报废管理是对无法维修好的设备的管理。设备在借出、维护和报废之前都要经过审批经理的审批，只有审批通过才可以添加相应信息。普通用户对此模块没有使用的权限。5综合查询管理：本模块通过多张表之间的关系进行有关设备信息的详细查询,包括设备信息查询、设备使用查询、设备调拨查询、设备维护查询和设备报废查询，并可以实现查询结果的打印输出功能。7.3 系统的详细设计7.3.1登陆界面设计用户拥有自己的用户名、密码和使用权限。当输入用户名和密码以后，点击“确定”键，如果用户名和密码都正确就可以顺利进入主窗体，如果输入错误，那么就有相应的提示信息。如图7.2所示。图7.2登陆界面所编代码如下:Dim strPwd As String Dim rsPwd As ADODB.Recordset Dim strLogin As String Dim sql As String Dim pwdCount As Integer Set con = New ADODB.Connection con.Open Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=企业设备 strLogin = Trim(Text1.Text) strPwd = Trim(Text2.Text) If Len(strLogin) = 0 Then MsgBox 用户名不能为空,请输入用户名, 68, 提示 Text1.SetFocus Exit Sub End If If Len(strPwd) = 0 Then MsgBox 密码不能为空,请输入正确的密码, 68, 提示 Text2.SetFocus Exit Sub End Ifsql = SELECT UserPwd,UserType FROM Users WHERE UserName= + strLogin + Set rsPwd = con.Execute(sql)If rsPwd.EOF Then MsgBox 用户名不正确,请重新输入!, 68, 提示 Text1.SetFocus Exit SubElseIf strPwd = rsPwd(UserPwd).Value Then LoginSucceeded = True Else MsgBox 密码不正确,请重新输入!, 68, 提示 Text2.SetFocus Text2.Text = Exit Sub End If If rsPwd(UserType).Value = 0 Then FrmMain.mn_Users.Enabled = False FrmDeviceEdit.Cmd_Add.Enabled = False FrmDeviceEdit.Cmd_Modi.Enabled = False FrmDeviceEdit.Cmd_Del.Enabled = False FrmDept.Add.Enabled = False FrmDept.DEL.Enabled = False FrmDept.Edit.Enabled = False FrmDept.Text1.Enabled = False FrmDept.Text2.Enabled = False FrmType.Add.Enabled = False FrmType.DEL.Enabled = False FrmType.Edit.Enabled = False FrmType.Text1.Enabled = False FrmType.Text2.Enabled = False FrmUse.Command1.Enabled = False FrmUse.Command2.Enabled = False FrmUse.Command3.Enabled = False FrmUse.Command6.Enabled = False FrmDeviceEdit.Cmd_Add.Enabled = False FrmDeviceEdit.Cmd_Del.Enabled = False FrmDeviceEdit.Cmd_Modi.Enabled = False FrmLend.Command1.Enabled = False FrmLend.Command2.Enabled = False FrmLend.Command4.Enabled = False FrmLend.Command7.Enabled = False FrmLend.Command8.Enabled = False FrmMntenanceEdit.Command1.Enabled = False FrmMntenanceEdit.Command2.Enabled = False FrmMntenanceEdit.Command3.Enabled = False FrmMntenanceEdit.Command8.Enabled = False FrmDiscard.Command1.Enabled = False FrmDiscard.Command3.Enabled = False FrmDiscard.Command4.Enabled = False FrmMain.Show FrmLogin.Hide Text1.Text = Text2.Text = ElseIf rsPwd(UserType).Value = 1 Then FrmMain.Show FrmLogin.Hide Text1.Text = Text2.Text = Else FrmMain.Show FrmLogin.Hide Text1.Text = Text2.Text = End IfEnd Sub7.3.2用户管理界面设计可以添加、删除用户，此界面普通用户不能进入。图7.3用户管理界面对“删除”按钮所编的代码如下：Private Sub Del_Click() 删除信息 a = MsgBox(真的删除此纪录么?, vbYesNo) If a = vbYes Then DataGrid1.AllowDelete = True Adodc1.Recordset.Delete Adodc1.Refresh DataGrid1.AllowDelete = False End IfEnd Sub对“添加”按钮的代码如下：Private Sub Add_Click() Me.Move Me.Left, Me.Top, Me.Width, Me.Height + 1700 Add.Enabled = False DEL.Enabled = False Edit.Enabled = False Text1.Text = Text2.Text = Text3.Text = End Sub7.3.3修改密码界面设计如果两次输入的新密码不一样，将出现提示信息。图7.4修改密码界面对“确定”按钮所编的代码如下：Private Sub Cmd_OK_Click() Dim str1 As String Dim str2 As String Dim strPwd As String Dim rsPwd As ADODB.Recordset Dim rs As ADODB.Recordset Dim strLogin As String Dim sql As String Set con = New ADODB.Connection con.Open Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=企业设备 strLogin = Trim(Text1.Text) strPwd = Trim(Text2.Text) str1 = Trim(Text3.Text) str2 = Trim(Text4.Text) If Len(strLogin) = 0 Then MsgBox 用户名不能为空,请输入用户名, 68, 警