【導(dǎo)讀】貿(mào)易過程中的商品從廠家到最終用戶的物流過程是客觀存在的，長(zhǎng)期以來人們從未主動(dòng)地、系統(tǒng)地、整體地去考慮，因而未能發(fā)揮其系統(tǒng)的總體優(yōu)勢(shì)。供應(yīng)鏈物流的地域和時(shí)間跨度大，為此，我們這次畢業(yè)設(shè)計(jì)特此開發(fā)了物流管理系統(tǒng)此次設(shè)計(jì)我結(jié)合了我在實(shí)習(xí)所在的南通市威馳物流公司開發(fā)設(shè)計(jì)的。該公司承擔(dān)全國(guó)范圍內(nèi)的零擔(dān)整車運(yùn)輸，公司所在地在蘇州太倉(cāng)雙鳳，204國(guó)道邊。公司零擔(dān)運(yùn)輸有兩輛公司所屬車，還有外面叫的車6至7輛，共有員工30多人，零擔(dān)運(yùn)輸主體是PP塑料設(shè)備，大多數(shù)是從太倉(cāng)提貨，然后整理后發(fā)往上海，在上海找專線發(fā)送往目的地。整車運(yùn)輸基本是從上海、無錫找車，根據(jù)客戶要求，在上海、無錫辦事處招募車輛，然后派車到廠裝取貨物。在小型物流公司中，因?yàn)楝F(xiàn)在江蘇省內(nèi)上海、無錫兩地發(fā)達(dá)的物流園區(qū)的建設(shè)，導(dǎo)致了各個(gè)專線的多量化，專線發(fā)車的頻率的快速化。所以導(dǎo)致了許多小型物流企業(yè)都不存在倉(cāng)儲(chǔ)管理設(shè)定，沒有倉(cāng)儲(chǔ)費(fèi)用。

　　

【正文】 3屆本科生畢業(yè)設(shè)計(jì)（論文） 第25頁(yè)第五章 總 結(jié)在對(duì)物流管理系統(tǒng)設(shè)計(jì)開始這前，本人對(duì)此了解不是很多，在老師和同學(xué)的幫助下，慢慢對(duì)物流管理系統(tǒng)有了一定了解。物流是專門的一門課程，在現(xiàn)代的物流概念中已經(jīng)延伸為一門特殊的學(xué)問。想要對(duì)他進(jìn)行深入的學(xué)習(xí)還是需要花費(fèi)很多精力的。在對(duì)物流認(rèn)識(shí)后，我們按照軟件工程的生命周期方法學(xué)來完成設(shè)計(jì)，并根據(jù)軟件工程的設(shè)計(jì)思想逐步完成了物流管理系統(tǒng)。短短三個(gè)月的設(shè)計(jì)和開發(fā)過程中遇到很多的問題，自己經(jīng)過不斷學(xué)習(xí)的過程中我體會(huì)到：1．從設(shè)計(jì)初的不懂到最后能夠順利完成，我體會(huì)到在實(shí)踐中學(xué)習(xí)的重要性。經(jīng)過這次的實(shí)習(xí)使我能夠完整地做出了一個(gè)系統(tǒng)。讓我更深入理解開發(fā)一個(gè)系統(tǒng)的重要性。2．在設(shè)計(jì)過程中，遇到不懂的問題我會(huì)利用上網(wǎng)跟大家交流。這樣使我很快地解決問題?？傊谶@次的畢業(yè)設(shè)計(jì)中，使我深刻體會(huì)到要做好一個(gè)完整的事情，需要有系統(tǒng)的思維方式和方法，對(duì)待一個(gè)新的問題，要耐心、要善于運(yùn)用已有的資源來充實(shí)自己。同時(shí)我也深刻的認(rèn)識(shí)到，在對(duì)待一個(gè)新事物時(shí)，一定要從整體考慮，完成一步之后再作下一步，這樣對(duì)于系統(tǒng)而言才能更加有效。通過此次畢業(yè)設(shè)計(jì)，我不但對(duì)vb和數(shù)據(jù)庫(kù)設(shè)計(jì)開發(fā)有了深刻的認(rèn)識(shí)，積累了使用軟件工程的思想來開發(fā)軟件的經(jīng)驗(yàn)，同時(shí)最重要的是摸索出了一套考慮問題和解決問題的方法. 這對(duì)于我將來走上工作崗位受益匪淺。中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第26頁(yè)參考文獻(xiàn):[1] Ashwin Amanna. Overview of IntelliDrive / Vehicle Infrastructure Integration (VII). “”.[2] Achieving the Vision: From VII to IntelliDrive. “”.[3] Xu, Q., T. Mak, J. Ko, and et al. Layer2 protocol design for vehicle safety munications in dedicated short range munications spectrum[J]. 7th IEEE Intelligent Transportation Systems Conference, Washington, ., 2004, –1097.[4] Chisalita, L., and N. Shahmehri. A peertopeer approach to vehicular munication for the support of traffic safety application[J]. 5th IEEE Intelligent Transportation Systems Conference, Singapore, 2002, –341.[5] FleetNet Homepage. FleetNet Internet on the road. August 1, 2007.“”.[6] A. Avila, G. Korkmaz, Y. Liu, and et al. A plete simulator architecture for intervehicle munication based intersection warning system[J]. 8th IEEE Intelligent Transportation Systems Conference, Vienna, Austria, 2005, –466.[7] Yin, J., T. Elbatt, G. Yeung, and et al. Performance evaluation of safety applications over DSRC vehicular ad hoc networks[J].1st ACM Workshop on Vehicular Ad hoc Networks, Philadelphia, Pennsylvania, 2004, –9.[8] 吳功宜. 計(jì)算機(jī)網(wǎng)絡(luò)[M]. 北京：清華大學(xué)出版社,2003. [9] 交通部公路科學(xué)研究院. 公路通行能力手冊(cè)[S]. 北京, 2006.[10] 李蓬. 基于NS2的局域網(wǎng)性能仿真[J]. 電腦與信息技術(shù),2008,16(01):1618.[11] 財(cái)團(tuán)法人工業(yè)技術(shù)研究院. 經(jīng)濟(jì)部標(biāo)準(zhǔn)檢驗(yàn)局99年度委辦計(jì)劃期末成果報(bào)告IEEE [R]..[12] 王協(xié)源. 在事件層平行方法下NCTUns網(wǎng)絡(luò)仿真器的效能量測(cè)[D]. 國(guó)立交通大學(xué), 2009.[13] 霍紅.第三方物流企業(yè)經(jīng)營(yíng)與管理[M].北京：中國(guó)物資出版社，2008年3月第2版.[14] [M].北京：北京大學(xué)出版社，2010年1月第1版.[15] [M].北京：北京大學(xué)出版社，2007年8月第1版.[16] [D].西安：長(zhǎng)安大學(xué)，2006.[17] 霍紅，[J].物流技術(shù)，2009，[18] [J].，[19] 童明榮,[J].物流技術(shù)，2008，.[20] 趙英姝,吳占坤,[J].技術(shù)經(jīng)濟(jì)與管理研究，2009,中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第27頁(yè)附錄：代碼清單各個(gè)功能模塊具體代碼：FRMLOGINPrivate Sub cmdCancel_Click() LoginSucceeded = False Unload MeEnd SubPrivate Sub cmdOK_Click() If trycount = 5 Then If (Trim(txtUserName) = ) Or (Trim(txtPassword) = ) Then trycount = trycount + 1 MsgBox 用戶名密碼不能為空!, , 信息提示 Else Dim strsql As String Dim rs As New strsql = SELECT PASSWORD FROM MYUSERS WHERE USERNAME = 39。 amp。 Trim(txtUserName) amp。 39。 Set rs = (strsql) If Not ( Or ) Then If Trim(txtPassword) = (PASSWORD) Then trycount = 0 LoginSucceeded = True Else trycount = trycount + 1 MsgBox 無效的密碼，請(qǐng)重試!, , 信息提示中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第28頁(yè) SendKeys {Home}+{End} End If Else trycount = trycount + 1 MsgBox 無效的密碼，請(qǐng)重試!, , 信息提示 SendKeys {Home}+{End} End If End If Else MsgBox 非法用戶!, , 信息提示 Unload Me End IfEnd SubMAINFORMPrivate Sub MDIForm_Load() = 歡迎使用物流管理系統(tǒng) = * = * = * = * End SubPrivate Sub MDIForm_Unload(Cancel As Integer) 39。關(guān)閉所有窗體 Unload frmBillManage Unload frmChangePassword Unload frmClient Unload frmClientAdd Unload frmClientUpdate中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第29頁(yè) Unload frmLogin Unload frmProduct Unload frmQuery Unload frmReport Unload frmStation Unload frmTraffic Unload frmTrafficAdd Unload frmTrafficUpdateEnd SubPrivate Sub ParticularPrint_Click() End SubPrivate Sub ProductManage_Click() End SubPrivate Sub ReportPrint_Click() End SubPrivate Sub StationManage_Click() End SubPrivate Sub TrafficAdd_Click() End SubPrivate Sub TrafficView_Click() End Sub中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第30頁(yè)FRMTRAFFICADDPrivate Sub Form_Load() = 0 = 0 = * = * 39。取得最大ID Dim inum As Integer Dim strsql As String Dim DB As New clsDataBase Dim rs As New strsql = SELECT MAX(ID) AS MAXID FROM TRAFFIC Set rs = (strsql) If Not IsNull(rs(0)) Then ID = rs(0) + 1 Else ID = 0 End If = ID 39。初始化車類型 (高邊) (0) = 0 (蓬車) (1) = 1 = 0 39。初始化貨物類型 (包裝) (0) = 0 (散裝) (1) = 1 = 0 39。初始化品名中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第31頁(yè) strsql = SELECT * FROM PRODUCT Set rs = (strsql) If Not () Or () Then inum = 0 Do While Not (rs(NAME)) (inum) = rs(ID) inum = inum + 1 Loop End If If 1 Then = 0 Else = 1 End If 39。初始化發(fā)站 strsql = SELECT * FROM STATION ORDER BY NAME Set rs = (strsql) If Not () Or () Then inum = 0 Do While Not (rs(NAME)) (inum) = rs(ID) inum = inum + 1 Loop End If If 1 Then = 0 Else = 1 End If 39。初始化到站 strsql = SELECT * FROM STATION ORDER BY NAME DESC Set rs = (strsql)中國(guó)礦業(yè)大學(xué)2013屆本科生畢業(yè)設(shè)計(jì)（論文） 第32頁(yè) If Not () Or () Then inum = 0 Do While Not