校园快递派件管理系统分析报告

1、1. 可行性分析1.1快递背景“快、准”是快递公司最大的特色，更是快递企业赖以生存的保障。以计算机及网络为 核心的管理技术为快递公司提供了很好的管理平台，同时,rfid技术的快捷、高效及资源共 享等特性,为公司管理帯來了方便，快递管理系统应运而生。信息化的推进和电子商务的迅速 崛起，快递在我国物流行业和社会经济发展小的地位越来越重要。快递企业的服务以快捷、 及时为主要特征，配送的科学性与合理性是其半存和发展的关键，也是其应对竞争、开拓市场 的基本途径。我国快递行业起步晚，存在诸多局限性,如：金业规模小，口动化程度低，处理速度慢，快 件口动分拣技术落后；专业物流人才不足对配送过程的效率和质量缺乏

2、有效的控制；配送模 式单一，配送时间和配送量没冇科学依据，物流成本不断增加，服务质量提高缓慢。目前,学者 对快递配送的疋量研究严重滞后于快递的发展速度，能够真止帮助快递金业提供科学决策依 据的方法比较少。因此,建立一个适合于-般快递企业配送过程的结合rfid技术的派件管理系统，进行快 件收、货位分配、快件领取、快件查询等意义重大。12校园快递调查1.2.1校园快递存在的问题(1) 校园快递派件速度缓慢，派件时间较长(2) 校园快递的派件管理比较混乱，单据的记录不明晰校园快递的设备如pda等不能实时更新快递信息(4)校园快递的吋间安排不能按照学牛作息吋间安排1.2.2快递使用数据：(1) 使用快

3、递的频率：每月使用2次达64.5%；(2) 常使用哪些快递公司:申通83.3%、圆通46.6%、韵达46. 6%(3) 海大快递量前三名:申通(200300)、圆通(200300)、韵达(100300)(4) 包裹总量每天大概：1000个，平均每天领快递人数：800个1.2.3快递设备数据：校园派件员一般和其他大公司合作，作为他们的一个区域代理，系统一处要使用上级公 司的，设备也要按照他们的要求配置，使用专用的快递信封(和包装袋)、多层带背胶的票 据、手持终端等、扫描仪、相机(处理问题件需拍照做证据)。运输工具准备微型车、货车 等，仓库需监控设备，保障货物出进被影像记录。1.3 rfid在快递

4、派件应用対物流业而言，全而使用rfid意指在所有物流商品上贴上rfid标签，多数业者也都希 望可以这么做，然而，由于rfid标签价格仍然偏高、读取率无法达到100%等因素，包括联 邦快递、ups等，至今仍然无法全而在物流商殆上使用rf1d；多数都还停留在评估与测试阶 段。不过，尽管有多重障碍，rf1d技术终有一天会在物流业普及应用。虽然现在还不具有 高度的功能完备性，但通过我们的课程设计，结合了 visual basic和sql软件，系统全面 考虑了校园快递派件的作业流程，进行了严格定义和逻辑程序编写，与实际业务紧密结合, 使rfid技术与实际快递的派件业务接轨。14快递派件管理系统口标：一般

5、说来，本组校园快递派件管理系统功能包括两方面：一方面是快递管理信息系统中 心，另一方而也是快递企业对外的杏询处理系统。客八通过程序能与快递派件管理系统进行 信息共享，提供动态信息交互和信息服务，并在此基础上实现对订单下达、实时査询等业务 的支持。因此，系统应把开放性、协调性、有效性作为系统开发的总体日标。快递信息平台必须适应快递设施的地域变化。时间上的可扩充性是指当用户需求、技术 进步、企业组织结构随着时间的变化而变化时，系统能够对现有的某些功能模块进行改造或 增加某些功能模块，以适应新的变化。对内部人员，系统应当提供整体快递所需要的业务信息以及快递査询的支持界面和管理 界而，对外，快递对客户

6、主要提供快递查询信息以及作业进度信息反馈信息。2. 系统分析部分2. 1业务流程图：图1收件流程异常处理派件准备i否踣束客户签是手怎4否客户验收件日期、图2.派件流程22功能分析图异常处 理快件管理系统快件收取1货位分配2快件领取3快件查询4图3.功能分析图2. 3数据流程图图4数据流程图（顶层）图5.快件收取（第二层）订单di订单核对送件清单收件员d5分类记录d2数量质量记录2-2快递分类任务分配货架壬重虽云积大小扫描信息d6货物状态d8派件信息表d7货位分配记录图6货位分配（第二层）图7.快件领取（第二层）名称：收件人编号：c02说明：快递的接收者输入数据流： 输出数据流：个数：n图&am

7、p;快件查询（第二层）2. 4数据字典2. 4. 1外部实体表1外部实体表名称：收、派件员编号：c01说明：快递的集中、派发者输入数据流：输出数据流：个数：10名称：快递公司 编号：c03 说明：多家快递公司 输入数据流： 输出数据流： 个数：x名称：货架编号：c04说明：放快递的货架输入数据流： 输出数据流： 个数：x2. 4. 2数据元素表2.数据兀素表编号数据元素名类别/长度e01收件人姓名char10e02收件人地址charloe03收件人电话int4e04收件（派）员姓名charloe05收件（派）员电话int4e06快递公司charloe07快递公司送件员姓名charloe08送件

8、员电话lnt4e09运单idint4e10运单货物名称charloe11货物重量tnt4e12货物类别charloe13货架区charloe14货架（编号）int4e15货格编号int4e16扫描地点charloe17扫描时间datetime82. 4. 3数据流表3.数据流表编号名称数据流水源数据流去向包含内容b01收件信息d1d3e01-e10b02派件信息d8d10e04、 e05、e09-e17b03扫描信息d1d7e09-e172. 4. 5数据储存表4.数据储存表编号名称结构相关数据流d1送件清单e01、e02、 e03、 e06d1-1.1, d1-2.1,d2数量质量记录e10

9、、ell、 e12d2-1.2, d2-2. 2d3收货记录e01、e06、e03、e04、e05、e07、 e08、 e091.3-d3d4回执单e0ke09、 e16、 e17d4-1. 3d5分类记录e09、e12d5-2. 2d6货物状态e09、e16、e13、 e14、 e15、e17d6-2. 3d7货位分配记录e09、e13、e10、e1k e12、e142. 3-d7d8派件分析表e01、e02、e03、e04、e05、 e092. 3-d8, d8-3. 1d9客八记录eok e02、e03、e09d9-3. 2d10签收记录e01、 e09d10-3. 3d11企业数据库e

10、01e17d11-4.1, d11-4.22. 4. 6过程表5.系统过程表名称：收件准备编号：p1-1输入数据流：c03、d1输出数据流：p1-2处理：整理等待派件的快递名称：包裹检查编号：p1-2输入数据流：pi1、d2输出数据流:c3、p1-3处理：检查快递状态并记录处理名称：填写收货淸单编号：p1-3输入数据流：d4、p1-2输出数据流：d3、c03 处理：记录收件数量、类型等名称：订单核对编号:p2-1输入数据流：c01、d1输出数据流：p2-2 处理：确认收货人名称：快递分类编号：p2-2输入数据流:d2、p2-1输出数据流：d5处理：将快递分类以方便货位分配名称：扫描信息编号：p

11、2-3输入数据流：p2-3、d6输出数据流：d7、d8、c04处理：将快件信息扫描进数据库名称：派件编号：p3-1输入数据流：c01、d08输出数据流：p3-2处理：将快递交给收件人名称：身份核对编号:p3-2输入数据流：p3-1、d9输出数据流：p3-3处理：检查派件是否正确名称：交付快件编号：p3-3输入数据流：p3-2、d10输出数据流：c02处理：客户签字确认名称：网络查询编号：p4-1输入数据流：c01、d11输出数据流：c01处理：反馈查询信息名称：人工服务编号：p4-4输入数据流：co、dll输出数据流：c01处理：反馈查询信息2. 5数据加工处理的描述2. 5. 1快件交接：(

12、1) 各人快递公司将快件交给业务员(点数交接)，数量确实多的，可以当业务员的面，逐个 包裹进行扌h描(2) 收件员清点快件数量并核对是否有外包装破损，分错件、地址错谋、超范围、件数明显 有误、到付价格明显有问题等并常快件校园派件员确认客户寄递的快件是否在我司可提供服务的范围内(4) 收件地址超出我司服务区域，但收件地址附近有我司服务网点，应询问客户是否愿意改 为口取件，并向客户详细介绍口取件操作流程。(5) 数量等信息确认无谋片交接，双方在派件表上签名确认快件包裏无破损填写签 收单交接包黒破损退回处理每快 幫大件图10.快件接收决策树2. 5. 2货位分配及操作2.5.2. 1货位分配:(1)

13、货区分为a、b、c3个货区a区有1-4号货架，b区有5-8号货架，c区有9-12号货架(3)分配如下表快递公司id名称分酉?货架idd申通快递1-22圆通快递3-43|页丰快谨54韵达快递65中通快递76天天快谨87宅急送98ems109ups1010dhl10111号店1112特能快谨12图11快递公司货架分配表物品类别id物品类别备注1普通小放于货架4层2普通中轻赦于货架遐3普通中重放于货架2层5普通大重放于货架1层5普通大轻放于货架5层6敏嚴小注意保护徹于7敏感中注意保护徹于8敏感重逹意保护®于图12.货物类别分配表(4)货位编码举例说明：2. 5. 2. 2货位分配操作：图1

14、3.货物编码举例(1) 将随货运单贴放在快件指定位駅(2) 根据快件类型将各种贴纸按耍求贴在快件的指定位置(3) 将运单完整单号写在运单下方的外包装处(4) 对于大件的包裹，按照体积大小存放于货架的指定区域(5) 对于正常人小的包裹，按照姓名排序，分放于货架a-z的货物格屮订单核对有误退回快递公司图14.货位分配决策树2.5.3快件派送与收件：2. 5. 3. 1收件工作(1) 确认托寄物品是否在我司规定的范围内业务员须向客户说明需进行托寄物品检査(2) 并在取得客八同总后,按要求对托寄物品进行全而检查(3) 如包装未达到标准，须要求客户改进包装(4) 指导客八填写相应运单内容(5) 检査客户

15、填写的运单内容是否完整，若填写不完整的须指导客户补充相关的内容(6) 使用弹簧秤、卷尺测量快件的实际重量和轻抛重量，确定正确的计费重量(7) 如來人件，在客户处没有称重工具,如客八同意将快件拉冋公司称重，必须在第一时间将 垂量、运费告知客户，如客户不同意将快件拉回公司称重，则只能将件退还给客户(8) 将需要业务员填写的运单内容填写完報：始发地、目的地、件数、重量、运费、工号、 收件日期、时间、付款方式、托寄物详细资料(9) 运费结算2. 5. 3. 2派件工作(10) 客户确认运单信息，确认无课后须要求客户在“收件件人签署或盖章”栏内签字确认, 不得代替或伪造客户签字(11) 须将运单的“寄件

16、公司存根”联交寄件客八留底，业务员留取“结账联”，其他儿联运单随货对有误签哩包裏异常处理异常处理图15.快件领取决策树2.5.4快件查询: (1)公司员工输入运单号，或者输入员工号进行査询客八根据快递单据的运单号码，在客八查询界而上输入运单号进行查询(3) 若输入不止确，系统提示可重新输入再次进行査询(4)査询信息以表格的形式显示在用户查询界面上快件输入单靠示句号正确裏信息输入单请重新号错误输入输入单显示包号正确裏信息输入单请重新号错误图16.快件查询决策树3 系统设计部分3功能模块结构图设计图17.模块结构图3.2模块结构图3. 2. 1收件模块图18.输入模块结构图模块名称：收件管理模块标

17、识：a处理逻辑:对每一个快递的收取进行登记账处理 调用b模块，获得有效收件账 调用c模块，获得有效返件账 调用d模块，获得有效收件清单台账模块名称：收件数据录入模块标识：b处理逻辑:显示快递取件账屏幕输入口期，运单号，快递公司名称，取货人姓名，收件单编号 若 有效在屏幕相应位置显示该快递收件成功，并登记收件台帐。 否则显示无效收件模块名称：返件数据录入模块标识：c处理逻辑:显示返件账屏幕输入h期，运单号，快递公司名称，取货人姓名，返件单编号若 有效在屏幕相应位置显示该快递返件成功，并登记返件台帐。 否则显示无效返件3. 2. 2货位模块图19.货位模块结构图 模块名称：货位管理 模块标识：h

18、处理逻辑:对每次的货位请求，选择快递公司名称，查询该快递公司对应货架空位量模块名称：货位核查模块标识：i处理逻辑:显示查询请求屏幕调用m模块，读取数据查询模块名称：货位管理模块标识：j处理逻辑:输入货位号调用n模块，读取剩余空货位数据模块名称验证货位有效性模块标识k处理逻辑接受快递收件台账查领取中心仓库 若 有效收件发送冇效收件清单台账给模块d 否则发送“无效收件台账”3. 2. 3取件模块图20.取件模块结构图（具体说明略，可以参考数据流程图）3. 2. 4查询模块图21.查询模块结构图（具体说明略，可以参考数据流程图）3. 3输入设计3. 3. 1输入界面设计收件人id姓名地址1电话号冯1

19、s201914810赵信应收件日期收件日期2012/06/21a0826032012/06/21h1添加 i保存i图22.收件人录入界面录入操作工号id姓名性别工作货区id电话号玛工号删除 i图23收派件员信息录入界面录入运单id卩|20!2. 06 20添加1uj14i收潦件员id |1是否当天完成保莎1收件时白2012.8 20运单号j368831381423图24.派件完成情况录入界面录入检作保再i遇出运单号id f运号36883138h2：阴矣别阴小收件人id i1快谨公“i1|1收件员id收件时间|2012 06 20pr«e3移动的第一杀i銀后一杀| 上一杀i戸一杀图25

20、.收件清单录入界面變禦2货热|货變联赏初|炯2|榊 i遇出smni图26. rfid信息录入界面扫蹄入运单号3. 3. 2输入设备选择(1) 终端输入：采用rfid终端设备扫描包裹信息(2) 光电阅读器：釆用光笔读入光学标记条形码或用扫描仪录入纸上文字3. 3. 3输入数据正确性校验。(1) 对照校验：采用人工核对包裹的运单信息，核对信息正确性(2) 重复校对：山两名以上快递员通过rfid终端读取信息后山程序核对3. 3. 4输入设计的评价(1) 输入界面明晰、美观、大方(2) 便于填写，符介工作习惯(3) 便于操作(4) 有保证输入数据止确性的校验措施3. 4输岀设计3.4. 1输出设计的内

21、容(1) 包裹信息的状态情况(2) 包裹的接受者(3) 包裹信息的目的地(4) 包裹的派送员信息情况(5) 输出信息的时间地点(6) 包裹派送的运行时间长度3.4.2输出信息内容(1) 输出项1=1的信息形式：文字、数字(2) 输出格式：表格、报告等3.4.3输出设备和介质：设备如打卬机、显示器等；介质如：磁盘、u盘、纸张(普通、专 用)等3. 4. 4输出设计的方法系统输出的说明:表格信息。表格信息是系统对快递公司员工以及用户查询包裹信息时的输出，以表格的形式提供给信息使用者，用来表示详细的信息，能较为直观的表示包裹快递 的信息表6.输出信息运单ii)运单号快递公司td收件人td物品类别收件

22、员td收件时间133831826355511普通小120110102245664535435322普通中轻120110103345325435454323普通小220110102c forml41=3 回 2收件清单mrfnrn iibi± a inlubctr 21a y$3883138142$1 1ii?pf1 l 12012. r-2|33m3i38142f1 212012. r-3588313814301p312012 1433883138143114牌h ；22012.1j»8831»!43215音通中経22012.1388313814331 8畐運申経

23、22012.1188313814341jf"舊通申轻32012.18t368831»143s丄 .l:. j1 83012.19：36883138143629音通中賣32012.11013888313814372 1042012.1) 11|w«31»14382"flf"畫通中畫j1 w42012 j1 图27输出信息3.5 er图及数据表3. 5. 1er 图快递 公司架号货位£1收滅 件员收件j.号m快递n包聂运单工作区域图2 & er图货垃3. 5. 2数据表yp-hp.校园快递派件管据库dbo快递公司快谨公司

24、id名称分酉?货架ide!申通快递1-22圆通快谨3-43顺丰快谨54韵达快谨65中通快递76天天快谨87宅急送98ems109ups1010dhl10111号店1112特能快谨12米nullnullnull图快递公司衣yp hp.ts园快递派件管一 dbo收派件员信亘 >工号id姓名性别年龄工作货区id电话号码工号0klaus男201152019146111000112elena女192152019146121000123tyler男193152019146131000134stefa n192152019146141000145jeremy203152019146151000156w

25、e男191152019146161000167katherine女181152019146171000178bonnie女202152019146181000189alarc男1931520191461910001910anna女1921520191462010002011damon2011520191462110002112caroline女19315201914622100022米nullnullnullnullnullnullnullyp-hp.校园快递派件管据库cibo.货架列表yp-hp校园快递湎牛答-dbo.收派件员信息货架id货架号货位数货架管理人id电话号码所属货区idnal5

26、11520191461112a2561520191461613a3571520191461714a45111520191462115bl521520191461226b2541520191461427b3581520191461828b45101520191462029cl5315201914613310c25515201914615311c35915201914619312c45 丿 1215201914622 33. 6存储文件格式设计表7存储文件格式表文件格式收件人姓名charlo收件人地址char10收件人电话float8收件人1dint4收件（派）员姓名charlo收件（派）员电话f

27、loat8收件时间charlo完成时间charlo快递公司charlo快递公司送件员姓名charlo送件员电话float8运单tdtnt4运单号float83. 7数据库设计货架列表9货架id货架号货位数货架管理人功电话号码所廉货区td位分配表货区列表snsid贷架号 贷位区id0»总删（运单10）l.r3龍id 货区名称 货区咎理人员 电话号玛收件淸单派件完成情况汇总运单id 快透公司 物品类型 收件前口 派送员id 收件人功日朋总收件数 建时逓件数 派件延期完成数 延期率名称 分ne货架id运单id 运单号 快谨公司id 收样人功 物品类别 收件员功工号id 姓名 性别工作赏区i

28、d 电话号码收件人id 姓名 mt电话号码 运单id绸怏建公司id收件人信息收派件员信感货架id 货架号 货位区 总货位数 空置货位个数快谨公司10（放豐快肖派件物品信息 货位状态表 卫滋件完成情况表* 卫运单功 收件时间 派件芫成时间 收件员id 备注运单id 运单号 快谣公司id 收件时间 收件人id 收件人电话 收件员h运单图29数据库关系图运单货物名称char10货物重量int4物品类别char 10货架区char10货架（编号）int4货格编号int4:h描地点char10地址charlo此系统的数据库设计i分详细，界面上每一个模块屮的每一项功能基本都对应了一个基 木表，没有数据兀余

29、的现象，实现了表信息的查询。例如：派件信息资源管理菜单下，我们可以查看一位员工的员工号等信息；在货位状态 表中，可以查询货物存放位置、存放的状态等。4系统实施部分4. 1程序框图开始账号密码登陆wy役条件査询'、/0ya收派件员收件蓿单录入页面/一鬻十/n收件人査询快逋页面d包衰 信恳111一录入 成功n!z匕查询扫描c新建扫描n货位沁irfid扫描录入yy、录入条码条码4. 2代码设计返回主畀面图30程序框图图31.登陆界面private sub cmdcancelclick()loginsucccedcd = falseme. hideend subprivate sub cmdo

30、kclick()tf txtpassword 二"1 and txtusername 二thenlibinfosersys showloginsucceeded = trueme. hideelsemsgbox 无效的密码，请重试'”、”登录 txtpassword setfocussendkeys home+end"end ifend sub4. 2. 2管理系统界而wkjtrtama.# a收涙件员收件人收件青单w图32管理系统界面4. 2. 3收派件员信息界而收派件员信息表站出i值息来 选择工e童寻iooohttiblift-ikl<ui20115201

31、914611100011 一2elf女19215201914612100012一3 - -tyltr!93152q19h6131000134stefan192152019k6141000145一 d胃20315201914615100015厂n19115201914616100016 4tkathersnt18 d)h8湎両亍100017土bonme202152019146181000189altrc!93152019u61910001910aw1921520191462010002011201152019u621100021 .卜l图33收派件员信息界面private sub command

32、2_click()form2.hideend subprivate sub datacombol_click(area as integer)dim strquery as stringadodc2. commandtype 二 adcmdtextstrquery = "select * from收派件员信息where收派件员信息.工号二 &datacombol. boundtextadodc2. rccordsourcc 二 strqueryadodc2. refreshset datagridl. datasource 二 adodc2end sub收件人信息表图34.收

33、件人信息界面private sub command2_click()form3 hideend subprivate sub datacombol_click(area as tnteger)dim strquery as stringadodcl. commandtype = adcmdtextstrquery = "select * from收件人信息where收件人信息.电话号码二"&datacombol. boundtextadodcl. recordsource = strqueryadodcl. refreshset datagridl. datasou

34、rce = adodclend sub收件清单录入运*号口|»运单号33883138142s快曲公司i®收件员id收删问i2012 06 20移如ih酋通小1 话功1"性他榭£bhd 1收件人id!3388313814281i2坤38他1g3338831 丸 14301|341 ?b33383138143215633883138 k33«et538&3138u34i?836883l»k»13e工后y |羽小归中経 ira申径 話通中& 1»理i 收件島 idi2032 06 20 二h帥臺禺

35、4;t21jj2 ix. e:2勿】2 w勿iz"二缈乏st矿*201 06 20 .图35.收件清单录入private sub adodcl_wi1imove(byvai adreason as adodb. eventreasonenum, adstatus as adodb. eventstatusenum, by vai prccordsct as adodb- recordset)adodcl. caption = 记录： & adodcl- recordset- absoluteposition & / & _adodcl. recordset.

36、recordcountend subprivate sub commandl_click()adodcl. recordset. addnewtextl.setfocusend subprivate sub command2_click()dim msg as stringmsg 二 msgbox(，z确定要删除该项记录吗？ “，vbquestion + vbyesno, 提示) tf msg 二 vbyes thenwith adodcl. recordset delete movenextif .bof 二 true then movelastend ifend withend ifend

37、 subprivate sub command3_click() adodcl. recordset.updateend subprivate sub command4_click()endend subprivate sub command5_click() adodcl recordset movcfirstend subprivate sub command6_click() adodcl.recordset. movelastend subprivate sub command7_click() with adodcl. recordset.movepreviousif boe = t

38、rue then .movefirstend ifend withend subprivate sub command8_click() with adodcl.recordset.movenextif . bof 二 true then .movelastend ifend withend sub货位状态信息表图36.货位状态信息private sub commandl_click()dim strquery as stringadodcl. commandtypc 二 adcmdtcxtstrquery = "select * from 货位状态信息表 where 货架号 lik

39、e ' a%'adodcl. recordsource = strqueryadodcl. refreshend subprivate sub command2_click()dim strquery as stringadodcl. commandtype 二 adcmdtext strquery 二"select * from 货位状态信息表 where 货架号 like 'b%' adodcl. recordsource = strqueryadodcl. refreshend subprivate sub command3_click()dim

40、 strquery as stringadodcl. commandtype = adcmdtextstrquery = "select * from 货位状态信息表 where 货架号 like ' c%'"adodcl. recordsource = strqueryadodcl. refreshend subprivate sub command4_click()form6.hide腳1货殛j炳4|夷無s次张翼饗1炯01脚1剤曲2|图37.货位状态信息private sub commandl clickodim strquery as stringad

41、odcl. commandtype = adcmdtext strquery = "select * from 货位分配表 where 货位号 like 'a01%'"adodcl. recordsource = strqueryadodcl. refreshend subprivate sub commandlo_click()dim strquery as stringadodcl. commandtype 二 adcmdtextstrquery 二"select * from 货位分配表 where 货位号 like ' b06%&#

42、39;adodcl. recordsource = strqueryadodcl. refreshend subprivate sub commandll_click()dim strquery as stringadodcl. commandtype 二 adcmdtext strquery = "select * from 货位分配表 where 货位号 like 'b07%' adodcl. recordsource = strqueryadodcl. refreshend subprivate sub commandl2_click() dim strquer

43、y as stringadodcl. commandtype 二 adcmdtextstrquery = "select * from 货位分配表 where 货位号 likeadodcl. recordsource = strqueryadodcl. refreshend subprivate sub command13_c1ick()dim strquery as stringadodcl. commandtype 二 adcmdtext strquery 二"select * from 货位分配表 where 货位号 like 'c09%'adodcl

44、. recordsource 二 strqueryadodcl. refreshend subprivate sub command14_c1ick()dim strquery as stringadodcl. commandtype = adcmdtextstrquery = "select * from 货位分配表 where 货位号 like ' cio%'adodcl. recordsource 二 strqueryadodcl. refreshend subprivate sub command15_c1ick()dim strquery as string

45、adodcl. commandtype = adcmdtext strquery = "select * from 货位分配表 where 货位号 like 'cll%'"adodcl. recordsource = strqueryadodcl. refreshend subprivate sub commandl6_click()dim strquery as stringadodcl. commandtype 二 adcmdtext strquery 二"select * from 货位分配表 where 货位号 like ' c12

46、%' adodcl. recordsource = strqueryadodcl. refreshend subprivate sub command2_click()forml1. hideend subprivate sub cominand3_click()dim strquery as stringadodcl. commandtype = adcmdtext strquery = "select * from 货位分配表 where 货位号 like ' a02%'adodcl. recordsource = strqueryadodcl. refr

47、eshend subprivate sub command4_click()dim strquery as stringadodcl.commandtype 二 adcmdtext strquery 二"select * from 货位分配表 where 货位号 like 'a%'adodcl. recordsource 二 strqueryadodcl. refreshend subprivate sub command5_click()dim strquery as stringadodcl. commandtype = adcmdtext strquery = "select * from 货位分配表 where 货位号 like 'b%'adodcl. recordsource 二 strqueryadodcl. refreshend subprivate sub command6_click()dim strquery as stringadodcl. commandtype = adcmdtext strquery = "select * from 货位分配表 where 货位号 like ' c%