物流调查及物流系统设计报告

《物流调查及物流系统设计报告》由会员分享，可在线阅读，更多相关《物流调查及物流系统设计报告（25页珍藏版）》请在装配图网上搜索。

1、精选优质文档-倾情为你奉上物流调查及物流系统设计报告 对北京兴达百安公司货物物流流程的调查与仓库管理系统的初步设计 北京理工大学 机械与车辆学院 交通运输班 裴晓苏一、目的与任务通过对物流现状与发展的详细调查，了解和认识现代物流发展趋势，写出调查报告，进而对物流系统中的物流网络规划布局、物流节点功能规划与布置、物流仓储信息管理系统、物流配送信息管理系统、车辆管理系统、货物交易系统、物流需求预测及经济分析评价系统一个部分进行规划设计或信息管理系统设计，进一步掌握货物运输、包装、仓储、运输组织与配送、加工、物流质量管理、物流信息技术、区域物流系统规划与运作模式、物流系统及项目的综合评价等方法，使学

2、生具备初步从事实际物流管理和系统开发的能力。具体到现实生活中，一个企业的物流流程和仓库管理方法是与企业的生产经营息息相关的问题。仓库管理作为企业管理中的不可或缺的组成部分，是企业重要的日常工作之一。也是一个企业能否保持经济、高效运行的关键。传统的由人工管理的方法存在很多难以克服的缺点：管理效率低，劳动强度大，信息处理速度慢而且准确率也不够令人满意。随着科学技术的发展和进步，仓库管理的手段和方法也发生了巨大的变化。计算机技术的发展和应用为仓库管理员提供了一种更方便、更科学的管理手段与管理平台，即利用计算机设计一个仓库管理系统，使仓库管理员可以直接在计算机上实现对仓库信息的管理和查询。本设计报告的

3、内容，就是在对北京兴达百安公司进行了全面的货物物流流程调查后，根据公司的实际情况和现实要求，为公司设计了一套简单实用的仓库管理系统。本文从提出目的和任务开始，首先通过先期调查，明确了北京兴达百安公司的现状和运行中的实际问题。随后从中总结了公司对仓库管理系统的功能要求。在这之后，按照系统设计的一般步骤依次进行了系统的需求分析，总体设计，详细设计以及系统测试等各项活动。最终初步完成了整个系统软件，并基本达到了最初的设计要求，但由于细节方面的原因，尚未达到能投入实际使用的要求（由于本人知识水平有限，在软件设计方面能力不强，在软件进行测试时，系统出现各种错误较为频繁。若想使软件达到满足企业实用的要求，

4、还需要更为专业的人员参与协助解决）。该设计实现的管理系统软件能够正确有效地完成仓库管理的日常工作，并能根据需求进行灵活的查询。与数据库管理系统的结合，还提供了功能较为强大的数据操作功能。此外，该系统软件使用VB进行开发，具有操作界面简单易懂，使用方便快捷的优点。二、调查与结论本次设计活动的对象是北京兴达百安商业设施有限公司。该公司位于北京市宣武区，是一家有着十余年历史的民营企业，资本规模不大。公司的主要业务是销售各种物流仓储设备，超市货架，其他超市用品及各型商用冰柜冷柜等。公司的供货商主要为位于广东省佛山市的兴达货架厂。销售对象主要为各大超市、便利店、零售业店、餐厅、各型仓库、冷库等。销售范围

5、以北京地区为主，同时也涉及河北、山西、内蒙古等北方其他省份及蒙古、俄罗斯等邻国。 经调查，北京兴达百安公司进、发货物的物流特征主要表现为以下几点：1 运输距离不定。进货运输距离超过2500km；发货运输距离从本市市内至最远4000km左右。2 单次货物运输总量一般，多为一至两个标准箱左右。3 单件货物的体积、重量不大。4 货物为组装件，单批货物零部件总数较大。5 货物材质以钢铁为主，运输适应性较强。6 购货商对到货时间有明确、严格的要求。7 货物送达后，需要专业人员或有相关经验的人员进行组装。8 客户的订货日期和要求的到货日期不固定（非定期配送）。9 无固定合作的运输公司及装卸、组装人员。10

6、. 沟通信息无法保持一直畅通，存在障碍。11. 停留在手工填写进货单、发货单的时代。12. 对外界环境变化的适应能力差（如天气、油价、人工成本等）。 从调查中我们了解到，目前北京兴达百安公司以人工为主的仓库管理模式在以上的这些特点的影响下，已经不能满足公司业务的需要。在实际工作中，经常出现仓库库存统计错误、仓库进出货效率低下、寻找仓库内货物困难等情况。仓库管理员对库内各种货物的实时数量只能做出大概的估计，不掌握精确的数据；有时还出现明明有足够的库存，却因为统计上的错误而重复进货的问题。这些都比较严重的制约了公司的进一步发展，增大了公司的运营成本。由此我们可以看出，北京兴达百安公司目前急需改进目

7、前这种以人工为主的、低效率的物流、仓库管理模式。提高工作效率和自动化水平，适应不断增长和变化的业务需求。三、系统的需求分析仓库管理部门是企业中的一个重要部门，每天都有大量的业务在这里产生。对于一个现代化的企业来说，信息化管理是必须的，而仓库部门作为企业的一个重点部门，同样需要加强信息化管理。如何把仓库部门每天发生的业务如实地记录下来，保证仓库工作有条理地进行，同时确保相关数据的安全，信息处理的高效，并保证系统的实用性强，这是本系统设计的目的。（1）系统概述本仓库管理系统可以为小型的货物管理部门提供基本的仓库管理，从而帮助仓库管理人员能够使用软件对其现有业务流程进行高效的管理，这些管理包括：1货

8、物信息管理，包括货物信息的增加、修改、删除、浏览管理。2客户信息管理，包括客户信息的增加、修改、删除、浏览管理。3货物采购入库管理，对采购的货物完成电子入库。4货物销售出库管理，对销售的货物实现电子出库。5查询管理，包括对货物信息的查询、客户信息的查询和其他信息的查询。6货物信息打印，对当前仓库中的货物信息进行打印。7管理员管理，主要是管理员的登录管理与口令管理。（2）系统运行环境1硬件环境处理器：Intel Pentium 以上；内存：128MB以上；硬盘空间：1GB以上。2软件环境操作系统：Windows 98/2000/XP/Vista/7。（3）系统的主要目标1. 完成仓库各种信息的输

9、入，包括入库，出库，需求信息的输入等。2. 对仓库的各种信息进行查询，修改和维护。3. 可以生成设备采购报表。4. 在库存管理中加入最高储备和最低储备字段，对仓库的货物数量进行实现监控和报警。5. 支持企业各个部门的需求管理。6. 对操作日志的管理。7. 对仓库管理系统的使用帮助。（4）功能需求描述1货物信息管理：实现对货物信息的增加、修改、删除和浏览。2客户信息管理：实现对客户信息的增加、修改、删除和浏览。3采购入库管理：根据已有的货物信息和客户信息，下达入库单，从某客户处采购若干数量的某货物，并入库。4采购出库管理：根据已有的货物信息和客户信息，下达出库单，对客户销售若干数量的某货物，并出

10、库。5综合查询监控功能：对仓库中存量过高和过低的货物类型进行提示和报警。6打印功能：对库存货物信息进行打印。7管理员管理：管理员可以输入密码登录系统，同时管理员也可以修改自己的口令或设置权限。四、系统的总体设计依据需求分析的结果，仓库管理系统应该具备对重要相关信息的管理功能，这些管理包括对数据的增减、修改，以及查询、打印等功能，同样还应该实现对数据信息访问的控制。下面从软件的整体结构设计角度来进行设计。（1）开发与设计的总体思想作为给小型货物管理部门使用的仓库管理系统，本系统界面设计简单，尽可能地简化操作步骤，同时考虑到方便性，增加了查询的手段和打印的功能。为了增加系统的可用性，还设计了管理员

11、的角色，从而更好地满足仓库管理的一般需求。（2）系统模块结构图依据需求分析结果，仓库管理系统的主要模块包括：货物信息管理、客户信息管理、采购入库管理、销售出库管理、综合查询、打印、登录管理等7个主要的功能模块，系统结构如图1所示。图1 系统模块结构图（3）模块设计 1.货物信息管理模块货物信息管理模块提供货物信息的管理功能，包括货物信息的浏览功能、货物信息添加功能和货物信息删除功能。货物信息管理模块的功能如图2所示。图2 货物信息管理模块功能图2客户信息管理模块客户信息管理模块提供客户信息的管理功能，包括客户信息的浏览功能、客户信息添加功能和客户信息删除功能。客户信息管理模块的功能图如图3所示

12、。图3 货物信息管理模块功能图3.采购入库管理模块采购入库管理模块提供货物信息的简单查询、客户信息的简单查询，以及在确认采购货物信息和客户信息后的货物入库的功能。采购入库管理模块的功能如图4所示。图4 采购入库管理模块功能图4.销售出库管理模块销售出库管理模块提供货物信息的简单查询、客户信息的简单查询，以及在确认采购货物信息和客户信息后的货物出库的功能。销售出库管理模块的功能如图5所示。图5 销售出库管理模块功能图5.综合查询管理模块综合查询管理模块提供货物信息的详细查询、客户信息的详细查询和其他查询3项功能。综合查询管理模块的功能图如图6所示。图6 综合查询管理模块功能图6.打印模块打印模块

13、提供货物信息的打印功能。7.登录管理模块登录管理模块提供管理员登录功能和管理员口令修改两项功能。（4）界面设计 1主窗体设计主窗体提供主要的功能模块入口。如图7所示。图7 主窗体界面设计效果图2.货物信息管理界面设计货物信息管理是对货物信息进行基本管理。窗体中提供了一组命令按钮和一部分信息浏览区域，浏览区域中用于显示当前具体的货物信息，命令按钮区域中分为记录浏览部分，增加记录部分和删除记录部分，从而实现对应的数据操作。如图8所示。图8 货物信息管理界面设计效果图3.客户信息管理界面设计客户信息管理是对客户信息进行基本管理。窗体中提供了一组命令按钮和部分信息浏览区域，浏览区域用于显示当前具体的客

14、户信息，命令按钮区域中分为记录浏览部分，增加记录部分和删除记录部分，从而实现对应的数据操作。图略。4.采购入库管理界面设计采购入库模块分为3个区域，第一个区域为货物信息区，第二个区域为客户信息区，第三个区域为操作区。图略。5.销售出库管理模块销售出库模块分为3个区域，第一个区域为货物信息区，第二个区域为客户信息区，第三个区域为操作区。图略。6综合查询操作界面设计综合查询操作界面分为3个区域，第一个区域根据货物货号进行货物查询，第二个区域根据客户代码进行客户信息查询，第三个区域完成其他信息查询。如图9、10所示（下页）。图9 综合查询操作界面设计效果图7.打印界面设计打印界面提供一个简单的报表设

15、计器，显示当前所有库存货物信息。图略。图10 查询结果显示界面设计效果图8.登录管理界面设计为了实现管理员功能，设计了一个用户登录界面和管理员修改口令界面。如图11所示。图11 登录界面设计效果图（5）数据库设计 根据系统功能设计的要求以及功能模块的划分，数据库表结构设计如下。1.管理员信息表（见表1）名称：管理员信息表数据来源：数据库设计时录入表1 管理员信息表名称字段名称类型宽度非空管理员ID管理员ID字符型10No管理员密码密码字符型10No管理员名称管理员名称字符型10No2客户信息表（见表2）名称：客户信息表数据来源：在客户信息管理模块进行录入表2 客户信息表名称字段名称类型宽度非空

16、客户代码客户代码字符型10No客户名称客户名称字符型30No客户公司地址公司地址字符型50No客户公司开户银行开户银行字符型30No客户公司收款单位收款单位字符型30No客户公司账号账号字符型20No客户公司联系人联系人字符型8No联系人职务职务字符型10No公司电话公司电话字符型24No联系人手机号码手机号码字符型15No联系人住宅电话住宅电话字符型24No客户公司传真号码传真号码字符型24No客户公司通信地址通信地址字符型40No客户公司业务范围业务范围字符型60No3.库存信息表（见表3）名称：库存信息表 数据来源：在库存信息管理模块进行录入 表3 库存信息表名称字段名称类型宽度非空货物

17、货号货号字符型20No货物品名品名字符型10No货物规格规格字符型10No货物产地产地字符型80No产品说明产品说明备注型4No产品外形产品外形字符型40No货物现有数量现有数量字符型10No备注备注字符型40No4. 采购入库信息表（见表4）名称：采购入库信息表 数据来源：在采购入库管理模块进行录入 表4 采购入库信息表名称字段名称类型宽度非空货号货号字符型10No货物品名品名字符型10No货物进价进价数值型10No货物规格规格字符型20No货物数量数量数值型10No进货客户代码客户代码字符型10No进货客户名称客户名称字符型40No本次采购员代码采购员代码字符型10No本次采购员名称采购员

18、名称字符型8No本次进货时间进货时间日期时间型8No货物产地产地字符型80No货物产品说明产品说明备注型4No货物产品外形产品外形字符型40No5. 销售出库信息表（见表5）名称：销售出库信息表 数据来源：在销售出库管理模块进行录入 表5 销售出库信息表名称字段名称类型宽度非空货号货号字符型10No货物品名品名字符型10No货物售价售价数值型10No货物规格规格字符型20No货物数量数量数值型10No售货客户代码客户代码字符型10No售货客户名称客户名称字符型40No本次售货员代码售货员代码字符型10No本次售货员名称售货员名称字符型8No本次售货时间售货时间日期时间型8No货物产地产地字符型

19、80No货物产品说明产品说明备注型4No货物产品外形产品外形字符型40No五、系统的详细设计（参考了相关教材的设计方法）基于系统需求分析与系统总体设计的结论，本系统采用Visual FoxPro 6.0（VFP）实现各模块的功能，下面按照功能模块的划分来分别阐述系统的详细设计和实现过程。（1）货物信息管理模块1.功能描述货物信息管理模块负责对货物信息的数据库操作。在该模块中，用户可以通过浏览区域浏览货物信息的相关信息，也可以通过下面按钮区域实现货物信息的查询功能、货物信息添加功能和货物信息删除功能。2.窗体和源文件定义窗体名称：表单frmHwmanage；文件名：frmHwmanage.scx

20、；数据环境：库存表.dbf3.对象设置（见表6）表6 货物信息管理表单中的对象设置对象属性值说明Form1Caption货物管理Label15Caption货物信息TextgoodsnumberControlSource库存表.货号TextgoodsnameControlSource库存表.品名TextgoodstypeControlSource库存表.规格Text1ControlSource库存表.产地Edit1ControlSource库存表.产品说明Edit2ControlSource库存表.产品外形Text2ControlSource库存表.备注Text3ControlSource库存

21、表.现有数量Thisform.CommandGroup1.Command1Caption第一个Thisform.CommandGroup1.Command2Caption上一个Thisform.CommandGroup1.Command3Caption下一个Thisform.CommandGroup1.Command4Caption最后一个Thisform.CommandGroup1.Command6Caption添加Thisform.CommandGroup1.Command7Caption删除Thisform.CommandGroup1.Command9Caption退出4.函数与方法声明

22、 Command1中的Click事件Thisform.CommandGroup1.Command1Caption第一个功能：选择库存表，同时将记录指针指向第一个位置，浏览第一条记录。程序清单： select 4 go top thisform.refresh() Command2中的Click事件Thisform.CommandGroup1.Command2Caption上一个功能：选择库存表，同时将记录指针向前移动一个位置，浏览前一条记录。程序清单： select 4 if !bof() skip -1 else go topendifthisfor.refresh() Command3中的

23、Click事件（从略） Command4中的Click事件（从略） Command6中的Click事件Thisform.CommandGroup1.Command6Caption添加功能：选择库存表，添加新记录，指针指向表尾，同时刷新窗体。程序清单： select 4 append blank go bottomthisform.refresh() Command7中的Click事件Thisform.CommandGroup1.Command7Caption删除功能：选择库存表，同时对当前指定货号的记录进行删除操作，删除以前先确认是否进行该项操作。程序清单： select 4 x=messag

24、ebox(“真的删除货号为”+allt(thisform.Textgoodsumber.value)+”的货物吗”，4+32+256，“重要提示”) if x=6 delete thisform.refresh else return .F. endif thisform.refresh Command9中的Click事件Thisform.CommandGroup1.Command9Caption退出功能：退出当前窗体。程序清单： Thisform.release clear events（2）客户信息管理模块1.功能描述客户信息管理模块负债对客户信息的数据操作。在该模块中，用户可以通过浏览区

25、域浏览客户信息记录的相关信息，也可以通过下面按钮区域实现客户信息的查询功能、客户信息添加功能和客户信息删除功能。2.窗体和源文件定义窗体名称：表单frmKhmanage；文件名：frmKhmanage.scx；数据环境：客户信息表.dbf3.对象设置（见表7）表7 客户信息管理表单中的对象设置对象属性值说明Form1Caption客户信息管理Label15Caption客户信息表.Text11ControlSource客户信息表.客户代码Text12ControlSource客户信息表.客户名称Text1ControlSource客户信息表.公司地址Text2ControlSource客户信息

26、表.开户银行Text3ControlSource客户信息表.收款单位Text4ControlSource客户信息表.账号Text5ControlSource客户信息表.联系人Text6ControlSource客户信息表.职务Text7ControlSource客户信息表.公司电话Text8ControlSource客户信息表.手机号码Text9ControlSource客户信息表.住宅电话Text10ControlSource客户信息表.传真号码Text13ControlSource客户信息表.通信地址Text14ControlSource客户信息表.业务范围Thisform.Command

27、Group1.Command1Caption第一个Thisform.CommandGroup1.Command2Caption上一个Thisform.CommandGroup1.Command3Caption下一个Thisform.CommandGroup1.Command4Caption最后一个Thisform.CommandGroup1.Command6Caption添加Thisform.CommandGroup1.Command7Caption删除Thisform.CommandGroup1.Command9Caption退出4函数与方法声明（基本同上，从略）（3）采购入库管理模块1.功

28、能描述采购入库模块对指定存在的货物信息，可以从指定已存在的客户处完成货物的采购，用户可以在货物信息区查找货物信息，在客户信息区查找客户信息，最后完成货物的入库操作。2窗体和源文件定义窗体名称：表单frmIn；文件名：frmIn.scx；数据环境：客户信息表.dbf、库存表.dbf、入库表.dbf3.对象设置（见表8）表8 采购入库管理表单中的对象设置对象属性值说明Form1Caption采购入库管理Label1Caption货物信息：Label2Caption货号货号输入区：TextGoodsnumberTextgoodsnameControlSource库存表.品名Textgoodstype

29、ControlSource库存表.规格Text2ControlSource库存表.产地Label15Caption客户信息Lable3Caption客户代码客户代码输入区：Text11Text112ControlSource客户信息表.客户名称Text1ControlSource客户信息表.公司地址Command2Caption货号确定Command3Caption客户代码确定Command9Caption入库Command1Caption退出TextgoodsnameEnabled.F.TextgoodstypeEnabled.F.Text2Enabled.F.Text112Enabled.

30、F.Text1Enabled.F.4.函数与方法声明 Command2中的Click事件Command2Caption货号确定功能：选择货物信息表，查找当前表中是否有指定货号的货物信息，如果有则显示结果。程序清单： select 4 locate for 货号=upper(allt(thisform.textgoodsnumber.value) if not found() =mesagebox(没有改货物的货号！，0+64+0，提示) Go top else mand3.enabled=.T. thisform.refresh endif Command3中的Click事件（从略） Comm

31、and9中的Click事件Command9Caption入库功能：完成货物的采购入库操作。处理：a.选择库存表；b.判断库存表中是否有指定货号的货物，如果没有则提示，有则继续操作；c.检查库存表，更新库存表中货物数量；d.将入库信息同时写入入库表；e.完成入库，并提示。程序清单： sele 4 priv a locate for 货号=upper(allt(thisform.textgoodsnumber.value) if not found() =messagebox(没有该货物的货号，请先创建该货物！,0+64+0,提示) go topelse *1 -更新货物数量 a=库存表.现有数量

32、 *如果库存小于零，则让现有库存为0 If a0 a=0 endif a=a+val(thisform.Text4.value) replace 库存表.现有数量 with a *2-将入库信息同时写入入库表 *选择进货表中添加了主要信息，其余信息根据情况自行添加，或者查询可得 replace 进货表.货号 with alltrim(thisform.Textgoodsnumber.value)replace 进货表.数量 with areplace 进货表.进价 with alltrim(thisform.Text3.value)replace 进货表.客户代码 with alltrim(t

33、hisform.Text11.value)*提示完成=messagebox(入库成功!,0+64+0,提示)Endif Command1中的Click事件(从略)（4）销售出库管理模块1.功能描述销售出库模块对指定存在的货物信息，可以从指定已存在的客户处完成销售货物的操作，用户可以在货物信息区查找货物信息，在客户信息区查找客户信息，最后完成货物的出库操作。2窗体和源文件定义窗体名称：表单frmOut；文件名：frmOut.scx；数据环境：客户信息表.dbf、库存表.dbf、出库表.dbf3.对象设置（见表9）表9 销售出库管理表单中的对象设置对象属性值说明Form1Caption销售出库管理

34、Label1Caption货物信息：Label2Caption货号货号输入区：TextGoodsnumberTextgoodsnameControlSource库存表.品名TextgoodstypeControlSource库存表.规格Text2ControlSource库存表.产地Label15Caption客户信息Lable3Caption客户代码客户代码输入区：Text11Text112ControlSource客户信息表.客户名称Text1ControlSource客户信息表.公司地址Command2Caption货号确定Command3Caption客户代码确定Command9Cap

35、tion出库Command1Caption退出TextgoodsnameEnabled.F.TextgoodstypeEnabled.F.Text2Enabled.F.Text112Enabled.F.Text1Enabled.F.4.函数与方法声明 Command2中的Click事件Command2Caption货号确定功能：选择货物信息表，查找当前表中是否有指定货号的货物信息，如果有则显示结果。程序清单： select 4 locate for 货号=upper(allt(thisform.textgoodsnumber.value) if not found() =mesagebox(没

36、有改货物的货号！，0+64+0，提示) go top else mand3.enabled=.T. thisform.refresh endif Command3中的Click事件（从略） Command9中的Click事件Command9Caption出库功能：完成货物的销售出库操作。处理：a.选择库存表；b.判断库存表是否存在指定货号的货物，如果没则提示，有则继续操作；c.检查库存表，更新库存表中货物数量；d.将入库信息同时写入售货表；e.完成出库，并提示。程序清单： sele 4 priv a ，b locate for 货号=upper(allt(thisform.textgoodsn

37、umber.value) if not found() =messagebox(没有该货物的货号，请先创建该货物！,0+64+0,提示) go topelse *1 -更新货物数量 a=库存表.现有数量 *如果库存小于零，则让现有库存为0 If a=0 =message(数量为零，无法售货！，0+64+0，提示) returnendifIf ab =message(数量为零，无法售货！，0+64+0，提示) return endif a=a-b replace库存表.现有数量 with a *2-将入库信息同时写入售货表 *选择售货表 select 2 append blank go bott

38、om*在售货表中添加了主要信息，其余信息根据情况自行添加，或者查询可得 replace 售货表.货号 with alltrim(thisform.Textgoodsnumber.value)replace 售货表.数量 with areplace 售货表.进价 with alltrim(thisform.Text3.value)replace 售货表.客户代码 with alltrim(thisform.Text11.value)*提示完成=messagebox(出库成功！,0+64+0,提示)endif Command1中的Click事件（从略）（5）综合查询模块（独立开发有困难，尚未设计完

39、成）（6）打印模块1模块描述在主窗体中，单击打印选项，就会调用库存信息报表。2窗体和源文件定义窗体名称：报表frtHwList；文件名：frtHwList；数据环境：库存表.dbf3.对象设置 报表frtHwList中主要实现域控件与库存表之间每一个字段的关联。（7）登录管理模块 1.模块描述 为了实现管理员功能，在本系统中设计了一个用户登录界面和管理员修改口令界面。在登录界面中，用户可以输入用户名称和密码，单击“确认”按钮之后登陆系统；在管理员修改口令界面中，用户可以在输入需要修改的用户名称和密码后，进行密码的修改。2窗体和源文件定义窗体名称：表单frmLogin和表单frmPassword

40、；文件名：frmLogin.scx、frmPassword.scx3.对象设置（见表10和11）表10 用户登录表单中的对象设置对象属性值说明Form1Caption用户登录Label1Caption欢迎使用仓库管理系统Label4Caption请输入用户名称和密码Label2Caption用户名称：Label3Caption密码：Command1Caption确定Command2Caption取消表11 用户登录表单中的对象设置对象属性值说明Form1Caption修改登录密码Label7Caption修改管理员密码Label1Caption输入登录IDLabel2Caption再次输入确认

41、：Label3Caption输入登录密码：Label4Caption再次输入确认：Command1Caption确定Command2Caption取消4.函数与方法声明 frmLogin中Command1的Click事件Command1Caption确定功能：验证输入的用户名和密码是否正确，如果数据库中存在输入的用户名和密码信息，则调用主窗口，否则提示输入错误信息。程序清单： select 5 select 管理员ID，密码，管理员名称 from 用户表 where 管理员 id=allt(thisform.texet1.value) and 密码=allt(thisform.text2.va

42、lue) into array demo if demo1=.F. = messagebox(登录ID或密码错误！，0+16+0，提示)thisform.text1.setfocuselse thisform.release *登录成功则调用主题窗 do form frmMainendif frmLogin中Command2的Click事件（从略） frmPassword中Command1的Click事件功能：完成对指定用户名的账号信息的密码修改操作。程序清单： use admininfo store allt(thisform.text1.value) to adminname store

43、allt(thisform.text3.value) to adminPassword *-if thisform.text1.value= thisform.text2.value and ;thisform.text3.value= thisform.text4.value locate for gly_name=adminname update admininfo set mm=adminPassword =messagebox(ID和密码修改成功！，0+64+0，信息)else =messagebox(ID或密码验证不统一，请重输入！，0+64+0，错误)endif（8）主程序 1.模

44、块描述 当系统运行时，进行部分环境的设置，设置在系统中需要用到的公共变量，打开具体的每个表，并放到不同的工作区间，同时调用第一个运行的登录窗体。2窗体和源文件定义文件名：prgMain.prg 3.函数与方法声明功能：进行部分环境的设置，设置在系统中需要用到的公共变量，打开具体的每一个表，并放到不同的工作区间，同时调用第一个运行的登录窗体。 程序清单： clear all set talk off set near on set exact on set excl off set safety off set dele on set century on set date to YMD *设置

45、系统路径 public mypath mypath=left(say(16),rat(“”,say(16) set defa to &mypath *为数据库分配工作区间 selec 1 use 进货表 selec 2 use 售货表 selec 3 use 客户信息表 selec 4 use 库存表 selec 5 use 用户表 *调用登录窗体 do form frmLogin read events 六、系统的测试由于本人程序设计水平有限，整个管理系统软件并未全部完成，尚未达到可以投入实际应用的阶段。有些模块的开发还需要外界提供必要的帮助。在已经开发完的模块中，还是存在着一些逻辑上的错误。这些都是需要进一步的进行完善的。专心-专注-专业