物流管理系统毕业设计论文范文

物流管理系统毕业设计论文范文物流管理系统学院专业班级学号姓名指导教师教师职称年月日摘要摘要随着市场经济的高速发展制造业商业企业逐步接受着第三方物流服务越来越多的企业认识到物流企业外包是降低成本提高服务水平的有效渠道物流管理的特点是以客户为核心构建面向客户的业务流程支持各种形式各种需求的现在企业中的业务模式系统支持多形式客户的数据共享提高作业效率监控整个流程提供完整的货品进行订单跟踪并且特别关注对各环节业务的监控及例外情况的监控关键词客户物流物流管理系统目录摘要1目录1引言11系统分析211需求分析212可行性分析22总体设计221项目规划222系统功能结构图33详细设计331系统登录设计332车辆调度安排633托运申请单管理834货物托运管理1135在途跟踪管理1736信息查询20附录A参考文献30附录B数据表结构31附录C文件架构图37引言在当今高速发展的信息社会现代物流行业突飞猛进发展伴随着我国国民经济连续多年的高速增长为现代物流发展创造了良好的条件目前我国各类物流企业有14万家左右展望整个21世纪可以说现代物流业还将有更大的发展在发达国家物流理论促使物流实践快速发展经济全球化及现代物流业发展的系统化信息化仓储运输的现代化和综合化等趋势对我国物流业的发展提出了全方位的挑战传统物流行业的操作模式已经不适应现代的物流行业如何缩短物流过程降低产品库存加速对市场的反应这是所有企业所面对的问题本系统就是针对这些问题根据中小型企业的实际需求而开发的一套物流管理系统系统的开发能够帮助企业实现对物流全过程的优化调度和动态控制高效整合企业的物流业务以全面提高经济效益和效率为目的提供高效实用技术的物流管理系统和运营手段物流管理系统是集现代运输仓储配送搬运调度跟踪为一体的网络系统系统的开发实现了商品从原料供应商制造商分销商到零售商再到消费者的各个环节的有机结合1系统分析11需求分析通过市场调查要求本系统具有以下功能统一友好的操作界面能保证系统的易用性规范完善的基础信息设置灵活的报表设计及打印功能实现货物申请托运跟踪与验收的全过程全方位的信息查询功能系统日志详细记录各种操作提供追查的有力依据完善的权限管理增强系统的安全性强大的数据备份及恢复功能保证系统数据的安全性12可行性分析由于传统物流行业操作过程复杂手续繁多业务信息多围绕这些信息的处理也很纷杂而且物流行业竞争激烈这种竞争一方面表现在发展客户的市场开拓上另一方面也存在于收集处理信息的速度广度和深度以及在业务操作中对业务数据处理的准确性和严密性而更高层次上还牵涉到公司决策层对整体业务的控制和协调物流管理系统从物流行业的实际需求出发参照先进的物流理念和多家领先的物流公司实际的运营流程开发而成系统从完善的基础信息设置到货物的托运管理在线跟踪信息查询到最后各种报表的生成清晰的业务流程使操作人员能够按照流程清晰的进行实际的操作保证物流运作有序而高效的进行2总体设计21项目规划物流管理系统是一个典型的数据库管理系统系统由基本信息设置货物托运管理信息查询报表管理系统管理等模块组成规划系统功能模块如下基本信息设置模块该模块主要负责完成部门资料设置职务信息设置公司资料设置员工资料设置客户资料设置司机资料设置和车辆资料设置货物托运管理模块该模块主要由车辆调度安排托运申请单管理货物托运单管理货物验收单管理和车辆配送跟踪记录单管理几部分组成信息查询模块该模块由货物申请单查询车辆调度信息查询货物托运信息查询货物托运验收查询和车辆在途跟踪查询几部分组成报表管理模块包括货物申请单报表货物托运单报表和货物验收单报表3部分系统管理模块包括查看日志删除日志用户管理数据备份数据恢复和系统数据清理几部分22系统功能结构图物流管理系统的系统功能结构图如图1所示图1系统功能结构图3详细设计31系统登录设计系统登录主要用于对登录物流管理系统的用户进行安全性检查以防止非法用户登录该系统根据给管理员分配的权限登录用户可以根据自己所具有的权限操作系统中相应的功能在登录系统时验证操作员及其密码主要通过ADO控件中记录集RECORDSET对象结合IF语句判断用户选定的操作员及其输入的密码与数据库中的操作员和密码是否相同来实现如果相同则允许登录并给予相应的权限否则将不允许用户登录系统登录的运行结果如图2所示图2系统登录窗体的运行结果1窗体设计1在工程中新建1个窗体将窗体的名称设置为FRM_XTDLBORDERSTYLE属性设置为0NONE通过设置PICTURE属性为窗体添加图片2在窗体上添加ADODC控件由于该控件属于ACTIVEX控件在使用之前必须从部件对话框中添加到工具箱添加方法如下在工程部件对话框中勾选MICROSOFTADODATACONTROLS60SP4列表项单击确定按钮之后即可将ADO控件添加到工具箱当中3在窗体中添加1个COMBOBOX控件和文本框控件分别设置名称为NAME属性为CBX_NAME和TXT_PASSWORD设置BORDERSTYLE属性为0NONE将COMBOBOX控件的TEXT属性设置为MR4在窗体中添加2个COMMANDBUTTON控件分别将NAME属性设置为CMD_OK和CMD_CANCELCAPTION属性设置为登录和取消登录窗体的设计结果如图3所示图3系统登录窗体的设计界面2代码设计在代码窗口的声明部分定义如下变量DIMITMXASLISTITEM定义一个LISTITEM对象DIMKEYASSTRING定义字符串变量在窗体装载事件中通过ADO控件的CONNECTIONSTRING属性建立数据库连接同时将所有操作员的姓名添加到CBX_NAME控件当中代码如下PRIVATESUBFORM_LOADCALLWHSCREEN调用获取屏幕分辨率的过程函数使用代码连接数据库与数据表ADODC1CONNECTIONSTRINGPUBLICSTRADODC1RECORDSOURCE“SELECTFROMTB_USER“ADODC1REFRESHIFADODC1RECORDSETRECORDCOUNT0THENADODC1RECORDSETMOVEFIRSTCBX_NAMECLEAR在添加数据时首先清空控件中的内容DOWHILEADODC1RECORDSETEOFFALSE将操作员信息添加到LISTVIEW控件当中CBX_NAMEADDITEMADODC1RECORDSETFIELDS“USER_NAME“ADODC1RECORDSETMOVENEXTLOOPENDIFIFTWIDTH800ORTHEIGTH600THEN判断屏幕分辨率的大小EXITSUBELSECHANGESCREEN调整屏幕分辨率ENDIFENDSUB单击确定按钮如果输入的操作员姓名和口令正确则通过身份验证登录到系统当中设计思路通过SQL语句查询输入的用户名和密码信息在数据库中是否存在如果查询到符合条件的记录信息则显示系统主窗体登录到系统当中实现的程序代码如下PRIVATESUBCMD_OK_CLICKDIMMPASSWORDASSTRINGIFCBX_NAMETEXT“MR“ANDTXT_PASSWORDTEXT“MINGRISOFT“THEN判断是否使用的是超级口令登录FRM_MAINSTATUSBAR1PANELSITEM2TEXT“当前操作员MR“NAME1CBX_NAMETEXT将操作员姓名信息赋予全局变量NAME1UNLOADMEFRM_MAINSHOW显示系统主窗体ELSEADODC1RECORDSOURCE“SELECTFROMTB_USERWHEREUSER_NAME“CBX_NAMETEXT“ADODC1REFRESHIFADODC1RECORDSETRECORDCOUNT0THENMPASSWORDADODC1RECORDSETFIELDS“USER_MM“IFTXT_PASSWORDTEXTMPASSWORDTHEN判断数据的密码是否正确NAME1CBX_NAMETEXTFRM_MAINSTATUSBAR1PANELSITEM2TEXT“当前操作员“ADODC1RECORDSETFIELDS“USER_NAME“FRM_MAINSHOW通过身份验证则显示主窗体登录到系统当中UNLOADMEELSEMSGBOX“密码不正确请您确认后重新输入“提示信息“TXT_PASSWORDTEXT“TXT_PASSWORDSETFOCUSENDIFELSEMSGBOX“对不起没有此用户的信息“提示信息“CBX_NAMETEXT“TXT_PASSWORDTEXT“ENDIFENDIFENDSUB如果在输入密码的文本框中按下ENTER键则将调用确定按钮的单击事件判断登录用户是否合法代码如下所示PRIVATESUBTXT_PASSWORD_KEYDOWNKEYCODEASINTEGERSHIFTASINTEGERIFKEYCODE13THENCALLCMD_OK_CLICK调用确定按钮的单击事件代码ENDIFENDSUB32车辆调度安排车辆调度安排是物流管理过程中的重要环节物流公司在接到托运货物信息之后首要的问题是安排托运货物的车辆在本系统当中通过车辆调度安排填写安排托运车辆的信息然后打印出车辆调度通知单并将通知单发放到托运司机的手中司机根据调度通知单上的信息执行托运任务通过单击窗体中的CMD_SELECT按钮选择车牌号码然后输入其他一些辅助的信息最后保存车辆调度安排信息车辆调度安排模块的运行结果如图4所示图4车辆调度安排窗体的运行结果1窗体设计1在工程中新建1个窗体将窗体的名称设置为FRM_CLDDBORDERSTYLE属性设置为1FIXEDSINGLEBUTTON属性设置FALSE2在窗体上添加1个TOOLBAR控件和1个IMAGELIST控件3在窗体的TOOLBAR控件上单击鼠标右键在弹出的快捷菜单中选择属性项在弹出的属性页对话框中设置窗体的工具栏设计完成的工具栏如图5所示4在窗体中添加1个FRAME控件在FRAME控件上添加1个文本框控件数组并为每个文本框控件配置1个标签控件并且设置相应的CAPTION属性值如图5所示5在窗体上添加1个DTPICKER控件命名为DT1用于输入或显示托运司机执行任务的日期时间6在窗体上添加1个ADO控件和1个DATAGRID控件将DATAGRID控件的名称设置为DGR_SJLLDATASOURCE属性设置为ADODC1ALLOWUPDATE属性值设置为FALSE7在窗体中添加1个标签控件命名为LBL_NUM8在窗体上添加1个时钟控件TIMER1在属性窗口中将控件的INTERVAL属性值设置为60车辆调度安排窗体的设计结果如图5所示图5车辆调度安排窗体的设计结果2代码设计工具栏中的控制按钮控制着窗体的各项操作在TOOLBAR控件TBR_XXCZ的BUTTONCLICK事件当中通过选择SELECTCASE语句的索引值单击工具栏中的按钮执行相应的索引值调用相应的过程来完成添加删除修改和保存等操作的功能保存过程事件的代码如下PRIVATESUBSAVES保存信息的过程IFTEXT10TEXT“ORTEXT13TEXT“THENMSGBOX“重要信息不能为空值“48“提示信息“ELSEADORSOPEN“SELECTFROMTB_GOODS_CLDDWHERECLDD_CPHM“TEXT10TEXT“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENMSGBOX“该信息已经存在“48“提示信息“ADORSCLOSE关闭记录集对象ELSEADORSCLOSE关闭记录集对象CMSGBOX“确认保存信息吗“33“提示信息“IFCVBOKTHENSETADORSCNNEXECUTE“INSERTINTOTB_GOODS_CLDDVALUES“TXT_ID“TEXT10“TEXT11“TEXT12“TEXT13“STRDT1VALUE“TEXT14“TEXT15“TXT_BZ“MSGBOX“数据保存成功“64“提示信息“ELSEENDIFADODC1RECORDSOURCE“SELECTFROMTB_GOODS_CLDDORDERBYCLDD_ID“ADODC1REFRESHCALLDBGCONENDIFCALLTBR_CORTROLTBR_XXCZTRUEENDIFENDSUB用户自定义修改信息过程事件的代码如下PRIVATESUBEDITS修改信息的过程CMSGBOX“确认修改信息吗“33“提示信息“IFCVBOKTHENSETADORSCNNEXECUTE“UPDATETB_GOODS_CLDDSETCLDD_ID“TXT_ID“CLDD_CPHM“TEXT10“CLDD_CZXM“TEXT11“CLDD_SJXM“TEXT12“CLDD_RWSJ“STRDT1VALUE“CLDD_PHMC“TEXT14“CLDD_SHDD“TEXT15“CLDD_BZ“TXT_BZ“WHERECLDD_ID“TXT_IDTEXT“MSGBOX“数据修改成功“64“提示信息“ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_CLDDORDERBYCLDD_ID“ADODC1REFRESHSTRIDTXT_IDTEXTSTRTITLETEXT10TEXTCALLJOINRZ添加修改信息日志CALLDBGCONELSEENDIFENDSUB用户自定义删除信息过程事件的代码如下PRIVATESUBDELETES删除信息CMSGBOX“确认删除该信息吗“17“提示信息“IFCVBOKTHENONERRORRESUMENEXT执行错误处理SETADORSCNNEXECUTE“DELETETB_GOODS_CLDDFROMTB_GOODS_CLDDWHERECLDD_ID“TXT_IDTEXT“ADODC1REFRESH刷新数据信息ENDIFFORI0TO5TEXT1ITEXT“NEXTITXT_BZTEXT“ENDSUB33托运申请单管理在正式托运货物之前需要进行托运货物申请在进行托运货物申请时需要填写托运货物申请单托运申请单经过核对之后才可以填写货物托运单进行托运货物在托运申请单中记录的托运货物的详细信息以便托运货物时进行核对货物托运申请管理模块的运行结果如图6所示图6货物托运申请管理模块运行结果1窗体设计1在工程中新建1个窗体将窗体的名称设置为FRM_TYSQBORDERSTYLE属性设置为1FIXEDSINGLEBUTTON属性设置FALSE2在窗体上添加1个TOOLBAR控件和1个IMAGELIST控件为窗体设计工具栏3在窗体中添加1个FRAME控件在FRAME控件上添加1个文本框控件数组并为每个文本控件配置1个标签控件设置相应的CAPTION属性值如图7所示4在FRAME控件上添加2个DTPICKER控件分别名称命名为DT1和DT2用于输入或显示出货日期时间和开票日期5在窗体上添加1个ADO控件6在窗体中添加1个标签控件命名为LBL_NUM7在窗体上添加1个时钟控件TIMER1在属性窗口中将控件的INTERVAL属性值设置为60货物托运申请单管理窗体的设计结果如图7所示图7货物托运管理窗体的设计结果2代码设计当窗体启动时锁定窗体中文本框禁止输入字符信息同时通过ADO控件的CONNECTIONSTRING属性连接到数据库实现代码如下PRIVATESUBFORM_LOADCALLLOADFILE在窗体加载的时候显示数据信息FORI1TO20TEXT1ILOCKEDTRUE锁定文本框禁止输入字符信息NEXTIADODC1CONNECTIONSTRINGPUBLICSTR通过代码连接到数据库ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_SQDORDERBYSQD_LSZH“ADODC1REFRESHDT1VALUEDATECALLTBR_CORTROLTBR_XXCZTRUEENDSUB单击窗体中的工具栏按钮完成相应的添加删除修改保存和打印的操作TOOLBAR控件TBR_XXCZ的BUTTONCLICK事件代码如下所示PRIVATESUBTBR_XXCZ_BUTTONCLICKBYVALBUTTONASMSCOMCTLLIBBUTTONSELECTCASEBUTTONINDEXCASE1添加信息CALLTBR_CORTROLTBR_XXCZFALSEFORI0TO20TEXT1ILOCKEDFALSETEXT1ITEXT“NEXTITEXT10SETFOCUSADORSOPEN“SELECTFROMTB_GOODS_SQDWHERESQD_LSZHLIKE“FORMATDATE“YYYYMMDD“ORDERBYSQD_LSZH“CNNADOPENKEYSET根据日期产生流水账号IFADORSRECORDCOUNT0THENADORSMOVELASTTXT_IDTEXTVALADORSFIELDS“SQD_LSZH“1ELSETXT_IDTEXTFORMATDATE“YYYYMMDD“0000001“ENDIFADORSCLOSECASE2删除信息CALLDELETESCASE3修改信息CALLEDITSCASE4保存信息CALLSAVESCASE5CALLTBR_CORTROLTBR_XXCZTRUEFORI1TO20TEXT1ITEXT“TEXT11SETFOCUSNEXTICASE6打印信息UNLOADMEENDSELECTENDSUB通过文本框的CHANGE事件来实现在另一个文本框中自动计算合计金额的功能实现的具体代码如下所示PRIVATESUBTEXT1_CHANGEINDEXASINTEGERIFINDEX7THENTEXT115TEXTVALTEXT17TEXTVALTEXT111TEXTELSEIFINDEX11THENTEXT115TEXTVALTEXT17TEXTVALTEXT111TEXTELSEIFINDEX15THENTEXT115TEXTVALTEXT17TEXTVALTEXT111TEXTENDIFENDSUB34货物托运管理货物托运管理是本系统的核心在货物托运申请完成之后就可以填写货物托运单托运司机根据货物托运单将货物托运到客户手中对于同一张货物托运单可以托运多种不同的货物在托运管理窗体中可以添加或删除托运货物还可以通过LISTVIEW控件浏览货物托运单信息货物托运管理模块的运行结果如图8所示单击工具栏中的添加货物按钮将弹出增加托运货物窗体如图9所示图8货物托运管理模块的运行结果图9增加托运货物窗体1货物托运窗体及增加托运货物窗体的设计1在工程中新建一个窗体将窗体的名称设置为FRM_HPTYBORDERSTYLE属性设置为1FIXEDSINGLEBUTTON属性设置FALSE2在窗体上添加TOOLBAR控件根据前面所介绍的方法为窗体设计工具栏3在窗体中添加2个IMAGELIST控件4在窗体上添加1个LISTVIEW控件5在LISTVIEW控件上单击鼠标右键在弹出的快捷菜单中选择属性项在弹出的属性页对话框中选择通用选项卡在该选项卡中选取整行选择网格行和热跟踪等复选框在查看旁的列表框中选择3LVWREPORT如图10所示图10设置控件的显示模式6在LISTVIEW控件上单击鼠标右键在弹出的快捷菜单中选择属性项在弹出属性页对话框中选择列首选项卡在该选项卡中单击插入列按钮然后在文本文本框中输入插入列的标题名称在宽度文本框中输入插入列的宽度如图11所示图11设置插入列的属性7在LISTVIEW控件上单击鼠标右键在弹出的快捷菜单中选择属性项在弹出的属性页对话框中选择图像列表选项卡在该选项卡中的普通和列标头列表框中分别选择IMAGELIST2如图12所示图12连接IMAGELIST2控件8在窗体上添加1个ADO控件9在窗体中添加3个FRAME控件分别在FRAME控件中添加文本框控件和DATAGRID控件将DATAGRID控件的名称设置为DGR_SJLLDATASOURCE属性设置为ADODC1BACKCOLOR属性值设置为H00FFFFC0设计完成的界面如图13所示10在窗体中添加1个标签控件名称命名为LBL_NUM11在窗体上添加1个时钟控件TIMER1在属性窗口中将控件的INTERVAL属性值设置为60货物托运管理窗体的设计结果如图13所示图13货物托运管理窗体的设计界面12在工程中添加1个窗体将窗体命名为FRM_TYHWGL该窗体作为货物托运管理的子窗体用于为完成为货物托运单添加托运货物的操作13将该窗体的BORDERSTYLE属性设置为1FIXEDSINGLE14在该窗体上添加1个ADO控件15在该窗体中添加1个FRAME控件在FRAME控件中添加文本框控件和标签控件16在该窗体中添加1个DATAGRID控件将DATAGRID控件的名称设置为DGR_SJLLDATASOURCE属性设置为ADODC1设计完成的界面如图14所示17在窗体上添加4个COMMANDBUTTON控件分别将控件的名称命名为CMD_ADDCMD_SAVECMD_DELCMD_CANCELCAPTION属性设置为添加保存删除取消图14托运货物管理窗体的设计界面2货物托运管理窗体的代码设计在窗体启动时通过调用LOADFILE过程在窗体上显示数据同时利用ADO对象计算出当前数据库中数据记录的条数代码如下PRIVATESUBFORM_LOADCALLREFRESHDATACALLLOADFILEFORI1TO21锁定文本框禁止输入内容TEXT1ILOCKEDTRUENEXTIADORSOPEN“SELECTFROMTB_GOODS_TYDORDERBYTYD_TYDH“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENLBL_NUMCAPTION“当前数据表中共有“ADORSRECORDCOUNT“条记录“ENDIFADORSCLOSECALLTBR_CORTROLTBR_XXCZTRUEENDSUB单击工具栏中的控制按钮通过SELECTCASE语句控制工具栏中的按钮完成添加删除修改保存添加货物和删除货物等操作实现的代码如下PRIVATESUBTBR_XXCZ_BUTTONCLICKBYVALBUTTONASMSCOMCTLLIBBUTTONSELECTCASEBUTTONINDEXCASE1CALLTBR_CORTROLTBR_XXCZFALSEFORI0TO21TEXT1ILOCKEDFALSETEXT1ITEXT“NEXTITEXT10SETFOCUS根据日期产生流水账号ADORSOPEN“SELECTFROMTB_GOODS_TYDWHERETYD_TYDHLIKE“FORMATDATE“YYYYMMDD“ORDERBYTYD_TYDH“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENADORSMOVELASTTXT_IDTEXTVALADORSFIELDS“TYD_TYDH“1ELSETXT_IDTEXTFORMATDATE“YYYYMMDD“00001“ENDIFADORSCLOSECASE2删除信息CALLDELETESCASE3修改信息CALLEDITSCASE4保存信息CALLSAVESCASE5CALLTBR_CORTROLTBR_XXCZTRUEFORI1TO21TEXT1ITEXT“TEXT11SETFOCUSNEXTICASE6添加货物TSTRSTXT_IDTEXTFRM_TYHWGLCMD_DELENABLEDFALSE使添加货物窗体中的删除按钮不可用FRM_TYHWGLSHOW1CASE7删除货物TSTRSTXT_IDTEXTFRM_TYHWGLCMD_ADDENABLEDFALSEFRM_TYHWGLCMD_SAVEENABLEDFALSEFRM_TYHWGLSHOW1CASE8UNLOADMEENDSELECTENDSUB通过单击选择LISTVIEW控件中的元素托运单号然后调用DATALOAD过程在窗体上显示相对应托运单号的数据信息同时查询该记录是否被修改过如果修改过则将修改时间及修改人信息显示在窗体的TXT_YSRQ和TXT_YSR文本框当中代码如下所示PRIVATESUBLISTVIEW1_CLICKADORSOPEN“SELECTFROMTB_GOODS_TYDWHERETYD_TYDH“LISTVIEW1SELECTEDITEM“ORDERBYTYD_TYDH“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENCALLDATALOAD调用显示数据的过程ENDIFADORSCLOSE关闭数据集对象ADORS1OPEN“SELECTFROMTB_GOODS_KHYSWHEREKHYS_TYDH“LISTVIEW1SELECTEDITEM“CNNADOPENKEYSETIFADORS1RECORDCOUNT0THENTXT_YSRQTEXTADORS1FIELDS“KHYS_YSRQ“TXT_YSRTEXTADORS1FIELDS“KHYS_YSR“ELSETXT_YSRQTEXT“TXT_YSRTEXT“ENDIFADORS1CLOSECALLSHOWDATA调用数据刷新的过程CALLDBGCONENDSUB通过时钟控件将当前数据库中的记录条数显示在标签控件LBL_NUM当中实现的代码如下所示PRIVATESUBTIMER1_TIMERONERRORRESUMENEXT执行错误处理的语句LBL_NUMCAPTION“当前数据表中共有“ADORSRECORDCOUNT“条记录“ENDSUB3添加托运货物信息窗体的代码设计在增加托运货物窗体中单击添加按钮清空窗体中文本框的信息代码如下PRIVATESUBCMD_ADD_CLICKFORI1TO4TEXT1ITEXT“NEXTITEXT11SETFOCUSENDSUB在窗体中单击保存按钮在确认该货物信息没有被保存之后保存所添加的货物信息同时刷新窗体中的数据信息代码如下PRIVATESUBCMD_SAVE_CLICKIFTEXT10TEXT“THENMSGBOX“托运单号不能为空“64“提示信息“ELSEADORSOPEN“SELECTFROMTB_GOODS_HWZXWHEREHWZX_HWID“TEXT11“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENMSGBOX“该货物已经添加过“64“提示信息“ELSECMSGBOX“确认保存信息吗“33“提示信息“IFCVBOKTHENSETADORSCNNEXECUTE“INSERTINTOTB_GOODS_HWZXVALUES“TEXT11“TEXT12“TEXT10“TEXT13“TEXT14“MSGBOX“数据保存成功“64“提示信息“ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_HWZXWHEREHWZX_SQDH“TEXT10“ORDERBYHWZX_HWID“ADODC1REFRESHCALLDBGCONCMD_ADDSETFOCUSENDIFENDIFADORSCLOSEENDIFENDSUB35在途跟踪管理在途跟踪是对正在托运的货物信息进行管理托运司机在托运货物的过程中每到一个地方或者在托运过程中出现某些异常情况就会给托运公司反馈一个信息托运公司将反馈回来的信息进行记录并且对反馈回来的异常情况进行处理这个过程就是在途跟踪在途跟踪管理模块的运行结果如图15所示图15在途跟踪管理模块运行结果1窗体设计1在工程中新建1个窗体将窗体的名称设置为FRM_ZTGZBORDERSTYLE属性设置为1FIXEDSINGLEBUTTON属性设置FALSE2在窗体上添加1个TOOLBAR控件和1个IMAGELIST控件3在窗体上添加1个LISTVIEW控件4在窗体上添加1个ADO控件5在窗体中添加3个FRAME控件在FRAME控件中添加文本框控件并设置控件的相关属性6在窗体上添加DATAGRID控件将DATAGRID控件的名称设置为DGR_SJLLDATASOURCE属性设置为ADODC1在途跟踪管理窗体的设计结果如图16所示图16在途跟踪管理窗体的设计2代码设计通过单击选择LISTVIEW控件中的元素托运单号在窗体中即可以显示相对应托运单号的数据信息同时查询TB_GOODS_ZTGZLX数据表从中检索出该托运单号的跟踪路线信息将其显示在窗体的TXT_LX文本框当中实现的代码如下所示PRIVATESUBLISTVIEW1_CLICKADORSOPEN“SELECTFROMTB_GOODS_ZTGZWHEREZTGZ_CYDH“LISTVIEW1SELECTEDITEM“ORDERBYZTGZ_CYDH“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENTEXT10TEXTADORSFIELDS“ZTGZ_ID“TEXT11TEXTADORSFIELDS“ZTGZ_CYDH“TEXT12TEXTADORSFIELDS“ZTGZ_SJXM“TEXT13TEXTADORSFIELDS“ZTGZ_CPHM“DT1VALUEADORSFIELDS“ZTGZ_DASJ“TEXT14TEXTADORSFIELDS“ZTGZ_SJSJ“TEXT15TEXTADORSFIELDS“ZTGZ_DADD“TEXT16TEXTADORSFIELDS“ZTGZ_BZ“ENDIFADORSCLOSE关闭记录集对象ADORS1OPEN“SELECTFROMTB_GOODS_ZTGZLXWHEREZTGZLX_TYDH“LISTVIEW1SELECTEDITEM“CNNADOPENKEYSETIFADORS1RECORDCOUNT0THENTXT_LXTEXTADORS1FIELDS“ZTGZLX_LX“ENDIFADORS1CLOSE关闭记录集对象ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_ZTGZWHEREZTGZ_CYDH“LISTVIEW1SELECTEDITEM“ADODC1REFRESH刷新数据信息CALLDBGCON给DATAGRID控件的列标题赋值ENDSUB在工具栏中单击保存按钮将调用用户自定义的保存过程保存在途跟踪信息用户自定义的保存过程的代码如下PRIVATESUBSAVES保存信息的过程IFTEXT11TEXT“THENMSGBOX“托运单号不能为空“48“提示信息“ELSEADORS2OPEN“SELECTFROMTB_GOODS_ZTGZWHEREZTGZ_ID“TEXT10“CNNADOPENKEYSETIFADORS2RECORDCOUNT0THENMSGBOX“该信息已经存在“48“提示信息“ELSECMSGBOX“确认保存信息吗“33“提示信息“IFCVBOKTHENSETADORSCNNEXECUTE“INSERTINTOTB_GOODS_ZTGZVALUES“TEXT10“TEXT11“TEXT12“TEXT13“TEXT14“TEXT15“STRDT1VALUE“TEXT16“ADORSOPEN“SELECTFROMTB_GOODS_ZTGZLXWHEREZTGZLX_TYDH“TEXT11“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENCALLDDTJ统计到达的路线SETADORSCNNEXECUTE“UPDATETB_GOODS_ZTGZLXSETZTGZLX_LX“TXT_LX“WHEREZTGZLX_TYDH“TEXT11TEXT“ELSECALLDDTJ统计到达的路线SETADORSCNNEXECUTE“INSERTINTOTB_GOODS_ZTGZLXVALUES“TEXT11“TXT_LX“ENDIFMSGBOX“数据保存成功“64“提示信息“ENDIFADODC1RECORDSOURCE“SELECTFROMTB_GOODS_ZTGZORDERBYZTGZ_ID“ADODC1REFRESHCALLDBGCONCALLTBR_CORTROLTBR_XXCZTRUEENDIFADORS2CLOSEENDIFCALLREFRESHDATAENDSUB在工具栏中单击删除按钮将调用用户自定义的删除过程删除在途跟踪信息用户自定义删除在途跟踪过程的代码如下PRIVATESUBDELETES删除信息CMSGBOX“确认删除该信息吗“17“提示信息“IFCVBOKTHENONERRORRESUMENEXTSETADORSCNNEXECUTE“DELETETB_GOODS_ZTGZFROMTB_GOODS_ZTGZWHEREZTGZ_ID“TEXT10TEXT“ADODC1REFRESH刷新数据信息CALLDBGCONENDIFFORI1TO5TEXT1ITEXT“NEXTICBX_XBTEXT“清除列表控件的内容CALLREFRESHDATAENDSUB在保存在途跟踪信息的时候需要调用用户自定义的DDTJ过程完成在文本框TXT_LX中显示跟踪路线信息的功能DDTJ过程的实现代码如下PRIVATESUBDDTJADORS1OPEN“SELECTFROMTB_GOODS_ZTGZWHEREZTGZ_CYDH“TEXT11“CNNADOPENKEYSETIFADORS1RECORDCOUNT0THENADORS1MOVEFIRST将数据库中的记录移向第一条TXT_LXTEXT“ONERRORRESUMENEXT执行错误处理FORI0TOADORS1RECORDCOUNTIFTXT_LXTEXT“THENTXT_LXTEXT“公司本部“ADORS1FIELDS“ZTGZ_DADD“ELSETXT_LXTEXTTXT_LXTEXT“ADORS1FIELDS“ZTGZ_DADD“ENDIFADORS1MOVENEXT将数据库中的记录移向下一条NEXTIENDIFADORS1CLOSE关闭记录集对象ENDSUB36信息查询在应用软件的设计过程中将同一项功能设计到同一个窗体当中是非常必要的这样会减少应用程序中窗体的数量和代码数量提高程序的运行速度本系统当中的查询模块就是这样设计的通过在主窗体的查询模块的菜单中设置一个标识变量然后在查询窗体中根据这个标识变量设置具体实现的查询功能如将托运申请单查询的标识变量设置为1车辆调度信息查询的标识变量设置为2等等这样在查询窗体当中当窗体启动时进行判断如果标识变量是1则进行托运申请信息查询的相关操作如果标识变量是2则进行车辆调度信息查询的相关操作信息查询模块的运行结果如图17所示这里以货物托运单查询为例图17信息查询模块运行结果1窗体设计1在工程中新建1个窗体将窗体的名称设置为FRM_XXCXBORDERSTYLE属性设置为1FIXEDSINGLEBUTTON属性设置FALSE2在窗体上添加1个ADO控件其名称为默认3在窗体中添加1个FRAME控件在FRAME控件中添加1个COMBOBOX控件1个标签控件1个文本框控件和2个COMMANDBUTTON控件并设置控件的相关属性4在窗体上添加1个DATAGRID控件将DATAGRID控件的名称设置为DGR_CXDATASOURCE属性设置为ADODC1信息查询窗体的设计结果如图18所示图18信息查询窗体的设计结果2代码设计在窗体启动时通过接收到不同的标识变量值将相应的查询字段信息添加到COMBOBOX控件当中并且根据标识变量执行相应的查询函数FLCX完成在窗体上显示数据表中所有数据的功能实现的代码如下PRIVATESUBFORM_LOADADORSOPEN“SELECTFROMTB_GOODS_SQD“CNNADOPENKEYSETIFADORSRECORDCOUNT0THENENDIFADORSCLOSEMELEFTSCREENWIDTHMEWIDTH2METOPSCREENHEIGHTMEHEIGHT2IFSTRCX1THENCALLFLCX1执行托运申请信息查询ELSEIFSTRCX2THENCALLFLCX2执行车辆调度信息查询ELSEIFSTRCX3THENCALLFLCX3执行货物托运信息查询ELSEIFSTRCX4THENCALLFLCX4执行托运验收信息查询ENDIFADODC1CONNECTIONSTRINGPUBLICSTRADODC1RECORDSOURCESTRRSADODC1REFRESHSETDGR_CXDATASOURCEADODC1IFSTRCX1THEN添加托运申请信息查询字段CALLDGRTITLE1调用保存查询字符串的过程FORI0TO23CBX_TJADDITEMDGR_CXCOLUMNSICAPTIONNEXTIELSEIFSTRCX2THEN添加车辆调度信息查询字段CALLDGRTITLE2FORI0TO7CBX_TJADDITEMDGR_CXCOLUMNSICAPTIONNEXTIELSEIFSTRCX3THEN添加货物托运信息查询字段CALLDGRTITLE3FORI0TO23CBX_TJADDITEMDGR_CXCOLUMNSICAPTIONNEXTIELSEIFSTRCX4THEN添加托运验收信息查询字段CALLDGRTITLE4FORI0TO6CBX_TJADDITEMDGR_CXCOLUMNSICAPTIONNEXTIENDIFENDSUB在用户自定义的FLCX函数过程当中保存着相对应的查询字符串信息根据该查询字符串来完成相应的查询事件代码如下PRIVATESUBFLCXNUMSASINTEGERSELECTCASENUMSCASE1货物申请查询MECAPTION“货物申请单查询“STRRS“SELECTFROMTB_GOODS_SQDORDERBYSQD_LSZH“CASE2MECAPTION“车辆调度查询“STRRS“SELECTFROMTB_GOODS_CLDDORDERBYCLDD_ID“CASE3MECAPTION“货物托运单查询“STRRS“SELECTFROMTB_GOODS_TYDORDERBYTYD_TYDH“CASE4MECAPTION“货物验收单查询“STRRS“SELECTFROMTB_GOODS_KHYSORDERBYKHYS_ID“ENDSELECTENDSUB通过文本框中字符信息的改变调用查询事件的过程FLCXCHAGE执行查询事件完成各种查询功能代码如下PRIVATESUBTXT_CX_CHANGEIFCBX_TJTEXT“THENIFSTRCX1THEN货物申请单查CALLFLCXCHAGE1调用查询过程CALLDGRTITLE1ELSEIFSTRCX2THEN车辆调度查询CALLFLCXCHAGE2CALLDGRTITLE2ELSEIFSTRCX3THEN货物托运单查询CALLFLCXCHAGE3CALLDGRTITLE3ELSEIFSTRCX4THEN货物验收单查询CALLFLCXCHAGE4CALLDGRTITLE4ENDIFENDIFENDSUB在用户自定义的FLCXCHAGE函数过程当中完成随时查询的操作实现的代码如下PRIVATESUBFLCXCHAGENUMSASINTEGERSELECTCASENUMSCASE1执行货物申请查询ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_SQDWHERE“COMS“LIKE“TXT_CXTEXT“ADODC1REFRESHCASE2执行车辆调度查询ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_CLDDWHERE“COMS“LIKE“TXT_CXTEXT“ADODC1REFRESHCASE3执行托运信息查询ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_TYDWHERE“COMS“LIKE“TXT_CXTEXT“ADODC1REFRESHCASE4执行托运验收查询ADODC1RECORDSOURCE“SELECTFROMTB_GOODS_KHYSWHERE“COMS“LIKE“TXT_CXTEXT“ADODC1REFRESHENDSELECTENDSUB附录A参考文献1VISUALBASIC精彩编程200例机械工业出版社赛奎春高春艳等2003年1月2VISUALBASIC数据库开发实例解析机械工业出版社刘志铭高春艳等2003年8月3VISUALFOXPRO数据库开发实例解析机械工业出版社王晶莹王国辉等2003年9月4POWERBUILDER数据库开发实例解析机械工业出版社华传铭张振坤等2003年9月5DELPHI数据库开发实例解析机械工业出版社赛奎春郑骁鹏等2004年2月6POWERBUILDER精彩编程200例机械工业出版社张振坤李文立等2004年9月7VISUALFOXPRO精彩编程200例机械工业出版社王国辉董韶华等2004年9月8ASP数据库开发实例解析机械工业出版社李严于亚芳王国辉2004年12月9DELPHI工程应用与项目实践机械工业出版社宋坤赵智勇等2005年1月10VISUALBASIC工程应用与项目实践机械工业出版社高春艳李俊民等2005年1月11VISUALC工程应用与项目实践机械工业出版社张雨阮伟良等5005年1月12JSP工程应用与项目实践机械工业出版社陈威白伟明李楠2005年2月13ASP工程应用与项目实践机械工业出版社王国辉牛强李南南2005年4月14VISUALBASIC信息系统开发实例精选机械工业出版社高春艳李俊民张耀庭等2005年7月15ASP信息系统开发实例精选机械工业出版社王国辉牛强李南南等2005年7月16DELPHI信息系统开发实例精选机械工业出版社宋坤赵智勇刘强等2005年7月17VISUALFOXPRO数据库开发关键技术与实例应用人民邮电出版社周桓张雨王国辉2004年5月18POWEBUILDER数据库开发关键技术与实例应用人民邮电出版社刘志铭张振坤冯文萃2004年5月19DELPHI数据库开发关键技术与实例应用人民邮电出版社赛奎春陈紫鸿宋昆2004年5月20VISUALBASIC数据库开发关键技术与实例应用人民邮电出版社高春艳李艳2004年5月21VISUALC管理信息系统完整项目实例剖析人民邮电出版社明日科技2005年7月22VISUALBASIC管理信息系统完整项目实例剖析人民邮电出版社明日科技2005年7月23POWERBUILDER管理信息系统完整项目实例剖析人民邮电出版社明日科技2005年7月24VISUALFOXPRO管理信息系统完整项目实例剖析人民邮电出版社明日科技2005年7月25SQLSERVER数据库开发实例解析机械工业出版社宋昆李严等2006年1月26ACCESS数据库开发实例解析机械工业出版社李俊民高春燕等2006年1月附录B数据表结构表B1TB_YGXX员工信息表字段名数据类型长度描述YGXX_YGIDVARCHAR20员工编号YGXX_YGXMVARCHAR20员工姓名YGXX_XBVARCHAR10性别YGXX_ZWVARCHAR50职务YG