小型超市管理系统设计.doc

摘 要随着计算机技术的日趋成熟，使超市管理对自动化的要求越来越高，目前国内软件商已经开发出很多较好的超市商品管理软件，虽然这些超市管理软件的功能和性能都很完善，但它们大多是面向大型超市而开发的，专业性很强、功能分工较细、操作和使用比较复杂、难以掌握。而国内很多小型超市由于管理人员大多数不是超市管理业务人员，所以业务分工也不是很详细明确。这样的软件对于他们而言太庞大，太复杂，所以应用效果并不是很好。鉴于此，设计了一种适合小型超市对进、销、存等信息进行综合管理的系统。该系统将能实现超市的自动化管理。超市的管理者能够实时而准确的看到店内的销售情况，有效的加速商品的周转率并提高服务的质量，减少产品售价不符等问题。而且操作简单、功能完善，适用于专业知识不是太高的超市管理人员。一般的零售业销售必须是快速而且不允许出错的，通过本系统的库存商品管理，超市管理者还能掌握商品的库存量，减少销售中供过于求或者是供不应求等情况的发生。该系统采用MicroSoft Visual Basic 6.0 和 Microsoft access 2003进行设计。连接数据库采用的是比较流行的ADO技术。该系统大体上分三个模块，即进货、库存和销售，基本上实现了超市全部的日常管理。关键词：超市管理系统；自动化管理；VB6.0；MS ACCESS 2003AbstractAlong with the computer technology matures, supermarket management to the requirement of high automation,at present domestic providers have developed many good supermarket commodities management software,although the functions and performance of these supermarket management software are very perfect,but most of them are developed facing large supermarket,the specialization is very strong,functional division is fine, the operation and the use is complex, grasps with difficulty. While because most of many small supermarket managers are not business personnel, so business division is not very specific.This software is too large and too complex for them, so the application effect is not very good. In view of this, a suitable for small supermarket, sales for comprehensive management information system is designed.This system will be able to realize the supermarket automated management.Supermarkets managers can see stores sales situation real-time and accurately, accelerate goods turnover and improve the quality of services effectively, reduce product sells discrepancy issues. Moreover simple operation and perfect function are suitable for supermarket management personnel whose professional knowledge is not too high. General retail sales must be quickly and not allowed error, through this system stock commodity management, supermarkets managers can master the inventory of commodities, decrease demand over supply or supply over demand, etc.This system uses MicroSoft Visual Basic 6.0 and MicroSoft access in 2003. The connection database uses the quite popular ADO technology. This system is divided into three modules, purchase,inventory and sales, basically achieved all the daily management of the supermarket.KEYWORDS: Supermarket Management System；Automation Management；VB6.0；MS ACCESS 2003目 录第1章 概 述11.1 系统的开发背景和意义11.2 相关技术21.2.1 VB概述21.2.2 ADO概述21.2.3 MS ACCESS2003简介2第2章 小型超市商品管理系统分析42.1 系统必要性分析42.2 系统性能需求分析42.3 系统功能需求分析52.4 系统可行性分析5第3章 系统分析与设计73.1 系统总体设计73.2 数据库设计83.2.1 数据字典83.2.2 E-R图83.2.3 数据表生成103.3 系统功能设计14第4章 系统实施与运行204.1 系统模块204.1.1 登录模块204.1.2 单据录入模块234.1.3 系统管理模块234.1.4 报表中心模块244.2 系统测试274.3 系统主要代码28第5章 总结30参考文献31致谢32附录33III第1章 概 述1.1 系统的开发背景和意义超市的商品管理是超市管理的一个重要的环节，它的特点是信息量大，要求信息反馈迅速，对超市的经营和经济效益能够产生直接的影响。同时它与库存管理、日常账务管理等都存在十分密切的关系，其中任意环节出现在漏洞都可能直接给企业造成经济损失。据统计目前国内仍然存在70%以上的中小型超市的管理方式还是传统的手工管理方式，其工作效率、管理方式、管理水平已远不能满足现代超市的管理要求，当然也有部分中小型超市应用了计算机，但他们的运营方式大多采取的是单独运营，仅仅是用计算机来代替了手工的操作并没有从根本上改变传统的管理模式，在管理水平和管理质量上也没有出现大幅度的提高，并且在与其他必要设备或系统连接时数据需要重复录入，数据的保密性和一致性得不到相应的保证，因此这在一定程度上就造成了影响系统的整体性能，计算机信息管理系统的优势也就得不到充分的发挥。目前国内软件商已经开发出很多较好的商品化超市管理软件，虽然这些超市管理软件其功能和性能都很完善，但它大多是面向大型超市而开发的，专业性很强、功能分工较细、操作和使用比较复杂，难以掌握，而国内很多小型超市由于管理人员大多数不是超市管理业务人员，业务分工也不是很详细明确，这样的软件对他们而言太庞大、复杂，所以应用效果并不是很好，因此设计并开发了次小型超市商品管理软件。本次开发的小型超市商品管理系统将能实现商店的自动化管理，超市的管理者能够实时而准确看到店内的销售情况，有效的加速商品的周转率并提高服务的质量，减少产品售价不符等产生的问题。一般的零售业销售必须是快速而且不允许出错的，通过本系统的库存商品管理，超市管理者还能掌握商品的库存量，减少销售中供过于求或者是供不应求情况的发生。借助本系统超市的业绩一定能跨上一个新的台阶。1.2 相关技术1.2.1 VB概述(1)VB的概念Visual Basic(简称VB)是在BASIC程序设计语言的基础上，吸收面向对象的编程技术发展而成的一门程序设计语言，主要用于开发在windows环境下运行的具有图形用户界面的应用程序。(2)VB的特点VB最显著的特点可以概括为可视化，面向对象和事件驱动。可视化特点利用预先建立的控件拖放到窗体上可以很方便地创建程序界面。面向对象的程序设计方法有效降低了编程的复杂性，提高了变成效率。事件驱动使得对用户界面上的任何操作都会自动转到对相应的代码进行处理，同时也为程序运行过程中各对象之间的关联建立了有效地机制。(3)VB的发展VB的最早版本Visual Basic 1.0由Microsoft公司推出，现在VB发展到了6.0版。VB在发展过程中，功能真正变得强大是5.0版开始。1.2.2 ADO概述Microsoft ActiveX Data Objects (ADO) 使得客户端应用程序能够通过任何 OLE.DB 提供者来访问和操作数据库服务器中的数据。ADO 使您能够编写应用程序以通过 OLE.DB 提供者访问和操作数据库服务器中的数据。ADO 最主要的优点是易于使用、速度快、内存支出少和磁盘遗迹小。ADO 支持建立客户端/服务器和基于 Web 的应用程序的关键功能。ADO 的另一个功能是远程数据访问(RDS)，能够通过一个来回的传输将数据从服务器移动到客户端应用程序或 Web 页中，然后在客户端对数据进行操作，最后将更新数据返回服务器。RDS 先前发布的版本是 Microsoft Remote Data Service 1.5。RDS 已与 ADO 编程模块合并以简化客户端数据的远程调用。1.2.3 MS ACCESS2003简介Access是Office系列软件中用来专门管理数据库的应用软件。所谓数据库是指经过组织的、关于特定主题或对象的信息集合。数据库管理系统分为两类：文件管理系统和关系型管理系统。Access应用程序就是一种功能强大且使用方便的关系型数据库管理系统，一般也称关系型数据库管理软件。它可运行于各种Microsoft Windows系统环境中，由于它继承了Windows的特性，不仅易于使用，而且界面友好，如今在世界各地广泛流行。它并不需要数据库管理者具有专业的程序设计水平，任何非专业的用户都可以用它来创建功能强大的数据库管理系统。Access是轻量级的关系型数据库，一般只适用于小型项目或者数据不是很多的项目中。数据库技术是计算机软件的一个重要分支，它产生于20世纪60年代，最早是由IBM公司推出的IMS数据库系统。数据库技术从开始到现在大致经历了三个阶段，分别是：人工管理阶段、文件管理阶段和数据库管理阶段。Access使用标准的SQL（Structured Query Language，结构化查询语言）作为它的数据库语言，从而提供了强大的数据处理能力和通用性，使其成为一个功能强大而且易于使用的桌面关系型数据库管理系统和应用程序生成器。一个Access数据库中可以包含表、查询、窗体、报表、宏、模块以及数据访问页。不同于传统的桌面数据库（dbase、 FoxPro、Paradox）， Access数据库使用单一的*.mdb文件管理所有的信息，这种针对数据库集成的最优化文件结构不仅包括数据本身，也包括了它的支持对象。此外，Access 还利用Office套件共享的编程语言VBA（Visual Basic for Application）进行高级操作控制和复杂的数据操作。第2章 小型超市商品管理系统分析2.1 系统必要性分析目前许多大中型超市以及众多小型超市已成为国家经济发展中非常重要的力量，为提高人民的生活水平做出了巨大的贡献。但是，现阶段大多数小型超市的进货，存储，销售各个阶段的管理还是依靠手工实现的，不仅费时费力而且效率不高，与信息时代的高质量高效率差距很大，很难适应现代经济发展的要求。因此，开发了这套小型超市商品管理软件，以改进现阶段的管理方式。以前的小型超市管理效率低，出错率高，工作量大。经常给超市造成许多不必要的麻烦，甚至重大经济损失。如果采用现代化的管理方式，会提高工作效率，降低出错率，减少工作量，增强超市的市场竞争能力，这也需要在实践中不断摸索，不断改进，以达到更好的效果。使用这套软件，超市在进货阶段可以把相关的各种信息输入到计算机内保存，加工，并将结果形成库存储存，能尽快了解商品的库存情况，对超市的经营及时做出调整。在销售阶段，根据商品售出情况将库存数量做出相应修改。这样做简化了商品处理流程，加快资金周转，为超市在激烈的市场竞争中生存发展助一臂之力。同时，在使用过程中发现错误或不妥的地方还应继续维护，改进，使这套软件性能不断加强，功能不断完善。2.2 系统性能需求分析(1)方便快捷的操作方式，友好的用户界面，使每个业务人员都能够很快掌握系统的使用方法。(2)功能强大，完善，涉及业务广泛，能完成超市大部分管理的业务需求，如果有特殊要求的，可根据实际情况增加，完善某些功能。(3)高效，快捷的数据录入方法，提高工作效率，使繁杂的工作变的简单，使费力的业务变的轻松。(4)简单，灵活的数据查询，添加，删除方法，有效地管理数据，让超市的各种信息简单明了，易于理解，提高工作效率。2.3 系统功能需求分析(1)数据录入功能根据各个超市经营商品的范畴不同，由其用户自己进行数据录入，即：对商品进行入库登记。包括商品的编号、类别、商品名、进货单价、进货量、保质期、进货厂家等多个字段。此项功能有利于管理人员记录下所有商品的记录，方便以后的查询工作和商品管理。(2) 删除功能在库存中，如果某条商品信息不再需要了，就要求删除这些记录，有利于节省空间，便于管理。(3) 查询功能在进货、销售、库存这三部分管理过程中都应用到了查询功能，而且通过查询功能把三部分紧密的联系了起来。在进货管理中，需要查询商品的进货记录；在销售过程中，要查询某种商品或某类商品的销售情况；在库存管理中，要查询个别商品的剩余情况；商品的库存记录值是由进货记录和销售记录通过SQL语句得出来的。所以，在系统的整个过程中都存在查询功能。查询在本系统中是最普通的一项操作。(4) 打印报表功能在各部分管理过程中都有一张统计报表，可以利用打印功能输出报表。有利于备案管理或者用于总结材料。此功能快速，方便，准确，有条理，避免了因人工手抄写费时、易出错、杂乱的弊端。(5)修改功能在使用过程中，为了安全，系统使用权限很重要。在某些时候，比如：更换管理员时，就需要修改用户权限。本系统能够顺利的完成这项功能，但是前提是现在的用户必须知道旧密码才能完成修改功能。另外，由于经济发展较快，商品的价格也波动较大，变化较快。因此修改价格这一环节 是不可缺少的。用户可以通过输入商品的编号，修改某一商品的进货价格和售出价格，并及时显示出来。2.4 系统可行性分析只要资源和时间不加以限制，所有的项目都是可行的，但是由于资源缺乏和交付时间的限制，使得基本计算机系统的开发变得比较困难。因此尽早对软件项目的可行性做出细致而谨慎的评估是十分必要的。如果在定义阶段及早发现将来可能在开发过程中遇到的问题，及早做出决定，可以避免大量的人力、财力、时间上的浪费。该系统结合目前超市管理形式，经过一段时间的设计调试已经实现其主要功能，也就是说该系统是可行的。可行性主要集中在以下三个方面：(1) 经济可行性通过对开发成本的估算及可能取得效益的评估，确定该开发是可行的。系统成本包括开发成本和运行维护成本。系统的开发成本主要包括以下两方面：一台内存64M，硬盘10.2G的计算机。运行环境：windows XP操作系统。 Microsoft visual basic6.0工作环境：Office2003 系统维护的成本不高，只是对单机进行维护。(2) 技术可行性软件：利用Visual Basic 6.0 开发新系统生成可执行文件，用户只需要在Windows98操作系统下就可以执行，但要求环境必须支持EXCEL 对象和ACCESS数据库。硬件：需要一台配置上述的软件的电脑即可。(3) 操作可行性系统运行配置要求不高，安装容易，操作简单，界面友好，有关人员通过简单的培训便可掌握。第3章 系统分析与设计在对小型超市商品系统进行了系统分析和用户需求进行了全面了解之后，结合两项工作中的分析结果，对小型超市商品管理系统进行系统设计。在这一环节中，主要由以下几个步骤组成：系统的总体设计，数据库的结构设计和系统的模块设计。接下来就以上三步进行具体阐述。3.1 系统总体设计由需求分析的结果得知，小型超市商品管理系统主要涉及进货，存储，销售等操作。为使各个操作等为简便，根据功能要求将该系统划分为相互独立的模块，尽量减少模块间的耦合度，提高其聚合度。具体分为系统管理，单据录入，报表中心，信息档案，系统功能，零售，帮助七个模块。每个模块内部又有若干个子模块。相应数据库的设计是根据各部门所使用数据的特点设计出基本的数据实体，具体表中的字段由实际需要决定。关于界面的设计既要简洁美观，易于操作，又要符合用户操作规则。以下为本设计的业务流程图：图3.1 业务流程图3.2 数据库设计3.2.1 数据字典(1) 数据库=小型超市商品管理系统数据库(2) 表=员工信息表+商品信息表+供应商信息表+供应商结算表+入库表 +零售表(3) 员工信息表=编号+姓名+性别+部门+职务+身份证+电话+地址+备注(4) 商品信息表=编号+名称+供应商+供应商编号+规格+单位+单价+备注(5) 供应商信息表=编号+名称+地址+电话+备注(6) 供应商结算表=编号+名称+经手人+已付款+总金额+期限+时间+定单编号(7) 入库表=商品编号+商品名称+入库编号+入库数量+总金额+经手人+规格+数量+单价+备注(8) 零售表=商品编号+商品名称+单价+数量+总金额+日期(9) 日期=2008-3-1/2008-3-2/2008-3-3/(10) 地址=沈阳/大连/鞍山/(11) 单价，售价=00000.0099999.993.2.2 E-R图根据数据库的需求分析，系统的E-R图如下所示。在小型超市商品管理系统中主要包括供应商，操作员，进货，销售，库存等操作。供应商都具有相同的共性，既姓名，地址，电话等。抽象的实体型供应商就应由下列属性组成：供应商名称地址供应商供应商编号电话图3.2 员工实体属性图同理，可抽象出下列实体：员工，供应，销售：员工编号部门员工姓名员 工地址性别身份证电话图3.3 员工实体属性图供应商编号数量供应商名供 应商品编号单价商品名称规格图3.4 供应实体图商品编号日期商品名称销 售数量销售员单价图3.5 销售实体图3.2.3 数据表生成表3.1登陆表字段名称数据类型说明Login_nameCharacter登陆名Login_passwordNumeric登陆密码Login_quanxianCharacter登陆权限Login_repwdNumeric重复密码Login_dateDate登陆日期表3.2入库表列 名数据类型说明Sp_noNumeric商品编号Sp_nameCharacter商品名sp_rknumberNumeric剩余数量Sp_rkpriceNumeric商品入库价Sp_totalmoneyNumeric商品入库中金额Sp_rkdateDate商品入库日期Sp_price Numeric商品零售价Sp_ghsCharacter供货商Sp_ghsnoNumeric供货商编号Sp_jsrCharacter经手人Sp_gdateDate商品过期日期Sp_ggCharacter商品规格Sp_ddnoCharacter商品订单Sp_lbCharacter商品类别Sp_cnumberNumeric入库时的数量表3.3员工信息表Yg_noNumeric员工编号Yg_nameCharacter员工姓名Yg_sexCharacter员工性别Yg_bmCharacter部门Yg_zwCharacter职位Yg_sfzNumeric身份证Yg_telNumeric电话Yg_addressCharacter联系地址Yg_rzdateDate入职日期Yg_bzCharacter备注表3.4商品分类表字段名数据类型说明Sp_lbCharacter商品分类表3.5供货商结算表字段名称数据类型说明Sp_ghsnoNumeric供货商编号Sp_ghsCharacter供货商名Sp_zjeNumeric总金额Sp_yfkNumeric预付款Sp_fkfdateDate欠款开始日期Sp_fkldateDate付款结束日期Sp_bcfkNumeric本次付款Sp_fdateDate付款日期Sp_jsrCharacter经手人Sp_ddnoNumeric订单号表3.6零售表字段名称数据类型说明Sp_noNumeric商品编号Sp_nameCharacter商品名Sp_numberNumeric数量Sp_dzNumeric商品打折价Sp_priceNumeric商品零售价Sp_xdateDate商品销售日期Sp_shyNumeric售货员编号Sp_tmoneyNumeric总金额Sp_perlsNumeric销售百分比表3.7供货商表字段名称数据类型说明Sp_ghsCharacter供货商名Sp_ghsnoNumeric供货商编号Sp_telNumeric联系电话Sp_addressCharacter供货商地址表3.8订货表字段名称数据类型说明Sp_noNumeric商品编号Sp_name Character商品名Sp_ghsnoNumeric供货商编号Sp_ghsCharacter供货商名Sp_ggCharacter商品规格Sp_rkdateDate商品进货日期Sp_priceNumeric进货价Sp_lbCharacter类别Sp_dwCharacter单位表3.9退货表字段名称数据类型说明Sp_noNumeric商品编号Sp_nameCharacter商品名称Sp_yanyinCharacter退货原因Sp_numberNumeric退货数量Sp_ghsnoNumeric供货商编号Sp_ghsCharacter供货商名称表3.10订货表字段名称数据类型说明Sp_noNumeric商品编号Sp_nameCharacter商品名称Sp_ghsnoNumeric供货商编号Sp_ghsCharacter供货商Sp_numberNumeric数量Sp_ypriceNumeric进货价Sp_jsrCharacter经手人Sp_dateDate定购日期Sp_ddnoNumeric商品订单号Sp_zjeNumeric商品总金额Sp_yfkNumeric商品预付款表3.11零售退货表字段名称数据类型说明Sp_noNumeric商品编号Sp_name Character商品名称Sp_numberNumeric退货数量Sp_shyCharacter销售该商品的售货员Sp_yuanCharacter退货原因Sp_tmoneyNumeric退货金额3.3 系统功能设计小型超市商品管理系统共分为7个模块。每个部分由若干个子模块组成，完成指定的功能。这7个部分分别是：系统管理，单据录入，报表中心，信息档案，系统功能，零售，帮助。下面分别对7个部分进行描述。（1） 系统管理这部分主要管理操作员，分为添加操作员，删除操作员，更改密码三部分，还有打印设置，计算器等辅助设置。 添加操作员，可以添加操作员，分为管理员和操作员两种。两者的权限不同。 删除操作员，管理员可以删除操作员。 修改密码，更改登入密码。 打印设置，对打印机进行设置。 计算器，完成简单的计算功能。功能模块图如下：系统管理退出计算器打印设置更改密码删除用户添加用户图3.6系统管理图（2）单据录入这部分分为4个部分：入库验收，采购定货，采购退货，货商结算，商品调价。验收是记录采购来的产品的入库情况的表单，对产品入库日期，入库负责人和入库数量进行了详细的记录，以便日后查询。具有浏览，添加，更新，删除和修改的功能。购定货是根据库存情况和销售情况进行进货。采购退货是有特殊情况可以退货，要求说明退货原因。货商结算是对每个供应商进行结算。 商品调价是根据实际的情况对商品的价钱进行调整。 功能模块图如下：单据录入商品调价货商结算采购退货采购订单入库验收图3.7单据录入图（3） 报表中心这部分分为5个部分：进货报表，销售报表，库存报表，商品报表，前台收银员报表。 功能模块图如下：商品进货名细进货报表采购退货明细采购订货明细货商结算明细历史进价查询商品销售明细销售报表历史售价查询商品销售排行每件销售利润每月销售利润每日销售利润前台收银员报表报表中心每年销售利润货商商品销售明新库存积压库存不足库存报表报损明细商品过期报告商品报表商品库存查询供货商商品查询收银员交班记录收银员销售排行图3.8报表图（4） 信息档案这部分分为4个部分：商品分类，商品信息，供应商信息，员工信息。 商品分类 把所有商品分成若干个小的类别，便于管理。 商品信息具有添加，修改，删除，查询等功能，其中包括商品的基本信息，能够使操作员对商品的情况有一个统一的管理。添加功能是增加一个或多个商品信息的记录；修改功能是对商品的一些属性进行一些修改，以便能够适应商品信息变化的情况；删除功能是对没有保存价值的商品记录进行删除，以便释放更多的硬盘空间；查询功能分两部分：条件查询和无条件查询。条件查询是根据提供的条件进行查询，例按商品编号查询，显示的是所有满足条件的商品信息；无条件查询是显示所有的商品信息。供应商信息具有添加，修改，删除，查询等功能，其中包括供应商的基本信息，能够使操作员对供应商的情况有一个统一的管理。添加功能是增加一个或多个供应商信息的记录；修改功能是对供应商的一些属性进行一些修改，以便能够适应供应商信息变化的情况；删除功能是对没有保存价值的供应商记录进行删除，以便释放更多的硬盘空间；查询功能分两部分：条件查询和无条件查询。条件查询是根据提供的条件进行查询，例如按供应商名查询，显示的是所有满足条件的供应商信息；无条件查询是显示所有的供应商信息。员工信息具有添加，修改，删除，查询等功能，其中包括员工的基本信息，能够使操作员对员工的情况有一个统一的管理。添加功能是增加一个或多个员工信息的记录；修改功能是对员工的一些属性进行一些修改，以便能够适应员工信息变化的情况；删除功能是对没有保存价值的员工记录进行删除，以便释放更多的硬盘空间；查询功能分两部分：条件查询和无条件查询。条件查询是根据提供的条件进行查询，例如按员工名查询，显示的是所有满足条件的供应商信息；无条件查询是显示所有的员工信息。 功能模块图如下：信息档案员工信息商品分类供货商信息商品信息 图3.9信息档案图（5）系统功能本模块分为数据备份，数据恢复，数据清空三部分。数据备份是对所有数据库里的信息进行备份，以防止停电等意外造成的数据丢失。数据恢复是在发生意外时根据已有的备份，进行系统恢复。数据清空是把数据库里的所有信息删除，达到初始状态。功能模块图如下：系统功能数据清空数据备份数据恢复 图3.10系统功能包括图（6）转到零售本模块可直接进入零售界面。（7）帮助本模块有关于本软件的说明，以及软件开发人员的信息等介绍。第4章 系统实施与运行4.1 系统模块首先建立一个应用程序，然后设置数据库连接的一些属性和参数。建立主框架窗体：建立一个普通窗体，设置Caption属性为小型超市商品管理系统。利用VB的菜单编辑器为窗体添加所要实现功能的菜单。为了方便知道当前日期和时间，在主窗体上添加一个statusbar控件，利用该控件来显示日期，操作员的。最后实现的主窗体如下图4.1所示：图4.1主窗体图接着就来完成每个菜单项的功能。4.1.1 登录模块此模块来判断登陆人员的身份是否为合法权限。如果用户名为管理员则登陆到管理界面，如果为售货员则登陆到销售界面。如下图4.2所示：图4.2登入界面图登入界面部分主要代码如下：Option ExplicitPublic rst As ADODB.RecordsetPublic LoginSucceeded As Boolean private Sub cmdCancel_Click() 设置全局变量为 false 不提示失败的登录 LoginSucceeded = False MsgBox 你已取消了登陆 mainfrm.Show End SubPrivate Sub Form_Load()Timer1.Enabled = TrueLabel1.Tag = 1Me.Icon = LoadPicture(App.path & 1.ico)End SubPrivate Sub cmdOK_Click()Dim local_sql As StringDim str As StringSet cnn1 = New ADODB.Connectioncnn1.ConnectionString = driver=Microsoft Access Driver (*.mdb); dbq= & App.path & 小型超市商品管理系统.mdbSet rst = New ADODB.Recordsetcnn1.Openstruser = Trim(txtUserName.Text)strpwd = Trim(txtPassword1.Text)local_sql = select login_name from 登陆表 where 登陆表.login_name= & & struser & rst.Open local_sql, cnn1, adOpenDynamic, adLockOptimistic, adCmdTextIf Not (rst.BOF And rst.EOF) Then用户存在rst.Closelocal_sql = select login_password from 登陆表 where 登陆表.login_name= & struser & and 登陆表.login_password = & strpwd & rst.Open local_sql, cnn1If Not (rst.BOF And rst.EOF) Then密码正确rst.Closelocal_sql = select login_quxian from 登陆表 where 登陆表.login_name= & struser & rst.Open local_sql, cnn1If Not (rst.BOF And rst.EOF) Thenrst.Closestr = administratorIf rst!login_quxian = Trim(str) Thenmainfrm.ShowSet mrc = ExecSql(local_sql)Unload MeEnd IfEnd IfElse: MsgBox 你输入的密码不正确，请重新输入！, , 警告txtPassword1.Text = txtPassword1.SetFocusEnd IfElseMsgBox 系统中无此用户名, , 警告txtUserName.Text = txtUserName.SetFocusEnd Ifrst.CloseEnd IfEnd Sub4.1.2 单据录入模块该模块也是该系统的主要部分。订货，入库，采购退货，货商结算，商品调价都是在该模块中实现的。主要界面如下图4.3、4.4所示：图4.3采购退货界面图图4.4货商结算界面图4.1.3 系统管理模块主要是添加用户，删除用户，修改密码等。添加用户界面：用户权限分管理员和操作员两种。如下图4.5、4.6。图4.5添加用户、删除用户界面图修改密码：图4.6 修改密码界面图4.1.4 报表中心模块本系统含有大量的报表，就是为了用户能随时地查阅各种信息，为商品管理做好计划。进货报表：商品进货的统计，采购订货统计，采购退货，货商结算明细，历史进价查询。销售报表：商品销售明细，历史售价查询，商品销售排行，每日销售利润表，每件销售利润表，每日销售利润表，每年销售利润表，货商商品销售明细。库存报表项：库存商品统计，报损明细。商品报表：商品库存不足，商品过期报告等。前台收银员报表：收银员交班记录，收银员收银排行等。系统功能模块包括数据备份，数据恢复，数据清空三部分。主要界面如下图4.7所示：图4.7数据备份界面图备份的主要代码如下所示：Option ExplicitPrivate Sub Command1_Click()Dim nn As Stringpath.Show 1Dim filesystem As New FileSystemObject1If path.yesno = False Then Exit Sub nn = path.nn If FileExists(App.path & backup & nn & .bak) = True Then MsgBox 已有同名备份 GoTo 1 End Iffilesystem.CopyFile App.path & 小型超市商品管理系统.mdb, App.path & backup & nn & .bak File1.RefreshEnd IfEnd SubPrivate Sub Command2_Click() If Len(File1.FileName) 0 Then filesystem.Kill App.path & backup & File1.FileName Else MsgBox 备份数据部存在, vbInformation End If File1.RefreshEnd SubPrivate Sub Command3_Click()Dim filesystem As FileSystemObjectSet filesystem = New FileSystemObject If MsgBox(您确认以 & File1.FileName & 恢复您的数据库吗？, vbYesNo Or vbQuestion, 提示) = vbYes Then filesystem.Kill App.path & 小型超市商品管理系统.mdb filesystem.CopyFile App.path & backup & File1.FileName, App.path & 小型超市商品管理系统.mdb MsgBox 恢复完成 End IfEnd SubPrivate Sub Command4_Click()Unload MeEnd SubPrivate Sub Form_Load()File1.path = App.path & backupEnd SubPublic Function FileExists(p As String) As Boolean If Dir(p) Then FileExists = True 返回表示文件存在的常数。 Else FileExists = False 返回表示失败的常数。 End IfEnd Function4.2 系统测试软件在设计和开发过程中，可以发现程序中的错误，但这并不意味着软件不再存在错误。所以在软件设计完成后，对软件进行测试是必须的，这是保证软件质量的一个重要环节。软件测试就是用测试用例，运行被测程序，以发现更多的错误。软件测试一般要经过模块测试、集成测试、验收测试三个流程。模块测试，就是对每个模块设计测试用例进行测试。事实证明用完全的测试用例来测试是不现实的，所以只能通过一部分来对软件做足够的而并不完善的测试。各模块测试用例如下：1. 商品信息模块：（1） 正确数据：商品编号：199936130，商品名称：开心果，单位：袋， 类别：食品，进货日期：2008-5-5，供应商编号：001，供应商名称：单洞批发市场，进价：2.3元/袋。（2） 有一项为空值，其余项是正确数据。（3） 输入一个不存在的供应商。（4） 对同一商品输入两条记录。2. 员工档案模块：（1） 正确数据：编号：201，姓名；董威，年龄 ：24，性别： 男，职务 ：管理员，地址 ：辽工8#519，电话：4170425。（2） 有一项为空值，其余项都是正确数据（3） 输入两条重复记录3. 供应商档案和商品分类测试过程如上。4. 数据备份模块：（1） 正确数据：备份路径：9936130 （2） 再一次输入9936130。5. 数据恢复模块： （1） 正确数据：9936130。 （2） 输入一个不存在的备份。6. 商品查询模块： （1） 正确数据：商品编号：199936130 （2） 输入空查询条件（3） 输入不存在的商品编号（4） 输入不存在的商品名称7. 其他查询模块如上过程进行测试由于本系统各模块之间联系较小，所以集成测试也较容易，不需详细说明。验收测试，就是按照用户要求的功能进行测试，经测试，本系统基本满足用户需求。4.3 系统主要代码主界面部分程序如下所示。Option ExplicitDim tag2 As IntegerPrivate Sub Form_Load()Timer1.Enabled = TrueMe.Move 200, 200username = getuser(struser, strpwd)Me.Icon = LoadPicture(App.path & 1.ico)End SubPrivate Sub mhsspxsmx_Click() 供货商商品销售明细With spjhmxfrm.Show.Captio