汽车配件管理系统.docx

《汽车配件管理系统.docx》由会员分享，可在线阅读，更多相关《汽车配件管理系统.docx（55页珍藏版）》请在三一办公上搜索。

1、 毕业 设 计设计题目： 汽车配件管理系统 学 院： 专 业： 计算机科学与技术 年 级： 学生姓名： 学 号： 指导教师： 日 期： 教 务 处 制摘要随着电子计算机技术的发展，人们逐渐进入了信息化社会。人们对信息数据的利用与处理也进入了自动化、网络化和社会化的阶段，因此，开发管理信息系统已经成为当今的潮流，各行各业都面临着管理技术更新的前沿问题。应用计算机技术管理企业或组织中实时变化的问题，可以提高工作效率，增加竞争优势。本汽车配件管理系统以汽配企业日常的汽车配件进销存业务为基础，利用Visual Foxpro6.0中文版作为开发语言，以Windows 98中文版为开发平台，吸收企业资源计

2、划等先进的管理理念，设计出的一套适合普通中小型汽车配件企业，对加强企业的进销存管理，提高运营水平：建立高效率的供销链，减少库存，降低成本；提高客户服务水平等提供强有力的工具，同时为经营决策分析提供科学的依据。 本汽车配件管理系统能提供给汽车配件零售企业进行汽车配件的销售与管理。主要功能如下： （1） 日常业务：包括出库登记、入库登记、出库退货、入库退货。（2） 库存管理：包括库存查询、库存盘点。（3） 查询统计：包括出库查询、入库查询、出库退货查询、入库退货查询（4） 报表管理：包括出库报表、入库报表、库存报表。（5） 基本信息管理：包括商品信息、员工信息、客户信息、供应商信息。关键词：汽车配

3、件入库出库库存管理目录摘要2关键字2第一章 概述5第二章 需求分析62.1 开发背景62.2需求分析62.3实现目标7第三章 总体设计73.1系统结构73.2业务流程73.3系统菜单8第四章 数据库设计84.1 临时出库登记表94.2 临时出库退货表94.3 临时入库登记表104.4 临时入库退货表114.5 出库登记表114.6 出库退货表124.7 供应商信息表134.8 结算方式表134.9 库存表134.10 客户信息表144.11 权限表144.12 入库登记表154.13 入库退货表164.14 商品信息表174.15 员工信息表17第五章 系统功能模块实现19第六章 运行情况20

4、6.1系统登陆表单设计206.2主界面设计206.3出库登记设计216.4入库登记设计226.5库存查询设计226.6库存盘点设计236.7出库查询设计246.8出库报表设计246.9库存报表设计256.10商品信息设计26第七章 存在问题与解决方法275.1.1如何实现数据库数据的模糊查询275.1.2 如何实现对某一时间段的入库商品进行查询275.1.3 报表如何实现275.1.4 如何实现数据备份和数据恢复28第八章 结论28第九章 总结与体会28第十章 参考文献28第十一章 致谢28附录主要模块实现的原代码汇总29系统登陆表单设计29日常业务设计32入库登记设计41库存查询设计47第一

5、章 概述随着我国经济的持续发展，汽车已逐步进入了家庭，人们购买汽车的能力和对汽车的需求越来越高，这就刺激了汽车行业的发展，同时也带动了汽车配件行业的快速发展，使得汽配行业的竞争越来越激烈。当今信息、效率已成为各行各业竞争的利器，在汽配行业中传统的管理方法己再也不能适应市场经济的发展。汽车配件零售，因其车型多，零件种类多等，单靠手工作业管理则难达到科学、准确的标准化管理。随着计算机的日益普及，采用计算机管理业务、生产流程等诸多环节已成为汽配企业的必然趋势。 第二章 需求分析2.1 开发背景随着信息化时代的到来，我国经济持续发展，汽车已经步入了家庭。人们购买汽车的能力和对汽车的需求越来越高，这就刺

6、激了汽车行业的发展，同时带动了汽车配件行业的快速发展。汽车配件行业的迅猛发展，使得汽配行业的竞争越来越激烈。如何在激烈的竞争中取胜，是每家汽车零售部件企业当前所面临的严峻挑战。21世纪是知识经济时代，管理者必须运用科学的管理手段进行企业经营，运用信息化管理手段进行科学管理，方能在激烈的竞争中获胜。如何采用先进的管理模式，很大程度上都必须借助计算机来完成。目前，汽车配件销售企业的计算机管理水平还很低，相比其他许多行业仅是处在刚开始使用的阶段。随着技术发展，计算机的普及，计算机操作及管理的日趋简化，市场竞争加剧变化。因此企业采用计算机管理业务、财务、生产流程等诸多环节已成为汽配企业的必然趋势。2.

7、2需求分析随着汽修汽配行业的发展，中小型私营汽配零售企业日益增加，面临激烈的竞争，企业经营者难免会在业务方面及财务上出现漏洞，给企业经营带来弊端，同时也给客户带来了不必要的麻烦。管理者也经常因库存管理及帐目管理而“头痛”。为规范划企业内部管理，提高企业业务管理水平，更好地服务于广大客户。采用计算机来管理汽车配件的进销存等业务是最完美的解决方案，能使管理人员从繁琐的工作中解脱出来，真正从事管理工作，集中管理汽配的销售及账目，同时带动企业步入现代化管理阶段，节省了大量的人力，物力和财力，使企业经营运作物流清晰，经营状况详实准确，使汽配的经营管理体系更加科学化，规范化。根据涉及到的情况，系统主要功能

8、设计有：（6） 日常业务：包括出库登记、入库登记、出库退货、入库退货。（7） 库存管理：包括库存查询、库存盘点。（8） 查询统计：包括出库查询、入库查询、出库退货查询、入库退货查询（9） 报表管理：包括出库报表、入库报表、库存报表。（10） 基本信息管理：包括商品信息、员工信息、客户信息、供应商信息。（11） 系统管理：包括操作员管理、权限管理、数据备份、数据恢复。2.3实现目标针对实际情况，系统实施能实现以下目标：（1） 汽车配件进销存全部采用计算机管理。（2） 操作简单，查询方便。（3） 系统架构清晰，界面美观友好，功能全面，数据存储安全可靠。（4） 系统内部控制严密可靠性强。（5） 物流

9、和物资流一体化。第三章 总体设计3.1系统结构本系统分为6大部分，21个完整的功能模块。系统结构图如下所示。汽配管理系统功能图日常业务库存管理查询管理报表管理基本信息系统管理入库登记出库登记入库退货出库退货库存查询库存盘点入库查询出库查询入库退货查询出库退货查询查询出库报表入库报表库存报表员工信息商品信息客户信息供应商信息操作员管理权限设置数据备份数据恢复3.2业务流程根据汽配行业特点，汽配管理系统流程设计图如下所示。退货返厂厂家往来账入库作业入库信息退货返厂客户往来账销售作业销售信息入库查询入库报表供应商客 户 户库存信息库存查询库存盘点库存报表销售报表销售查询3.3系统菜单系统菜单Menu

10、main内建有1个包含7项一级菜单、23个二级菜单。（1） 日常业务：包括出库登记、入库登记、出库退货、入库退货4个菜单。（2） 库存管理：包括库存查询、库存盘点两个子菜单。（3） 查询统计：包括出库查询、入库查询、出库退货查询、入库退货查询4个菜单。（4） 报表管理：包括出库报表、入库报表、库存报表3个菜单。（5） 基本信息管理：包括商品信息、员工信息、客户信息、供应商信息4个子菜单。（6） 系统管理：包括操作员管理、权限管理、数据备份、数据恢复4个子菜单。（7） 帮助：包括帮助、关于本软件两个子菜单。第四章 数据库设计根据业务情况，系统采用FoxPro数据库，数据库名称为Garmanage

11、，包含以下个表：临时出库登记表（Ltabrkdj）、临时出库退货表（Ltabckth）、临时入库登记表（Ltabrkdj）、临时入库退货表（Ltabrkth）、出库登记表（Tabckdj）、出库退货表（Tabckth）、供应商信息表（Tabgys）、结算方式表（Tabjsfs）、库存表（Tabkc）、客户信息表（Tabkh）、权限表（Tabpurview）、入库登记表（Tabrkdj）、入库退货表（Tabrkth）、商品信息表（Tabspinfo）、员工信息表（Tabyginfo）。下面分别介绍以上各个表的结构。4.1 临时出库登记表临时出库登记表（Ltabrkdj）用来临时存储商品出库信息。

12、表Ltabrkdj的结构如表3-1所示。表3-1 表Ltabrkdj的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数出库票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82单价数值型102金额数值型102客户全称字符型50出库日期日期型8操作员字符型10经手人字符型10结算方式字符型304.2 临时出库退货表临时出库退货表（Ltabckth）用来临时存储商品出库返货的记录信息。表Ltabckth的结构如表3-2所示。表3-2 表Ltabckth的结构字 段 名 称数 据 类 型字 段 大 小小

13、数 位 数退货票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82单价数值型102金额数值型102客户全称字符型50退货日期日期型8操作员字符型10经手人字符型10结算方式字符型304.3 临时入库登记表临时入库登记表（Ltabrkdj）用来临时存储商品入库的信息。Ltabrkdj的结构如表3-3所示。表3-3 表Ltabrkdj的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数入库票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符

14、型10数量双精度型82进价数值型102批发价数值型102零售价数值型102金额数值型102供应商全称字符型50入库日期日期型8操作员字符型10经手人字符型10结算方式字符型304.4 临时入库退货表临时入库登记表（Ltabrkth）用来临时存储入库商品退货返厂的记录信息。表Ltabrkth的结构如表3-4所示。表3-4 表Ltabrkth的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数退货票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82单价数值型102金额数值型102客户全称字符型50退货日

15、期日期型8操作员字符型10经手人字符型10结算方式字符型304.5 出库登记表临时入库登记表（Tabckdj）是用来保存出库商品的记录信息。Tabckdj的结构如表3-5所示。表3-5 表Tabckdj的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数出库票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82单价数值型102金额数值型102客户全称字符型50出库日期日期型8操作员字符型10经手人字符型10结算方式字符型304.6 出库退货表临时出库退货表（Tabckth）用来临时存储商品出库返货的记

16、录信息。表Tabckth的结构如表3-6所示。表3-6 表Tabckth的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数退货票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82单价数值型102金额数值型102客户全称字符型50退货日期日期型8操作员字符型10经手人字符型10结算方式字符型304.7 供应商信息表供应商信息表（Tabgys）用来保存供应商的基本信息。表Tabgys的结构如表3-7所示。表3-7 表Tabgys的结构字 段 名 称数 据 类 型字 段 大 小供应商编号字符型10供应商

17、全称字符型70简称字符型20地址字符型100所属地区字符型50邮政编码字符型10电话字符型30传真字符型20联系人字符型30联系人电话字符型30开户银行字符型100银行账号字符型50纳税人登记字符型50邮箱网址字符型504.8 结算方式表结算方式表（Tabjsfs）是记录客户以何种方式结款，如现金收讫等。表Tabjsfs的结构如表3-8所示。表3-8 表Tabjsfs的结构字 段 名 称数 据 类 型字 段 大 小结算方式字符型104.9 库存表库存表（Tabkc）用来保存库存商品的记录信息。表Tabkc的结构如表3-9所示。表3-9 表Tabkc的结构字 段 名 称数 据 类 型字 段 大

18、小小 数 位 数产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10库存数量双精度型82进价数值型102库存金额数值型1024.10 客户信息表客户信息表（Tabkh）是用来保存客户的基本信息。表Tabkh的结构如表3-10所示。表3-10 表Tabkh的结构字 段 名 称数 据 类 型字 段 大 小客户编号字符型10客户全称字符型70简称字符型20地址字符型100所属地区字符型50邮政编码字符型10电话字符型30传真字符型20联系人字符型30联系人电话字符型30开户银行字符型100银行账号字符型50纳税人登记字符型50邮箱网址字符型50

19、4.11 权限表权限表（Tabpurview）是用来设置系统管理员及操作员使用本软件的权限。表Tabpurview的结构如表3-11所示。表3-1 表Tabpurview的结构字 段 名 称数 据 类 型字 段 大 小操作员编号字符型10操作员姓名字符型10密码字符型8权限级别字符型1出库登记逻辑型1入库登记逻辑型1出库退货逻辑型1入库退货逻辑型1库存查询逻辑型1库存盘点逻辑型1出库查询逻辑型1入库查询逻辑型1出库退货查询逻辑型1入库退货查询逻辑型1出库报表逻辑型1入库报表逻辑型1库存报表逻辑型1商品信息逻辑型1客户信息逻辑型1员工信息逻辑型1供应商信息逻辑型1操作员管理逻辑型1权限管理逻辑型

20、1数据备份逻辑型1数据恢复逻辑型14.12 入库登记表入库登记表（Tabrkdj）是用来保存入库商品登记信息。表Tabrkdj的结构如表3-12所示。表3-12 表Tabrkdj的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数入库票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82进价数值型102批发价数值型102零售价数值型102金额数值型102供应商全称字符型50入库日期日期型8操作员字符型10经手人字符型10结算方式字符型304.13 入库退货表入库退货表（Tabrkth）是用来保存入库商

21、品退货返厂的记录信息。表Tabrkth的结构如表3-13所示。表3-13 表Tabrkth的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数退货票号字符型20产品编号字符型10零件号字符型10产品名称字符型50车型字符型30产地字符型30货位字符型50单位字符型10数量双精度型82单价数值型102金额数值型102供应商全称字符型50退货日期日期型8操作员字符型10经手人字符型10结算方式字符型204.14 商品信息表商品信息表（Tabspinfo）是用来保存商品的基本信息。表Tabspinfo的结构如表3-14所示。表3-14 表Tabspinfo的结构字 段 名 称数 据 类 型

22、字 段 大 小小 数 位 数产品编号字符型10零件号字符型10产品名称字符型50简称字符型2车型字符型10产地字符型30货位字符型50单位字符型10进价数值型102批发价数值型102零售价数值型102商品说明字符型150进货信息字符型1504.15 员工信息表员工信息表（Tabyginfo）是用来保存员工的基本信息。表Tabyginfo的结构如表3-14所示。表3-14 表Tabyginfo的结构字 段 名 称数 据 类 型字 段 大 小小 数 位 数员工编号字符型10员工姓名字符型10员工性别字符型4员工类别字符型8职务字符型20聘用日期日期型8薪金数值型10备注字符型150第五章 系统功能

23、模块实现第六章 运行情况6.1系统登陆表单设计用户进入系统前，必须通过系统登录进入主程序界面。系统登陆界面实现了以下功能：（1） 确认用户的身份及使用权限。（2） 对系统信息起到保密作用。系统登陆表单运行结果如图6-1所示。6-16.2主界面设计在系统登陆界面验证操作员密码后，将进入主程序界面。主程序界面实现了以下功能：（1） 执行相应的权限操作。（2） 选择主界面的菜单，调用相应程序，进行相应操作。（3） 通过主界面，退出程序。主程序表单运行结果如图6-2所示。主程序表单运行结果如图6-2所示。6.3出库登记设计单击主菜单日常业务下的出库登记子菜单，进入出库登记界面。出库登记界面实现了以下功

24、能：（1） 使用出库登记菜单做日常开票。（2） 与客户之间以出库票号作为凭证。（3） 单独核算赊账。（4） 出库登记的信息保存在临时表中。出库登记表单运行结果如图6-3所示。图6-36.4入库登记设计用户单击主菜单日常业务下的入库登记子菜单，进入入库登记界面。入库登记界面主要实现如下功能：（1） 与供应商之间以入库票号作为凭证。（2） 结账时单独核算。（3） 入库登记的信息保存在临时表中。入库登记表单运行结果如图6-4所示。图6-46.5库存查询设计用户单击主菜单库存管理下的库存查询子菜单选项, 进入库存查询界面。库存查询界面主要实现以下功能：（1） 按条件查询库存信息。（2） 以页框和列表两

25、种方式显示库存信息。（3） 通过4个按钮快速浏览库存信息。库存查询表单设计运行结果如图6-5所示。图6-56.6库存盘点设计单击主菜单库存管理下的库存盘点子菜单选项，进入库存盘点界面。库存盘点界面实现了以表单形式显示库存数量不为零的全部商品信息。库存盘点表单运行结果如图6-6所示图6-66.7出库查询设计单击主菜单查询统计下的出库查询子菜单选项，进入出库查询界面，出库查询界面实现了以下功能：（1） 按用户输入的条件查询出库商品信息。（2） 提供以页框和列表两种方式浏览出库商品信息。（3） 通过4个按钮快速浏览出库信息。出库查询表单运行结果如图6-7所示图6-76.8出库报表设计单击主菜单报表管

26、理下的出库报表子菜单选项，进入出库报表界面，出库报表界面实现了以下功能：（1） 按用户输入的条件查询出库的商品信息。（2） 以列表的形式显示查询结果。出库报表设计的运行结果如图6-8-1所示，报表设计输出结果如图6-8-2所示。图6-8-1图6-8-26.9库存报表设计单击主菜单报表管理下的库存报表子菜单选项，进入库存报表界面。库存报表界面实现了以下功能：（1） 按用户输入的条件查询库存商品信息。（2） 以列表的形式显示查询结果。库存报表表单运行结果如图6-9所示。图6-96.10商品信息设计单击主菜单基础信息管理下的商品信息子菜单选项，进入商品信息界面。商品信息界面实现了下功能：（1） 根据

27、查询条件查询商品基本信息。（2） 以页框和列表两种方式浏览商品基本信息。（3） 通过4个按钮快速浏览商品基本信息。（4） 添加、修改、删除商品基本信息。商品信息表单运行结果如图6-10所示。图6-10第七章 存在问题与解决方法5.1.1如何实现数据库数据的模糊查询在数据查询中，为了查询某一种商品，用户可以输入一定的条件，根据输入的条件来查询某种商品。例如根据用户选择的字段查询出库单据，SQL查询语句(Combol.displayvalue包含用户选择查询条件：Text1为用户输入的查询内容)：cif=alltrim(bo1.displayvalue)selectfrom carmanage!t

28、abckdj；where alltrim(thisfrom.text1.value)$&cif.；order by tabckdj.出库票号；into cursor lindeping5.1.2 如何实现对某一时间段的入库商品进行查询在开发数据库管理软件时，经常要某一时间段的数据进行查询。例如要查询某个时间段内的出库单。在SQL语句中对数据进行日期区间查询时，可以用Between()语句进行查询，代码如下（Text2为起始日期；Text3为结束日期）：sdate=thisform.text2.valueedate=thisform.text3.valueselect*;from carmana

29、ge!tabckdj;where between(出库日期，sdate,edate);order by rabckdj.出库票号；into cursor lindeping5.1.3 报表如何实现在一些物流软件中，打印报表是必然不可少的，在程序中实现报表的打印和预览需要添加如下代码。添加如下代码实现预览打印报表：Report Form myreport.frx To Print Preview添加如下代码实现打印报表：Report Form myreport.frx To Print5.1.4 如何实现数据备份和数据恢复在日常操作中经常需要对系统中的数据进行备份，以免数据丢失，给公司造成极大的

30、损失。用户在程序中设置了数据备份和数据恢复功能模块，当数据丢失时可以及时恢复，将损失减少到最低。下面的代码将实现数据备份：close allsource=sys(5)+sys(2003)+“qpgldatabase*.*”obj=alltrim(thisform.text1.value)+ “*.*”copy file“&source”to“&obj”COPY FILE命令格式：COPY FILE TO COPY FILE 命令的语法含有以下命令参数，见表3-4表3-4 COPY FILE 命令的参数参 数描 述SOURCE必要参数。可以是字符串表达式，用来表示要被复制的原文件名，Source

31、 可以包含目录或文件夹，以及驱动器。可以是代表该路径的变量，变量的引用格式为：“&变量名”Destination必要参数。可以是字符串表达式，用来表示要复制的目标文件名，Destination 可以包含目录或文件夹，以及驱动器。也可以是代表该路径的变量，变量的引用格式为：“&变量名”第八章 总结与体会汽车配件管理信息系统的启用，对汽车配件企业经营的业务流程进行有效的管理，按其所需实现了汽车配件企业的入库、入库退货、出库、出库退货、库存管理、基本信息管理、财务管理，清晰地体现了企业经营运作物流。为加强企业信息管理、提高运营水平、建立高效的供销链、减少库存、提高经营效率、降低成本、提高客户服务水平

32、等提供了强有力的工具，同时为经营决策分析提供科学的依据。使汽配的经营管理体系更加科学化、规范化，使员工的工作效率得到很大提高。具有较好的实用价值。通过制作汽车配件管理系统的完整设计，我进一步了解了汽配行业的特点。相对于汽配行业的复杂程度，本系统还有待完善。随着科学技术的发展，管理系统的不断完善，管理过程将变得更加简单明了。第十章 参考文献1. 邵洋，谷宇.Visual FoxPro数据库系统开发实例导航（第二版）.人民邮电出版社.2003年8月2. 徐荣宽.Visual FoxPro6.0简明教程.东南大学出版社.2005年1月3. 周建成.FoxPro2.5命令与函数专辑.人们邮电出版社.1

33、994年7月4. 范立南.Visual FoxPro程序设计与应用.电子工业出版社.2005年1月5. 高伟，陈林.Visual FoxPro9.0基础教程.清华大学出版社.2005年5月6. 余坚.Visual FoxPro程序设计基础.清华大学出版社.2006年8月7. 史济民，汤观全.Visual FoxPro及其应用开发.清华大学出版社.2006年1月8. 吴迪.Visual FoxPro6.0中文版类和对象详解.清华大学出版社.1998年2月 9. 方智惠，彭风鸣.Visual FoxPro程序员手册.科学出版社.2004年5月10. 李加福.Visual FoxPro6.0.清华大

34、学出版社.1999年6月11. 李春葆.Visual FoxPro6专业版基础类参考手册.机械工业出版社.1999年9月12. 赵志坚.Visual FoxPro5.0类和对象详解.人民邮电出版社.1998年6月13. 何玉辉.Visual FoxPro程序设计教程.西安电子科技大学出版社.2003年7月14. 谢维成.Visual FoxPro8.0实用教程.清华大学出版社.2005年1月15. 梁杰，效英，殷咸青.FoxPro 2.6 for windows使用详解.西安电子科技大学出版社.1995年5月16. 丛书编委会.Visual FoxPro实例教程.中国电力出版社.2008年8月

35、17. 张洪举.Visual FoxPro6.09.0解决方案与范例大全.人们邮电出版社.2006年4月第十一章 致谢本课题在选题及研究过程中得到雷老师的悉心指导。在雷老师一次次询问研究进程，精心点拨、热忱鼓励并为我指点迷津的过程中，我拓展了研究思路。陆老师一丝不苟的作风，严谨求实的态度，踏踏实实的精神，不仅授我以文，而且教我做人，虽历时三载，却给以终生受益无穷之道。对陆老师的感激之情是无法用言语表达的。 感谢*老师、*老师、*老师、*老师等对我的教育培养。他们细心指导我的学习与研究，在此，我要向诸位老师深深地鞠上一躬。 南京晓庄学院*院长、科学教育系*主任、*书记、*老师、*老师等老师为我提

36、供了良好的研究条件，谨向各位同仁表示诚挚的敬意和谢忱。 感谢我的同学*、*、*、*三年来对我学习、生活的关心和帮助。 最后，向我的父亲、母亲、致谢，感谢他们对我的理解与支持。附录主要模块实现的原代码汇总系统登陆表单设计系统登陆表单名为admin，表单中添加了1个Combo控件、1个Text控件、2个Label控件、1个Commandgroup控件。重要控件属性如表6-2所示。表6-2 “系统登录”表单重要控件属性列表控 件 名属 性值功 能Combo1PowSourceRowSourceTypeTabpurview操作员姓名6-字段提供操作员姓名列表员工性别PassWardChar*提供密码输

37、入程序代码。表单的lnit事件中添加以下代码：public cn &定义全局变量cn=0 &给全局变量赋初值 “操作员”组合框的KeyPress事件中添加了以下代码：select tabpurview &选择表tabpurview工作区为当前工作区local InRecNo &定义局部变量inRecNo=recno()do case case nKeyCode=3 &按下PageDown if !eof() skip else go bottom endif this.value=操作员姓名 case nKeyCode=18 & 按下PageUp键 if !bof() skip-1 else

38、go top endif this.value=操作员姓名 otherwise return endcase首先判断用户输入的用户名是否正确，然后判断用户输入的密码是否正确，如果正确，根据用户选择操作员所拥有的权限级别为全局变量赋值；如果不正确，弹出系统警告对话框。具体实现如下。在“确定”按钮的Click事件中添加了以下代码：use databasetabpurview cname=alltrim(thisform.Combo1.value) &获得输入信息ppassword=alltrim(thisform.text1.value) set order to 操作员姓名 &指定控制索引文件seek cname &快速查找set exact on &设置字符精确比较*判断操作员是否正确if alltrim(tabpurview.操作员姓名)!=cname cn=cn+1 cMessagetitle=系统登录 cMessagetext=操作员错误，请重新输入！