倉庫管理系統(tǒng)數(shù)據(jù)庫應(yīng)用技術(shù)課程設(shè)計報告書

1、 . . 28/28遼 寧 工 業(yè) 大 學(xué)數(shù)據(jù)庫應(yīng)用技術(shù)課 程 設(shè) 計 說 明 書題目：倉庫管理系統(tǒng)學(xué)院（系）：專業(yè)班級：學(xué) 號：學(xué)生：指導(dǎo)教師：教師職稱：起止時間：目錄 TOC o 1-3 h z HYPERLINK l _Toc313091150第一章概述 PAGEREF _Toc313091150 h 4HYPERLINK l _Toc313091151第二章問題定義 PAGEREF _Toc313091151 h 5HYPERLINK l _Toc313091152第三章需求分析 PAGEREF _Toc313091152 h 6HYPERLINK l _Toc313091153第四章

2、數(shù)據(jù)庫設(shè)計 PAGEREF _Toc313091153 h 11HYPERLINK l _Toc313091154第五章界面設(shè)計 PAGEREF _Toc313091154 h 19HYPERLINK l _Toc313091158第六章代碼與注釋 PAGEREF _Toc313091158 h 24HYPERLINK l _Toc313091159設(shè)計總結(jié) PAGEREF _Toc313091159 h 26HYPERLINK l _Toc313091160參考文獻(xiàn) PAGEREF _Toc313091160 h 27第一章 概述本倉庫貨物管理系統(tǒng)針對企業(yè)倉庫進(jìn)貨管理方面的問題。它能實(shí)現(xiàn)倉庫

3、進(jìn)貨的綜合管理，減少不必要的手工上報，也為基層單位上報數(shù)據(jù)提供便利，減少人工勞動。對倉庫進(jìn)貨信息資源，出貨信息資源管理的貨號、貨物名稱、進(jìn)出貨時間、數(shù)量、生產(chǎn)單位；貨物報表登記貨物的基本檔案，貨號、貨名、入庫日期、存放地點(diǎn)、存放情況；日常管理中貨物性質(zhì)、存放要求、保質(zhì)期等信息進(jìn)行全面、系統(tǒng)的管理。在整個系統(tǒng)開發(fā)的過程中，運(yùn)用了軟件工程的基本概念、相關(guān)技術(shù)和方法。并且采用了系統(tǒng)生命周期的結(jié)構(gòu)化程序設(shè)計方法，從而將整個系統(tǒng)開發(fā)各階段（系統(tǒng)分析、系統(tǒng)設(shè)計、系統(tǒng)實(shí)施）的基本活動貫穿起來。第二章 問題定義隨著科學(xué)技術(shù)的發(fā)展，社會進(jìn)步，計算機(jī)迅速的發(fā)展,倉庫貨物管理的方法也日新月異,以前全是由人工管理的方

4、法現(xiàn)存在很多的缺點(diǎn)：管理效率低，勞動強(qiáng)度大，信息處理速度低而且準(zhǔn)確率也不夠令人滿意。為了提高倉庫貨物管理效率，減輕勞動強(qiáng)度提高，信息處理速度和準(zhǔn)確性；為管理員提供更方便、科學(xué)的服務(wù)項目。為管理員提供的一種更先進(jìn)、科學(xué)的服務(wù)系統(tǒng)。于是我們便選擇了由計算機(jī)來設(shè)計一個倉庫貨物管理系統(tǒng)的方案。讓計算機(jī)對倉庫貨物進(jìn)行自動管理，管理員可以直接在計算機(jī)上實(shí)現(xiàn)倉庫貨物的信息管理，并能在一定程度上實(shí)現(xiàn)自動化。我們在現(xiàn)行系統(tǒng)初步調(diào)查的基礎(chǔ)上提出了新系統(tǒng)目標(biāo)，即新系統(tǒng)建立后所要求達(dá)到的運(yùn)行指標(biāo)，這是系統(tǒng)開發(fā)和評價的依據(jù)。第三章 需求分析一、數(shù)據(jù)庫需求分析該系統(tǒng)主要包括系統(tǒng)功能輸入模塊、基本資料維護(hù)模塊、報表模塊、綜

5、合查詢功能模塊和統(tǒng)計模塊等。系統(tǒng)要實(shí)現(xiàn)基本信息錄入、修改、查詢等功能：信息的輸入，包括溢貨信息、缺貨信息、貨物入庫信息、庫存信息、貨源信息、貨價信息等。信息的修改、刪除。根據(jù)要求，查詢統(tǒng)計符合條件的各類信息。依據(jù)實(shí)際需要，對重要新信息進(jìn)行統(tǒng)計。二、數(shù)據(jù)流圖需求單位需求倉庫現(xiàn)有庫存向供應(yīng)單位進(jìn)貨管理事物處理設(shè)備進(jìn)貨設(shè)備入庫設(shè)備出庫設(shè)備出貨庫存清 單出貨清 單進(jìn)貨清 單三、數(shù)據(jù)字典（DD）:數(shù)據(jù)字典是關(guān)于數(shù)據(jù)的信息的集合，也就是對數(shù)據(jù)流圖中包含的所有元素的定義的集合。由于本次設(shè)計是小型軟件系統(tǒng)的開發(fā)，所以采用卡片形式書寫數(shù)據(jù)字典。每卡片上保存描述一個數(shù)據(jù)的信息這樣做更新和修改起來比較方便，而且能單

6、獨(dú)處理描述每個數(shù)據(jù)的信息。下面將列出若干數(shù)據(jù)元素的數(shù)據(jù)卡片信息。數(shù)據(jù)字典卡片：名稱：庫存清單別名：庫存報表描述：倉庫貨物存儲的描述定義：貨物編號+名稱+生產(chǎn)日期+有效期+數(shù)量+單價+上、下限位置：輸出到打印機(jī)保存到磁盤名字：貨物編號別名：描述：惟一地標(biāo)識庫存清單中一個特定貨物的關(guān)鍵域定義：貨物編號=8字符8位置：進(jìn)貨報表 庫存清單 事務(wù)名稱：貨物現(xiàn)存量清單別名：描述：倉庫貨物存量描述定義：貨物編號+名稱+生產(chǎn)日期+有效期+數(shù)量+上下限 + +狀態(tài)標(biāo)志（正常、緊急、警告、嚴(yán)重）位置：輸出到打印機(jī)保存到磁盤名稱：進(jìn)貨清單別名：進(jìn)貨報表描述：每次進(jìn)貨的貨物描述定義：貨物編號+名稱+生產(chǎn)日期+有效期+

7、數(shù)量位置：輸出到打印機(jī)保存到磁盤名字：貨物生產(chǎn)單位別名：生產(chǎn)商描述：惟一的標(biāo)識倉庫貨物生產(chǎn)的一個特定的單位定義：單位名+負(fù)責(zé)人+聯(lián)系 位置：進(jìn)貨報表 出貨報表 庫存清單名字：貨物供應(yīng)單位別名：供應(yīng)商描述：惟一的標(biāo)識倉庫貨物來源的一個特定的單位定義：單位名+負(fù)責(zé)人+聯(lián)系 位置：進(jìn)貨報表 出貨報表 庫存清單名字：需求數(shù)量別名：本次數(shù)量描述：某種貨物一次被某單位領(lǐng)取的數(shù)量定義：本次數(shù)量=1數(shù)字5位置：貨物出庫信息 名字：上期數(shù)量別名： 描述：某種貨物的庫存數(shù)量定義：上期數(shù)量=1數(shù)字5位置：貨物入庫信息貨物出庫信息名字：進(jìn)貨數(shù)量別名：本次數(shù)量描述：某種貨物的一次入庫數(shù)量定義：本次數(shù)量=1數(shù)字5位置：貨

8、物入庫信息名字：出貨清單別名：出貨報表描述：每次出貨的貨物描述定義：貨物編號+名稱+生產(chǎn)日期+有效期+數(shù)量位置：輸出到打印機(jī)保存到磁盤名字：需求單位名別名： 描述：惟一的標(biāo)識需要貨物的一個特定的單位定義：單位名=20字符20位置：部門表 貨物入庫信息貨物出庫信息名字：需求單位表別名：需求單位信息描述：是對需要貨物的各單位的信息進(jìn)行統(tǒng)計定義： 單位名+負(fù)責(zé)人+負(fù)責(zé)人聯(lián)系 +操作員 +所屬工作位置：貨物入庫信息貨物出庫信息名字：操作用戶表別名：操作用戶信息描述：是對使用本系統(tǒng)的用戶進(jìn)行身份和權(quán)限驗(yàn)證用的定義：用戶名+密碼+所屬單位+權(quán)限一+權(quán)限二+權(quán)限三+操作員位置：班級表貨物需求單位信息表貨物信

9、息表貨物出庫表貨物入庫表名字：用戶名別名： 描述：惟一標(biāo)識本系統(tǒng)的用戶身份定義：用戶名=8字符8位置：操作用戶表名字：密碼別名： 描述：驗(yàn)證本系統(tǒng)的用戶身份定義：密碼=8字符8位置：操作用戶表名字：權(quán)限三別名： 描述：標(biāo)識本系統(tǒng)的用戶對本系統(tǒng)查詢權(quán)的使用權(quán)限定義：權(quán)限四=8字符8位置：操作用戶表名字：權(quán)限二別名： 描述：標(biāo)識本系統(tǒng)的用戶對本系統(tǒng)出入庫權(quán)的使用權(quán)限定義：權(quán)限三=8字符8位置：操作用戶表名字：權(quán)限一別名： 描述：標(biāo)識本系統(tǒng)的用戶對本系統(tǒng)管理權(quán)使用權(quán)限定義：權(quán)限一=8字符8位置：操作用戶表四、數(shù)據(jù)庫概念的結(jié)構(gòu)設(shè)計數(shù)據(jù)庫一般分為三級模式：外模式、概念模式和模式。外模式也就是不同用戶所對

10、的數(shù)據(jù)視圖，它將數(shù)據(jù)庫部抽象的數(shù)據(jù)與其互相之間的關(guān)系表示為簡單、直觀的應(yīng)用界面。概念模式是數(shù)據(jù)庫中全部數(shù)據(jù)的邏輯結(jié)構(gòu)和特征描述，通常以某種數(shù)據(jù)模型為基礎(chǔ)。模式是對數(shù)據(jù)的物理結(jié)構(gòu)和存儲方式的描述。在這里我們將要設(shè)計的是數(shù)據(jù)庫的概念模式，通過對倉庫貨物管理系統(tǒng)的容和數(shù)據(jù)流程分析與E-R圖，設(shè)計如下數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)。倉庫信息。包括庫房名稱、庫位名稱、庫存貨物、來往客戶信息、庫房編號、庫位編號，倉庫管理員等。貨物信息。包括名稱、供應(yīng)單位、生產(chǎn)單位、生產(chǎn)日期、貨物數(shù)量、貨物單價、入庫時間、貨物編號等。單位信息。包括單位名稱、負(fù)責(zé)人、地址、聯(lián)系等信息。貨物入庫信息。包括貨物編號、貨物名、生產(chǎn)單位、供應(yīng)單位

11、、本次數(shù)量、生產(chǎn)時間、貨物單價、入庫時間、經(jīng)辦人等信息。貨物出庫信息。包括貨物編號、貨物名、生產(chǎn)單位、供應(yīng)單位、貨物需求單位名、本次數(shù)量、生產(chǎn)時間、貨物單價、出庫時間、經(jīng)辦人等信息。用戶信息。包括用戶名稱、密碼、所在單位、用戶權(quán)限信息、操作員、最后修改時間。數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計，是在需求分析的基礎(chǔ)上，設(shè)計出能夠滿足用戶需求的各種實(shí)體，以與他們之間的關(guān)系，為后面的邏輯結(jié)構(gòu)設(shè)計打下基礎(chǔ)。五、數(shù)據(jù)庫的邏輯結(jié)構(gòu)設(shè)計：在數(shù)據(jù)庫設(shè)計中相當(dāng)重要的一步就是將概念模型轉(zhuǎn)化為計算機(jī)上DBMS所支持的數(shù)據(jù)模型，例如，將E-R圖模型轉(zhuǎn)化為關(guān)系模型，道理很簡單，我們設(shè)計概念模型基本上都是一些抽象的關(guān)系，在再數(shù)據(jù)庫設(shè)計的實(shí)

12、現(xiàn)過程中，在計算機(jī)上有效地表示出這些關(guān)系就成了數(shù)據(jù)庫設(shè)計的關(guān)鍵。根據(jù)倉庫貨物管理系統(tǒng)的功能要求，選取SQLServer 2000作為后臺數(shù)據(jù)庫。在上面的實(shí)體和實(shí)體之間的E-R圖設(shè)計基礎(chǔ)上，形成數(shù)據(jù)庫中的表格與表格之間的關(guān)系。該數(shù)據(jù)庫由6個表組成，需求單位表、貨物表、供應(yīng)單位表、入庫信息表、出庫信息表、操作用戶表。一、主表的結(jié)構(gòu)設(shè)計1.需求單位信息需求單位表是對需求單位信息進(jìn)行統(tǒng)計，包括單位名、單位編號、取貨時間、地址、負(fù)責(zé)人、聯(lián)系、操作員、所需貨物、貨物單價、貨物數(shù)量等信息。2.供應(yīng)單位信息 供應(yīng)單位信息表是提供貨物的單位信息的統(tǒng)計，包括單位編號、單位名稱、負(fù)責(zé)人、聯(lián)系、地址、所供應(yīng)貨物、貨物

13、單價、貨物商量等信息。3.貨物信息貨物表是對貨物信息的統(tǒng)計，包括名稱、供應(yīng)單位、生產(chǎn)單位、生產(chǎn)時間、貨物數(shù)量、貨物單價、入庫時間、編號等。4.貨物入庫信息貨物入庫信息是對入庫信息的統(tǒng)計，包括貨物編號、貨物名稱、生產(chǎn)單位、供應(yīng)單位、本次數(shù)量、生產(chǎn)時間、貨物單價、入庫時間、經(jīng)辦人等信息。5.操作用戶信息操作用戶表是對使用本系統(tǒng)的用戶進(jìn)行身份和權(quán)限驗(yàn)證用的，包括用戶名稱、密碼、所在單位、用戶權(quán)限信息、操作員、最后修改時間。6、貨物出庫信息貨物出庫表是對出庫信息的統(tǒng)計。包括貨物編號、貨物名稱、生產(chǎn)單位、需求單位、本次數(shù)量、生產(chǎn)時間、貨物單價、出庫時間、經(jīng)辦人等信息。六、倉庫貨物管理系統(tǒng)系統(tǒng)模塊可以根據(jù)

14、模塊獨(dú)立原理對軟件結(jié)構(gòu)進(jìn)行精化。為了合理的分解，得到盡可能高的聚、盡可能松散的耦合，最終要的是，為了得到一個易于實(shí)現(xiàn)、易于測試和易于維護(hù)的軟件結(jié)構(gòu)，應(yīng)該對模塊進(jìn)行再分解或合并。系統(tǒng)功能模塊圖如圖7.1所示：倉庫貨物管理系統(tǒng)系統(tǒng)模塊輸入模塊維護(hù)模塊查詢模塊報表模塊幫助模塊打印設(shè)置日志管理入庫模塊出庫模塊還原模塊需求模塊進(jìn)貨模塊圖4.1 系統(tǒng)功能模塊圖第四章 數(shù)據(jù)庫設(shè)計一、概念設(shè)計：系統(tǒng)ER圖根據(jù)對數(shù)據(jù)流圖和數(shù)據(jù)字典的分析，我們可以確定該應(yīng)用中的實(shí)體，屬性和實(shí)體之間的關(guān)系，并畫出如下所示的E-R圖。編號取貨時間負(fù)責(zé)人聯(lián)系 需求單位名需求單位操作員地址貨物單價圖1.3需求單位實(shí)體E-R生產(chǎn)單位供應(yīng)單

15、位生產(chǎn)日期名 稱上 下 限貨 物貨物編號需求單位貨物單價貨物數(shù)量入庫時間圖1.4貨物實(shí)體E-R圖庫 房庫房編號庫房名稱庫存量供應(yīng)單位貨物 地址管理員需求單位圖1.5 倉庫E-R圖供貨時間貨物編號單位地址單位編號單位名稱供應(yīng)單位聯(lián)系 負(fù)責(zé)人圖1.6 供應(yīng)單位實(shí)體E-R圖貨物編號貨物名稱生產(chǎn)單位供應(yīng)單位生產(chǎn)時間貨物單價入庫時間經(jīng)辦人本次數(shù)量入庫信息圖1.7 入庫信息實(shí)體E-R圖生產(chǎn)單位貨物名稱供應(yīng)單位本次數(shù)量出庫信息貨物單價出庫時間貨物編號生產(chǎn)時間經(jīng)辦人需求單位名 圖1.8 出庫信息實(shí)體E-R圖所在單位用戶權(quán)限用戶名稱密碼操作員修改時間用 戶圖1.9 用戶實(shí)體E-R圖地址貨物編號負(fù)責(zé)人負(fù)責(zé)人地址貨

16、物編號名稱名稱 供應(yīng)單位需求單位單位編號單位編號需求生產(chǎn)日期供應(yīng)數(shù)量編號貨物單價名稱入庫時間生產(chǎn)單位存儲倉庫名稱編號貨物庫存量需求單位供應(yīng)單位地址 查詢用戶修改時間擁護(hù)權(quán)限操作員所在單位密碼名稱圖3.10 實(shí)體和實(shí)體之間的E-R圖二、邏輯設(shè)計：下面列出幾個主要的數(shù)據(jù)庫表設(shè)計：表2-1. 需求單位結(jié)構(gòu)表列 名數(shù)據(jù)類型長 度是否允許為空說明xqdwnumbermoney8否編號（主鍵）xqdwnamevarchar50否單位名xqdwadressvarchar20否地址xqdwmanagervarchar8否負(fù)責(zé)人xqdwtelvarchar20是聯(lián)系operatorvarchar8是操作員xqp

17、ricemoney8是單價xqhwvarchar20是所需貨物xqamountint4否貨物數(shù)量qhtimedatatime8否取貨時間表2-2 供應(yīng)單位信息結(jié)構(gòu)表列 名數(shù)據(jù)類型長 度是否為空說 明gydwnumbermoney8否編號（主鍵）gydwnamevarchar20否單位名稱gydwmanagervarchar8是負(fù)責(zé)人gydwtelvarchar50是聯(lián)系gydwadressvarchar20否地址operatorvarchar8是操作員gypricemoney8是單價gyhwvarchar20是供應(yīng)貨物gyamountint4否貨物數(shù)量表2-3 貨物結(jié)構(gòu)表列 名數(shù)據(jù)類型長 度是

18、否為空說 明gydwvarchar50是供應(yīng)單位hwnamevarchar8是貨物名稱scdwvarchar20是生產(chǎn)單位sctimedatatime8是生產(chǎn)時間amountint4是貨物數(shù)量pricemoney8是貨物單價rktimedatatime8是入庫時間operatorvarchar8是操作員hwnumbermoney8否編號（主鍵）表2-4 貨物入庫信息結(jié)構(gòu)表列名數(shù)據(jù)類型長度是否為空說 明hwnumberint4否貨物編號hwnamevarchar50否貨物名稱scdwvarchar8否生產(chǎn)單位gydwvarchar50是供應(yīng)單位bcslint4是本次數(shù)量sctimevarchar

19、8是生產(chǎn)日期pricemoney8是貨物單價rktimedatetime8是入庫時間rvarchar8是經(jīng)辦人表2-5 操作用戶結(jié)構(gòu)表列名數(shù)據(jù)類型長度是否為空說明usernamevarchar8否用戶名passwordvarchar20否密碼szdwvarchar20是所在單位Qx1bit1是權(quán)限一Qx2bit1是權(quán)限二Qx3bit1是權(quán)限三operatorvarchar8是操作員表2-6 貨物出庫信息結(jié)構(gòu)表列名數(shù)據(jù)類型長度是否為空說明hwnumberint4否貨物號hwnamevarchar50否貨物名scdwvarchar20否生產(chǎn)單位xqdwvarchar20否需求單位bcslint4是

20、本次數(shù)量sctimevarchar8是生產(chǎn)日期pricemoney8是貨物單價outtimedatetime8是出庫時間rvarchar8是經(jīng)辦人三、物理設(shè)計在數(shù)據(jù)庫中創(chuàng)建索引時，查詢所使用的索引信息存儲在索引頁中。連續(xù)索引頁由從一個頁到下一個頁的指針在一起。當(dāng)對數(shù)據(jù)的更改影響到索引時，索引中的信息可能會在數(shù)據(jù)庫中分散開來。重建索引可以重新組織索引數(shù)據(jù)（對于聚集索引還包括表數(shù)據(jù))的存儲，清除碎片。這可通過減少獲得請求數(shù)據(jù)所需的頁讀取數(shù)來提高磁盤性能。 在 SQL Server 2000 中，如果要用一個步驟重新創(chuàng)建索引，而不想刪除舊索引并重新創(chuàng)建同一索引，則使用 CREATE INDEX 語句

21、的 DROP_EXISTING 子句可以提高效率。這一優(yōu)點(diǎn)既適用于聚集索引也適用于非聚集索引。 以刪除舊索引然后重新創(chuàng)建同一索引的方式重建聚集索引，是一種昂貴的方法，因?yàn)樗卸壦饕际褂镁奂I指向數(shù)據(jù)行。如果只是刪除聚集索引然后重新創(chuàng)建，則會使所有非聚集索引都被刪除和重新創(chuàng)建兩次。一旦刪除聚集索引并再次重建該索引，就會發(fā)生這種情形。通過在一個步驟中重新創(chuàng)建索引，可以避免這一昂貴的做法。在一個步驟中重新創(chuàng)建索引時，會告訴 SQL Server 要重新組織現(xiàn)有索引，避免了刪除和重新創(chuàng)建非聚集索引這些不必要的工作。該方法的另一個重要優(yōu)點(diǎn)是可以使用現(xiàn)有索引中的數(shù)據(jù)排序次序，從而避免了對數(shù)據(jù)重新排序。

22、這對于聚集索引和非聚集索引都十分有用，可以顯著減少重建索引的成本。另外，通過使用 DBCC DBREINDEX 語句，SQL Server 還允許對一個表重建一個或多個索引，而不必單獨(dú)重建每個索引。 DBCC DBREINDEX 也可用于重建執(zhí)行 PRIMARY KEY 或 UNIQUE 約束的索引，而不必刪除并創(chuàng)建這些約束（因?yàn)閷τ跒閳?zhí)行 PRIMARY KEY 或 UNIQUE 約束而創(chuàng)建的索引，必須先刪除該約束，然后才能刪除該索引）第五章 界面設(shè)計一、程序流程圖：該系統(tǒng)數(shù)據(jù)流程圖如圖3.2所示：更新庫存清 單處理進(jìn) 貨產(chǎn)生進(jìn)貨報 表處理出 庫處理出 貨產(chǎn)生出貨報 表倉庫管理員經(jīng)辦人產(chǎn)生出

23、庫報 表D1 庫存清單D1 庫存清單D2 進(jìn)貨信息D4 出庫信息更新 事物庫存信息庫存清單進(jìn)貨信息進(jìn)貨信息進(jìn)貨報表接收事務(wù)出貨 信息出貨報表D3 出貨信息出貨信息出庫信息出庫信息庫存清單出庫報表 圖3.2 系統(tǒng)數(shù)據(jù)流程圖二、登錄界面與密碼修改1、登錄界面如圖5.3所示 圖5.3 登錄界面圖在用戶登錄時，在輸入用戶名和密碼與用戶類型的前提下將其與數(shù)據(jù)庫中的數(shù)據(jù)進(jìn)行對比，若一致，則打開主窗體，若不一致提示錯誤，并要求再次輸入，若輸入次數(shù)超過三次，則關(guān)閉系統(tǒng)。在這個部分中，需要對用戶的類型存入一個全局變量，予以判斷其所具有的系統(tǒng)使用權(quán)限，例如，用戶類型為DBA，則該用戶擁有系統(tǒng)的一切權(quán)力，可以對每一

24、部分進(jìn)行添加、刪除、查找、統(tǒng)計等操作；而其他用戶類型都依據(jù)其類型的屬性，可以使用的部分也會相應(yīng)減少，而只能使用一部分與其類型相匹配的功能。2、增加新用戶如圖5.4所示 圖5.4 增加新用戶三、貨物添加操作與修改1、貨物添加如圖5.5所示： 圖5.5 貨物添加如圖管理員查詢某貨物時貨物名與貨物號與數(shù)據(jù)庫中的數(shù)據(jù)不相一致，系統(tǒng)提示所查貨物在倉庫里為空，即倉庫從沒存儲該貨物。然后管理員可根據(jù)倉庫管理的需否保存該貨物。2、貨物修改此功能是對貨物單價、庫位、編號修改。首先系統(tǒng)將從數(shù)據(jù)庫中讀取所有可用的貨物信息，其中包括編號、名稱、入庫時間、單價等信息，管理員可視情況分別修改。修改完畢并確認(rèn)后，系統(tǒng)將所做

25、修改保存，并將新的記錄保存于數(shù)據(jù)庫中。在倉庫貨物管理操作中，為了保護(hù)數(shù)據(jù)庫以與考慮實(shí)際因素，對單價、編號的修改時都不能留空，同時編號的修改也不能有重復(fù)，若出現(xiàn)此類情況則提示出錯。四、查詢操作查詢操作如圖5.7所示 圖5.7 查詢操作圖在執(zhí)行查詢操作之前通常要先在單行文本框中輸入被查詢的條件，在單行文本框失去聚焦時將查詢條件傳遞給查詢按鈕的單擊事件中，然后過濾語句依據(jù)此過濾條件過濾得出相應(yīng)的數(shù)據(jù)，并顯示在其他數(shù)據(jù)窗體控件中。在通常情況下，用戶可以在得到要查詢的信息后，對它們的各個字段進(jìn)行修改，經(jīng)過修改后，在退出時系統(tǒng)會提示進(jìn)行存儲。在完成了用戶界面設(shè)計和程序過程設(shè)計后，基本上完成了詳細(xì)設(shè)計的容。

26、第六章 代碼與注釋一、登錄代碼Option ExplicitDimt As Integer 記錄確定次數(shù)Private Sub Command1_Click()Dim sql As StringDim rs_login As New ADODB.RecordsetIf Trim(txtuser.Text) = Then 判斷輸入的用戶名是否為空 MsgBox 沒有這個用戶, vbOKOnly + vbExclamation, txtuser.SetFocusElse sql = select * from 系統(tǒng)管理 where 用戶名= & txtuser.Text & rs_login.Op

27、en sql, conn, adOpenKeyset, adLockPessimistic If rs_login.EOF = True Then MsgBox 沒有這個用戶, vbOKOnly + vbExclamation, txtuser.SetFocus Else 檢驗(yàn)密碼是否正確 If Trim(rs_login.Fields(1) = Trim(txtpwd.Text) Then userID = txtuser.Text userpow = rs_login.Fields(2) rs_login.Close Unload Me MDIForm1.Show Else MsgBox

28、密碼不正確, vbOKOnly + vbExclamation, txtpwd.SetFocus End If End IfEnd Ifcnt =t + 1Ift = 3 Then Unload MeEnd IfExit SubEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim connectionstring As Stringconnectionstring = provider=Microsoft.Jet.oledb.4.0; & _ data source=cangku.mdbcon

29、n.Open connectionstringcnt = 0End SubPrivate Sub Timer1_Timer()Label3.Caption = TimeLabel4.Caption = DateEnd SubOption ExplicitDim rs_find As New ADODB.RecordsetPrivate Sub Command1_Click()On Error GoTo cmderrorDim find_date1 As StringDim find_date2 As StringIf Option1.Value = True Then sqlfind = se

30、lect * from 入出庫 where 貨單號 between & _ Combo1(0).Text & & and & & Combo1(1).Text & End IfIf Option2.Value = True Then find_date1 = Format(CDate(comboy(0).Text & - & _ combom(0).Text & - & combod(0).Text), yyyy-mm-dd) find_date2 = Format(CDate(comboy(1).Text & - & _ combom(1).Text & - & combod(1).Text

31、), yyyy-mm-dd) sqlfind = select * from 入出庫 where 日期 between # & _find_date1 & # & and & # & find_date2 & #End Ifrs_data1.Open sqlfind, conn, adOpenKeyset, adLockPessimistickumanage.displaygrid1Unload Mekumanage.Showcmderror:If Err.Number 0 Then MsgBox 請輸入正確的查詢條件！, vbOKOnly + vbExclamation, 警告End IfE

32、nd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim i As IntegerDim j As IntegerDim sql As StringIf findok = True Then rs_data1.CloseEnd Ifsql = select * from 入出庫 order by 貨單號 descrs_find.CursorLocation = adUseClientrs_find.Open sql, conn, adOpenKeyset, adLockPessimisticIf rs_find.EOF = False Then 添加貨單號 With rs_find Do While Not .EOF Combo1(0).AddItem .Fields(0) Combo1(1).AddItem .Fields(0) .MoveNextLoop End WithEnd IfFor