基于CS模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)

1、基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn) 摘要：進銷存系統(tǒng)作為一種企業(yè)管理軟件可以幫助企業(yè)快速有效地管理進貨、銷售、庫存和應收/應付款等各項業(yè)務。因此進行計算機進銷存管理系統(tǒng)的建設(shè)是企業(yè)的一項重要工作。本系統(tǒng)采用軟件工程的思想，從工作流的角度出發(fā)，使用結(jié)構(gòu)化設(shè)計思想對系統(tǒng)進行分析和設(shè)計。在分析階段，用戶的需求采用數(shù)據(jù)流圖和數(shù)據(jù)字典來描述；在設(shè)計階段，模塊化程序采用了結(jié)構(gòu)圖和流程圖來描述。在實現(xiàn)階段，采用VB和SQL Server 2000數(shù)據(jù)庫管理系統(tǒng)，成功開發(fā)出基于C/S模式的企業(yè)進銷存管理系統(tǒng)應用程序。它主要由七大功能模塊組成：1、系統(tǒng)管理模塊；2、基本信息管理模塊；3、進貨信息管理模

2、塊；4、生產(chǎn)信息管理模塊；5、庫存信息管理模塊；6、銷售信息管理模塊；7、財務信息管理模塊。本系統(tǒng)界面友好方便，易于使用；實時共享，具有個性化特征，合法用戶可以共享數(shù)據(jù)信息，滿足不同用戶的需求；功能多樣性，從開票到各種查詢、統(tǒng)計、匯總、打印報表，完全滿足了用戶的實際需要。關(guān)鍵詞：C/S結(jié)構(gòu)，進銷存管理，SQL Server 2000數(shù)據(jù)庫,數(shù)據(jù)流圖（DFD）基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)The Development of Purchase Vendition And StockpileManagement System Based on C/S ModeAbstract:As

3、a type of management information system,the purchase vendition and stockpile system can be more efficient and convenient for enterprises to manage purchase-stock-sale operations.it is an important work to build computer purchase vendition and stockpile management system for corporation.This system a

4、dopts the thought of the software engineering,the angle that flow from the work sets out,using structured technique to proceed the analysis and design.At the analysis stage,the consumer request describe with the data dictionary and DFD;At the design stage,moduled program describe with flow diagram a

5、nd structured diagram;At the realization stage,adopts VB and SQL Server 2000 data-base management system.I have developed purchase vendition and stockpile management system based on C/S mode successfully.This system is powerful and practicable,including seven sub-modules:system management module,bas

6、ic information management module,purchase information management module,manufacture information management module,sell information management module,stockpile information management module and wealth information management.This system has a amity and convenient interface;The real time and share qual

7、ity.Characters usage for users.The legality consumer can share data information. All of which satisfies users of different requirements.Variety of functions.This system quite satisfies the users ptactice requirements from making out an invoice to various searching,statistic,total and printing form.

8、Keywords:C/S pattern,Purchase Vendition and Stockpile Management,SQL Server 2000 database,DFD基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)前言當今的中小企業(yè)，一般應具有產(chǎn)品開發(fā)、生產(chǎn)、銷售、服務的能力，為此企業(yè)都設(shè)有相應的機構(gòu)，以管理各個環(huán)節(jié)的業(yè)務。在市場經(jīng)濟中，銷售是企業(yè)運作的重要環(huán)節(jié)，一般采用分公司或代理制，通過分公司或代理把產(chǎn)品推向最終用戶。銷售中，總公司和分公司及代理商之間按年度簽訂銷售協(xié)議，總公司統(tǒng)一規(guī)定產(chǎn)品的市場零售價，而總公司與分公司或代理之間采用基本代理價的銷售總量累進梯階返點制，根據(jù)分

9、公司或代理完成協(xié)議的情況確定其享受的優(yōu)惠，以次鼓勵分公司或代理商的銷售積極性。許多分公司或代理商分布在全國各地，還有一些地境外，遠距離頻繁的業(yè)務交流形成企業(yè)活動的特點。公司之間一般采用電傳、電報甚至電話傳遞訂貨、發(fā)貨、到貨、壓貨、換貨、退貨等信息?？偣镜纳虅詹块T一般見到分公司或代理的貨款銀行匯款單據(jù)傳真件就開據(jù)產(chǎn)品出庫統(tǒng)計。銷售情況是公司“進、銷、存”系統(tǒng)中（如果公司已經(jīng)有單機或局域網(wǎng)的“進、銷、存”系統(tǒng)）。縱觀當前國內(nèi)大多數(shù)中小企業(yè)的銷售運作現(xiàn)狀，不難看出存在著信息傳輸效率低。可靠性、安全性、保密性差的缺點，缺少系統(tǒng)的數(shù)據(jù)資源和規(guī)范的商務文件運行手段（擬稿、審核、執(zhí)行記錄、存檔及統(tǒng)計分析等

10、），許多信息分散隨意存放，缺少一致性、易于丟失、不易重復使用。建立一個規(guī)范、高效、安全可靠的進銷存信息管理系統(tǒng)，提高企業(yè)在市場中的競爭力是每一個公司總裁日思夜想的問題。以往由于通信手段尤其是網(wǎng)絡(luò)技術(shù)的限制，公司老總們很難建立滿意的計算機進銷存信息管理系統(tǒng)，當今的網(wǎng)上電子商務為企業(yè)的發(fā)展提供了難得的機會。在國外一些大的公司，由于業(yè)務的需要和雄厚的資產(chǎn)，從七、八十年代就開始建立專用的電子數(shù)據(jù)傳輸系統(tǒng)，這對于一般的中小企業(yè)是可望而不可及?，F(xiàn)在不同了，由于Internet的發(fā)展和相應開發(fā)軟件的商品化，使得企業(yè)不必大量投資就可以建立一個滿意的計算機進銷存信息管理系統(tǒng)（本質(zhì)上是基于C/S模式的局域網(wǎng)絡(luò)的商

11、務管理信息系統(tǒng)）。廣義上講，電子商務可以涉及到企業(yè)運作的各個方面，但一個無所不包的系統(tǒng)不要說在Internet上難以實現(xiàn),即便在一些利用早期網(wǎng)絡(luò)手段建立的企業(yè)管理信息系統(tǒng),也多是在一些部門和一些業(yè)務方面運轉(zhuǎn)比較成功.因此沒有必要概念上和完整性上追求一個理性的電子商務系統(tǒng).應該從企業(yè)自身的實際情況出發(fā),利用Internet技術(shù),改善最需改善的商務活動條件,以此作為突破口,帶動企業(yè)向現(xiàn)代化管理邁進.本方案正式基于這個思想,提出一個以面向中小企業(yè),具有全國范圍購銷網(wǎng)絡(luò)系統(tǒng)的“進、銷、存”電子商務解決方案。根據(jù)企業(yè)進銷存的業(yè)務流程和在傳統(tǒng)人工管理方式下存在的問題，開發(fā)了計算機企 2業(yè)進銷存管理系統(tǒng)。對

12、整個系統(tǒng)進行了業(yè)務需求分析、功能需求分析、數(shù)據(jù)庫需求分析、數(shù)據(jù)庫建模、系統(tǒng)設(shè)計、系統(tǒng)實現(xiàn)、系統(tǒng)測試等相關(guān)工作。本系統(tǒng)運用的是結(jié)構(gòu)化分析與設(shè)計技術(shù)，采用VB可視化程序設(shè)計語言作為前臺開發(fā)工具，后臺數(shù)據(jù)庫采用SQL SERVER 2000。開發(fā)平臺使用windows 2000 advance server。系統(tǒng)的體系結(jié)構(gòu)采用了C/S模式。采用ADO組件對數(shù)據(jù)庫進行訪問。我把整個系統(tǒng)分為七個功能模塊：1.系統(tǒng)用戶管理，2.基本信息管理，3.進貨信息管理，4.生產(chǎn)信息管理，5.銷售信息管理，6.庫存信息管理，7.財務系統(tǒng)管理以滿足用戶的需求。本系統(tǒng)的操作簡單、界面友好，能高效地對整個企業(yè)的“進、銷、存

13、”進行管理，降低企業(yè)進銷存的管理成本，提高經(jīng)濟效益。1第1章 引言1.1 研究背景和意義電子商務的發(fā)展和市場競爭的加劇將企業(yè)推上了風口浪尖，中小企業(yè)除了積極迎接挑戰(zhàn)而別無選擇。網(wǎng)絡(luò)的興起與電子商務的發(fā)展帶來了時空界限的突破、貿(mào)易方式的變革以及經(jīng)濟活動的革命，在某種意義上，這些變化為中小企業(yè)創(chuàng)造了同大企業(yè)、同國外企業(yè)平等競爭的有利挑件。然而，管理水平的差異會弱化這種平等的實際意義。具體而言，中小企業(yè)在進、銷、存等環(huán)節(jié)的管理上都存在這一定程度的不足，而這些不足無疑將使其在市場競爭中陷入舉步維艱的境地。顯然在網(wǎng)絡(luò)經(jīng)濟的時代背景下，進行有效的進銷存管理已經(jīng)成為中小企業(yè)存的頭等要事。然而對于一貫疏于管理

14、的中小企業(yè)而言，實現(xiàn)有效的進銷存管理必然存在著一定的難度，因此必須借助現(xiàn)代化的管理方法和管理技術(shù)-計算機進銷存管理系統(tǒng)。由于企業(yè)經(jīng)營的商品種類經(jīng)常會很多，例如一個超市可能會經(jīng)營上萬種商品，因此按照傳統(tǒng)的人工管理方式，會存在著很多問題。如：物資種類繁多、品種齊全，保管管理困難；無法進行準確及時的成本、毛利核算；管理信息相互獨立，市場預測手段、方法落后，嚴重影響企業(yè)科學決策，建立科學的市場信息反饋系統(tǒng)已迫在眉睫；應收帳款居高不下，占用了大量資金，嚴重影響了企業(yè)資產(chǎn)運作效率，加大了企業(yè)經(jīng)營風險；在生產(chǎn)和銷售環(huán)節(jié)，不能準確地掌握質(zhì)量的變化，尤其一些客戶投訴或降級使用的次品，無法做到全程跟蹤，影響到市場

15、的銷售；不能有效管理異地倉庫和辦事處銷售企業(yè)。傳統(tǒng)的人工管理方式已無法滿足管理要求，企業(yè)應該考慮進行計算機進銷存管理系統(tǒng)的建設(shè)。進銷存管理系統(tǒng)是基于先進的軟件和高速、大容量的硬件基礎(chǔ)上的新的進銷存管理模式，通過集中式的信息數(shù)據(jù)庫，將企業(yè)的進、銷、調(diào)、存、轉(zhuǎn)等企業(yè)的經(jīng)營業(yè)務有機地結(jié)合起來，達到數(shù)據(jù)共享、降低成本、提高效率、改進服務等目的。一般來說，利用進銷存管理系統(tǒng)可以在以下方面提高企業(yè)管理的水平。（1）提高管理效率降低人工成本。（2）降低采購成本。（3）及時調(diào)整營銷策略，防止價格流失。（4）防范陳呆死帳降低應收帳款。（5）減少倉儲面積，提高房產(chǎn)綜合利用。（6）加快資金周轉(zhuǎn)實現(xiàn)的經(jīng)濟效益。（7）

16、強化財務監(jiān)控制實現(xiàn)的經(jīng)濟效益。1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)（8）商業(yè)數(shù)據(jù)智能分析。（9）高效決策。1.2 國內(nèi)外研究現(xiàn)狀對于企業(yè)進銷存管理系統(tǒng)的研究現(xiàn)已有許多人進行了這方面的研究。徐煥玲就對這方面進行了研究，他開發(fā)的系統(tǒng)是通用商務進銷存管理系統(tǒng)。他采用的系統(tǒng)結(jié)構(gòu)是單機版，采用數(shù)據(jù)庫是Borlan公司的Paradox，開發(fā)工具采用Borland C+18?？锾╅_發(fā)了一個基于INTERNET的進銷存管理系統(tǒng)，采用Multi-Tier結(jié)構(gòu)與虛擬專用網(wǎng)相結(jié)合模式，通過互聯(lián)網(wǎng)實現(xiàn)分布式進銷存信息管理。數(shù)據(jù)庫采用SQL SERVER 2000，采用Delphi 619。修曉杰，王小華開發(fā)

17、了基于C/S模式的進銷存系統(tǒng)。使用Borland公司的Delphi6.0作為前臺開發(fā)工具，微軟公司的SQL Server 2000做后臺數(shù)據(jù)庫16。數(shù)據(jù)庫服務器采用Microsoft的SQL Server 2000比較好，因為Microsoft SQL Server是一個關(guān)系數(shù)據(jù)庫管理系(RDBMS)，可以應用于各種商業(yè)組織及專業(yè)數(shù)據(jù)庫和應用開發(fā)環(huán)境中。SQL Server 2000提供了對高效的存儲過程和靈活的用戶自定義函數(shù)的支持，并在核心層實現(xiàn)了數(shù)據(jù)完整性控制。對企業(yè)進銷存管理系統(tǒng)來說，采用C/S結(jié)構(gòu)更好些。因為C/S模式專用性、交互性強，存取數(shù)據(jù)安全，網(wǎng)絡(luò)通訊量低、速度快。比較適合像進銷

18、存這樣操作復雜，數(shù)據(jù)多的系統(tǒng)。但該系統(tǒng)也有些不足的地方，他們使用的Delphi語言不是一種很流行的語言并且發(fā)展前景也不是特別的大。顏丹，高楠開發(fā)了商業(yè)流通進銷存系統(tǒng)，該系統(tǒng)采用powerbuilder作為前臺開發(fā)環(huán)境，應用sybase SQL Anywhere作為后臺數(shù)據(jù)庫，結(jié)合windows操作系統(tǒng)建立起來的B/S結(jié)構(gòu)的數(shù)據(jù)庫管理系統(tǒng)15。B/S模式是三層的結(jié)構(gòu)。網(wǎng)絡(luò)通訊量不僅包括客戶機和web服務器之間的通訊量，而且也包括web服務器與數(shù)據(jù)庫服務器之間的通訊量。因而網(wǎng)絡(luò)通訊量較大、使得運行速度變慢。在企業(yè)進銷存業(yè)務流程過程中操作比較復雜通訊量大如果只采用B/S模式不是特別理想。冉春玉，陳建

19、軍，姚輝開發(fā)了基于C/S和B/S模式的進銷存系統(tǒng)。系統(tǒng)采用Borland公司的Delphi6.0作為客戶端軟件的開發(fā)工具。SQL Server 2000作為后臺數(shù)據(jù)庫管理系統(tǒng)。IIS作WEB服務器17。本系統(tǒng)中，采用B/S模式來實現(xiàn)各分銷點對公司總部的數(shù)據(jù)庫的操作。由于公司總部負責所有的進貨業(yè)務，同時負責由于公司總部負責所有的進貨業(yè)務，同時負責對各分銷點的貨品實時調(diào)撥以及供貨方和客戶的基礎(chǔ)數(shù)據(jù)管理，計算和操作相對復雜，因而采用CS模式的計算環(huán)境。為簡化系統(tǒng)的日常維護，采用“胖”服務端的兩層CS架構(gòu)。所有的業(yè)務邏輯(Business Logic)都用存儲過程實現(xiàn)，部署于數(shù)據(jù)庫服務器上，可供前的客

20、戶軟件和Web服務器上的應用程序調(diào)用。采用B/S模式和C/S模式充分利用了兩種結(jié)構(gòu)的優(yōu)點，在B/S和C/S模式下的系統(tǒng)，有速度快，數(shù)據(jù)安全，交互性強，易維護、易升級， 2用戶操作使用簡便，適合網(wǎng)上發(fā)布信息等優(yōu)點。但他們開發(fā)出來的企業(yè)進銷存是很昂貴的一般的小型公司是承擔不起這么巨額費用的。所以我們采用C/S模式，用SQL SERVER 2000作為數(shù)據(jù)庫，用VB作為開發(fā)工具開發(fā)企業(yè)進銷存管理系統(tǒng)。1.3 開發(fā)工具與數(shù)據(jù)庫的選擇1.3.1 開發(fā)工具的選擇考慮該系統(tǒng)要用可視化開發(fā)工具編寫，當前流行的可視化開發(fā)工具有微軟的Microsoft Visual Basic,Microsoft Visual

21、FoxPro,Borland Delphi,PowerSoft Power Builder,VC+.net等。FoxPro的事件處理能力先天不足,而PB對數(shù)據(jù)庫固然是功能強大,但在界面上和其他自由編程軟件方面就稍顯不足.VC+.net不是特別成熟。Visual Basic是一個功能強大的Windows 平臺上的開發(fā)工具，從開發(fā)個人和小組使用工具，到大型企業(yè)應用系統(tǒng)，甚至通過Internet遍及全球的分布式應用程序，都可以利用Visual Basic實現(xiàn).Visual Basic 6.0利用ADO完成對數(shù)據(jù)的訪問和操作.ADO是基于OLE DB技術(shù),有效訪問遠程數(shù)據(jù)的新型接口. Visual B

22、asic 6.0將其作為基本部件提供，以增強其數(shù)據(jù)訪問能力，并可以在不同進程、不同的主機間利用HTTP或DCOM技術(shù)傳遞ADO記錄集，實現(xiàn)資源共享。Visual Basic 6.0開發(fā)效率較高，做界面和一般的數(shù)據(jù)庫應用都能很好的實現(xiàn)。很多大型公司數(shù)據(jù)庫和客戶機/服務器應用程序的前端開發(fā)工具都采用VB，使它特別使用于MIS系統(tǒng)的開發(fā)。因此在本系統(tǒng)的開發(fā)中我采用了Visual BasicVisual Basic 6.0是Microsoft公司推出的Visual Basic 6.0可視化應用程序開發(fā)工具組件中的一員,也是當今非常流行的可視化編程工具之一. Visual Basic 6.0不但簡化了可

23、視化編程的方法,而且使得應用程序的開發(fā)流程更加流暢.特別是Visual Basic 6.0在數(shù)據(jù)庫和Internet應用程序開發(fā)兩個方面的改進,使程序員能夠輕松自如地開發(fā)出功能卓越的各種數(shù)據(jù)庫和多媒體應用程序. Visual Basic 6.0具有以下特點:(1)真正的面向?qū)ο缶幊?使開發(fā)人員在進行系統(tǒng)維護時,只需要修改很少的代碼,同時也加快了系統(tǒng)的開發(fā)速度.(2)可視化的編程以及向?qū)У墓δ?使開發(fā)人員不用加入太多代碼就可以開發(fā)出標準的windows程序.(3)數(shù)據(jù)訪問特性允許對包括Microsoft SQL Server和其他企業(yè)數(shù)據(jù)庫在內(nèi)的大部分數(shù)據(jù)庫格式建立數(shù)據(jù)庫和前端應用程序.(4)通

24、過AvtiveX技術(shù)可使用其他應用程序提供的功能.例如Microsoft Word、Microsoft Excel及其他Windows應用程序，甚至可以使用Visual Basic創(chuàng)建的應用程序和對象。(5)網(wǎng)絡(luò)功能強大，使得在應用程序中很容易通過Internet訪問穩(wěn)當和應用程序。 1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)(6)已完成的應用程序是真正的“.exe”文件，供運行時可自由發(fā)布的動態(tài)鏈接庫（DLL）使用。1.3.2 數(shù)據(jù)庫的選擇現(xiàn)在,幾乎任何一個大型的網(wǎng)絡(luò)應用系統(tǒng),都需要一種大型的數(shù)據(jù)庫.Microsoft Access、Microsoft SQL Server、Sybase

25、、DB2和Oracle等都是當前比較流行的大型關(guān)系數(shù)據(jù)庫管理系統(tǒng)（RDMS），DB2和Oracle價格比較貴，操作比較復雜不是很適用。SQL SERVER 2000和任何其他RDBMS都是一個用來建立和管理數(shù)據(jù)庫的引擎。它的作用和桌面型數(shù)據(jù)庫ACCESS FOXBASE等一樣，但是在存儲大容量數(shù)據(jù)方面，在數(shù)據(jù)的安全性和完整性方面、在分布式處理和具有高效機制等方面，桌面型數(shù)據(jù)庫是無法實現(xiàn)的。SQL SERVER 2000不僅能夠?qū)崿F(xiàn)個人數(shù)據(jù)庫的管理，更適合于企業(yè)級的數(shù)據(jù)庫應用。事務是并發(fā)控制的基本單位，通過事務，SQL SERVER 2000可以將邏輯的一組操作綁定到一起，以便服務器保持數(shù)據(jù)的完

26、整性。一個事務中可能包括了多個輸入和輸出操作，最終結(jié)果是從一個一致性狀態(tài)達到另一個一致性狀態(tài)，但在事務執(zhí)行期間，數(shù)據(jù)庫可能暫時處于一個不一致的狀態(tài)，利用封鎖技術(shù)可以有效的防止其他事務讀不一致性的數(shù)據(jù)。此外 SQL SERVER 2000 還提供了存儲過程機制，采用存儲過程有以下特點：模塊化編程，創(chuàng)建一個存儲過程保存到數(shù)據(jù)庫中，可以被應用程序反復調(diào)用，可以獨立的進行修改?？焖賵?zhí)行。在創(chuàng)建存儲過程時，就進行了分析和優(yōu)化。在第一次執(zhí)行后，長駐內(nèi)存，從而省去了重新分析，優(yōu)化，編譯的過程。減少網(wǎng)絡(luò)通信量。存儲過程可以有幾百條TRANSACT_SQL語句組成，執(zhí)行它只用一條語句即可，減少了在網(wǎng)絡(luò)線上的數(shù)據(jù)

27、傳輸。所以我選用Microsoft SQL Server 2000作為后臺數(shù)據(jù)庫。1.4 論文的內(nèi)容編排本文是在對某企業(yè)的進銷存管理流程分析的基礎(chǔ)上，利用軟件工程基本理論與方法對系統(tǒng)進行了設(shè)計，然后用VB實現(xiàn)了這個進銷存管理系統(tǒng)，最后對進銷存管理系統(tǒng)進行了軟件測試。本文的內(nèi)容結(jié)構(gòu)編排如下：第1章引言：簡述本課題的研究背景與意義、國內(nèi)外的發(fā)展現(xiàn)狀和完成本課題的總體思路。第2章系統(tǒng)分析：首先對進銷存管理系統(tǒng)進行功能需求分析，然后得出相關(guān)的數(shù)據(jù)流圖和數(shù)據(jù)字典。4第3章系統(tǒng)設(shè)計：對系統(tǒng)體系結(jié)構(gòu)進行分析、運用結(jié)構(gòu)化設(shè)計方法設(shè)計出相應的系統(tǒng)模塊層次圖，同時進行了數(shù)據(jù)庫的概念結(jié)構(gòu)和邏輯結(jié)構(gòu)的設(shè)計。第4章主要

28、功能模塊的設(shè)計與實現(xiàn)：詳細闡述了基本信息管理子系統(tǒng)、銷售信息管理子系統(tǒng)、進貨信息管理子系統(tǒng)、庫存管理子系統(tǒng)、生產(chǎn)管理子系統(tǒng)中主要功能模塊的設(shè)計與實現(xiàn)，最后重點介紹了設(shè)計中采用的主要技術(shù)。第5章測試：首先介紹了軟件測試技術(shù)，然后具體闡述了運用黑盒測試技術(shù)對系統(tǒng)進行的單元和集成測試的過程和測試結(jié)果。最后對本系統(tǒng)進行了總結(jié)在結(jié)論中闡述了本系統(tǒng)的一些優(yōu)點和不足。1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)第2章 系統(tǒng)分析2.1 功能需求分析系統(tǒng)開發(fā)的總體任務是實現(xiàn)各種信息的系統(tǒng)化、規(guī)范化和自動化。系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務的基礎(chǔ)上完成。工業(yè)企業(yè)進銷存系統(tǒng)需要完成功能主要有：(1)基本信息的管

29、理，包括產(chǎn)品設(shè)置、產(chǎn)品類別設(shè)置、供應商設(shè)置、業(yè)務員類別設(shè)置、業(yè)務員設(shè)置、倉庫設(shè)置等。(2)進貨信息的管理，包括訂貨單的管理、入庫單的管理以及進貨信息的查詢等。(3)生產(chǎn)信息的管理，包括配料單信息的管理、生產(chǎn)計劃單信息的管理、產(chǎn)品組裝單信息的管理以及相關(guān)信息的查詢等。(4)銷售信息管理，包括銷售單的管理以及銷售信息的查詢等。(5)庫存信息的管理，包括轉(zhuǎn)倉單的管理、產(chǎn)品盤點和轉(zhuǎn)倉信息的查詢等。(6)財務信息管理，包括應收信息的管理、應付信息的管理等。(7)系統(tǒng)用戶管理，包括用戶登陸、添加用戶和更改用戶密碼。2.2 系統(tǒng)的數(shù)據(jù)流圖為了便于對這個進銷存系統(tǒng)進行有效地分析和設(shè)計,我們對進銷存的業(yè)務流程進

30、行分析后,采用分層的方法得到了進銷存管理系統(tǒng)的數(shù)據(jù)流圖(DFD)(1)圖2.1（b）系統(tǒng)用戶管理模塊分解的數(shù)據(jù)流圖6（2）基本信息管理圖2.2(a)基本信息管理模塊總的數(shù)據(jù)流圖圖2.2（b）產(chǎn)品信息管理模塊分解的數(shù)據(jù)流圖（3） 進貨信息管理12.3(b)進貨信息管理模塊分解的數(shù)據(jù)流圖基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)(4)銷售信息管理圖2.4(a)銷售信息管理模塊總的數(shù)據(jù)流圖（5圖2.5(b)庫存信息管理模塊分解的數(shù)據(jù)流圖8（6圖2.6(a)組裝信息管理模塊總的數(shù)據(jù)流圖2.6(b)組裝信息管理模塊分解的數(shù)據(jù)流圖2.3 系統(tǒng)的數(shù)據(jù)字典2.3.1 數(shù)據(jù)描述產(chǎn)品類別信息=類別編號+類別名稱

31、產(chǎn)品信息=產(chǎn)品編號+產(chǎn)品名稱+計量單位+類別+入庫價格+分銷價格+零售價格+生產(chǎn)廠家+更新日期+備注信息客戶信息=客戶編號+客戶名稱+地址+郵政編碼+電話號碼+公司主頁+電子郵件地址+稅號+銀行帳戶+開戶銀行+聯(lián)系人+備注信息供應商信息=供應商編號+供應商名稱+地址+郵政編碼+電話號碼+公司主頁+電子郵件地址+稅號+銀行帳號+開戶銀行+聯(lián)系人+備注信息 業(yè)務員類別信息=類別編號+類別名稱業(yè)務員信息=業(yè)務員編號+業(yè)務員姓名+類別+電話號碼+家庭住址+身份證號碼+備注信息倉庫信息=倉庫編號+倉庫名稱1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)進貨訂單信息=訂貨日期+編號+業(yè)務員+供應商編號+產(chǎn)品

32、編號+數(shù)量+單價+折扣比例+總金額+備注信息入庫單信息=入庫日期+編號+業(yè)務員+供應商編號+產(chǎn)品編號+數(shù)量+單價+折扣比例+總金額+是否即時付款+是否記帳+預付比例+備注信息配料單信息=配料單編號+設(shè)置日期+產(chǎn)品編號+產(chǎn)品名稱+產(chǎn)品計量單位+配料編號+配料名稱+配料計量單位+配料數(shù)量+配料單價+配料總金額+業(yè)務員編號+備注信息生產(chǎn)計劃信息=計劃編號+計劃制定人+計劃制定時間+產(chǎn)品編號+產(chǎn)品名稱+計量單位+生產(chǎn)數(shù)量+單價+總金額+計劃起始時間+計劃結(jié)束時間+備注信息銷售出貨單信息=銷售日期+編號+業(yè)務員+客戶編號+產(chǎn)品編號+數(shù)量+單價+折扣比例+總金額+是否即時付款+是否記帳+預付比例+備注信息

33、庫存信息=更新日期+編號+倉庫編號+產(chǎn)品編號+數(shù)量+單價+總金額+備注信息轉(zhuǎn)倉信息=轉(zhuǎn)倉日期+編號+業(yè)務員+轉(zhuǎn)出倉庫編號+轉(zhuǎn)入倉庫編號+產(chǎn)品編號+數(shù)量+總金額+備注信息2.3.2 數(shù)據(jù)處理10表2.5訂貨單管理1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)12第3章 系統(tǒng)設(shè)計3.1系統(tǒng)設(shè)計指導思想3.1.1 體系結(jié)構(gòu)設(shè)計對本系統(tǒng)我采用C/S模式，C/S模式 專用性、交互性強。在這種模式中，客戶端裝有專門客戶軟件，更有利于完成某一項專門的任務。存取數(shù)據(jù)安全，因為C/S模式的平臺一般采用適于局域網(wǎng)、安全性好的局域網(wǎng)絡(luò)協(xié)議，如Netbeui協(xié)議，安全性有保證。網(wǎng)絡(luò)通訊量低、速度快。因為只有二層結(jié)構(gòu)，

34、網(wǎng)絡(luò)通訊量只包括客戶機與服務器之間的通訊量。通訊量低使得運行速度快，有利于處理大量數(shù)據(jù)。而B/S模式是三層的結(jié)構(gòu)。網(wǎng)絡(luò)通訊量不僅包括客戶機和web服務器之間的通訊量，而且也包括web服務器與數(shù)據(jù)庫服務器之間的通訊量。因而網(wǎng)絡(luò)通訊量較大、使得運行速度變慢。在企業(yè)的“進、銷、存”業(yè)務流程中由于核算組負責所有的進貨業(yè)務，同時負責對各倉庫的產(chǎn)品實時調(diào)撥以及供貨方和客戶的基礎(chǔ)數(shù)據(jù)管理，計算和操作相對復雜，因而采用C/S結(jié)構(gòu)。C/S結(jié)構(gòu)是一種典型的二層結(jié)構(gòu)，按照各自實現(xiàn)功能的不同，將應用程序分為兩大部分：一部分是用于處理數(shù)據(jù)庫，另一部分是用于處理應用程序、請求服務，客戶部分負責執(zhí)行前臺功能，如管理用戶接口

35、、數(shù)據(jù)處理和報告請求等。而服務器部分執(zhí)行后臺服務，如管理共享外設(shè)、控制對共享數(shù)據(jù)庫的操縱、接受并應答客戶機的請求等。C/S結(jié)構(gòu)的工作原理：用戶通過應用程序向客戶機提出數(shù)據(jù)要求，客戶機通過網(wǎng)絡(luò)將用戶的數(shù)據(jù)要求交給服務器，服務器的數(shù)據(jù)庫管理系統(tǒng)執(zhí)行數(shù)據(jù)處理任務，然后把經(jīng)過處理后的用戶需要的那部分數(shù)據(jù)，而不是整個文件，傳輸?shù)娇蛻魴C完成對其所需數(shù)據(jù)的加工。C/S系統(tǒng)的結(jié)構(gòu)如圖3.1所示。圖3.1客戶機/服務器結(jié)構(gòu)圖3.1.2 建設(shè)原則為了開發(fā)一個實用性強，安全性高，符合客戶要求的系統(tǒng)，必須遵照好的原則去開發(fā)系統(tǒng)，開發(fā)工作必須按照以下建設(shè)原則：(1)規(guī)范、統(tǒng)一各類所需的管理信息，遵循國家標準。用統(tǒng)一、規(guī)

36、范、完整的數(shù)據(jù)格式 1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)描述，將所有的業(yè)務工作標準化、規(guī)范化、電算化。(2)系統(tǒng)設(shè)計簡潔、直觀，易操作和維護，并具有可擴展性，適于非計算機人員使用。系統(tǒng)的設(shè)計一定要在符合傳統(tǒng)的人工管理的基礎(chǔ)上，做到業(yè)務功能實用、到位，簡單、易學、易用，界面友好，美觀大方，便于管理。如果將來應用需求發(fā)生變化時，應保證系統(tǒng)的可修改性和可擴充性。(3)層次化的數(shù)據(jù)共享，為所有用戶提供數(shù)據(jù)保障。在保證數(shù)據(jù)規(guī)范、標準、一致的前提下，對數(shù)據(jù)的存放進行合理布局，該放在服務器上的數(shù)據(jù)和該放在客戶端的數(shù)據(jù)要科學界定，區(qū)別對待。在保證數(shù)據(jù)安全的同時一定要提供對數(shù)據(jù)的高效處理能力。(4)系

37、統(tǒng)的安全性和可靠性。系統(tǒng)要能夠?qū)τ脩暨M行身份認證和權(quán)限檢查，保證數(shù)據(jù)的安全、可靠，并具有數(shù)據(jù)備份和數(shù)據(jù)恢復功能。軟件設(shè)計過程中要堅決貫徹軟件產(chǎn)品化的設(shè)計原則和實施方案。另外系統(tǒng)還應能夠適應計算機技術(shù)的更新?lián)Q代。3.2 功能設(shè)計總體設(shè)計采用結(jié)構(gòu)化設(shè)計方法（SD），結(jié)構(gòu)化設(shè)計方法設(shè)計是基于模塊化、自頂向下細化的設(shè)計原則的設(shè)計方法，在具體的設(shè)計中，根據(jù)基本的模塊化設(shè)計原則“高內(nèi)聚低耦合”，將需求分析中所產(chǎn)生的數(shù)據(jù)流圖轉(zhuǎn)換為模塊結(jié)構(gòu)圖。本課題開發(fā)的系統(tǒng)包括系統(tǒng)用戶管理、基本信息設(shè)置、進貨信息管理、生產(chǎn)信息管理、銷售信息管理、庫存信息管理以及財務信息管理的功能。系統(tǒng)功能模塊如圖3.2所示，各模塊完成如下

38、功能(1)用戶管理模塊：系統(tǒng)啟動后，需要對用戶進行判斷。如果登陸者是授權(quán)用戶，將進入系統(tǒng)，否則將停止程序的執(zhí)行。系統(tǒng)管理員可以添加新用戶并記錄其相關(guān)信息。用戶可以修改自己的密碼。(2)基本信息設(shè)置模塊：系統(tǒng)管理員可以對產(chǎn)品信息、產(chǎn)品類別信息、客戶信息、供應商信息、業(yè)務員信息、倉庫信息作添加和修改等相關(guān)操作。(3)進貨信息管理模塊：主要有訂單管理、入庫單管理以及進貨信息查詢。一般進貨分兩步：第一步到供應商簽訂訂貨單，達成進貨意向；第二步產(chǎn)品到貨并入庫，完成產(chǎn)品入庫單、庫存信息更新。入庫產(chǎn)品信息可以按照供應商、保存?zhèn)}庫和業(yè)務員進行查詢。(4)生產(chǎn)信息管理模塊：主要功能有配料單、生產(chǎn)計劃、組裝單的錄

39、入和修改和有關(guān)生產(chǎn)信息的查詢。(5)銷售信息管理模塊：主要功能有訂貨單、銷售單的錄入和修改以及銷售信息的查詢。銷售一般分為兩步：第一步，客戶訂貨并獲得銷售的意向，同時為生產(chǎn)、進貨信息提供需求；第二步。產(chǎn)品出庫，同時完成庫存和出活信息的更新。銷售信息可以按照客戶、出貨倉庫和業(yè)務員進行分類查詢。14(6)庫存信息管理模塊：根據(jù)經(jīng)營活動的需要，產(chǎn)品在各個倉庫中調(diào)配并產(chǎn)生相應的轉(zhuǎn)倉單并且可以按照轉(zhuǎn)出倉庫、轉(zhuǎn)入倉庫和轉(zhuǎn)出轉(zhuǎn)入方式查詢轉(zhuǎn)倉信息。盤點產(chǎn)品通過指定倉庫或者產(chǎn)品名稱來完成。(7)財務信息管理模塊：主要功能有應收款項的收款登記和應付款項的付款登記。圖3.2系統(tǒng)功能模塊圖3.3 數(shù)據(jù)庫設(shè)計進銷存管理

40、系統(tǒng)數(shù)據(jù)庫設(shè)計要求：企業(yè)進銷存管理系統(tǒng)是為采集，加工，存儲，檢索，傳遞企業(yè)經(jīng)營的基礎(chǔ)資料及管理資料而建立的人機系統(tǒng)。資料的管理是企業(yè)進銷存管理系統(tǒng)成功的關(guān)鍵。數(shù)據(jù)必須準確，可信，可用，完整，規(guī)范，及安全可靠。企業(yè)數(shù)據(jù)庫是有企業(yè)經(jīng)營的基礎(chǔ)資料及其他一些相關(guān)數(shù)據(jù)組成的完整集合。數(shù)據(jù)庫應包含與企業(yè)進銷存相關(guān)的全部資料的信息，便于快速查詢，數(shù)據(jù)共享。數(shù)據(jù)庫管理系統(tǒng)的選擇應根據(jù)企業(yè)進銷存數(shù)據(jù)量的大小。企業(yè)的經(jīng)濟狀況、經(jīng)營狀況以及考慮到企業(yè)今后的發(fā)展來確定。3.3.1 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計是將前面對企業(yè)進銷存管理系統(tǒng)的功能需求分析得到的用戶需求抽象為概念模型。這里主要通過設(shè)計圖來明確地表示

41、進銷存管理系統(tǒng)的各功能模塊中實體之間的聯(lián)系。實體屬性圖如圖3.3所示，進銷存E-R圖如圖3.4所示1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)16圖3.3實體屬性圖1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)圖3.4 進銷存管理系統(tǒng)E-R圖3.3.2 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計將數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計階段設(shè)計好的基本圖轉(zhuǎn)化為相應的邏輯結(jié)構(gòu)。在本系統(tǒng)的數(shù)據(jù)庫設(shè)計中運用了規(guī)范化理論，因為過于追求數(shù)據(jù)的精簡就會增加操作的復雜程度。所有的數(shù)據(jù)表都只規(guī)范到了第二范式(2NF),即關(guān)系模式R(U,F)中的所有非主屬性都完全依賴于任意一個候選關(guān)鍵字。 進銷存管理系統(tǒng)主要數(shù)據(jù)表：表3.1為進貨訂單表表3.1 dh進貨

42、訂單表18表3.2為入庫單表表3.2 inh入庫單表表3.3為銷售訂單表表3.3 xsdh銷售訂單表1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)表3.4為銷售單表表3.4 outh銷售單表表3.5為庫存表表3.5 kucun庫存表20表3.6為轉(zhuǎn)倉單表表3.6 zc轉(zhuǎn)倉單表表3.7為配料單表表3.7 mate配料單表1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)表3.8為生產(chǎn)計劃表表3.8 plang生產(chǎn)計劃表22第4章 系統(tǒng)功能模塊的實現(xiàn)4.1 主要功能模塊的設(shè)計與實現(xiàn)4.1.1 進銷存管理子系統(tǒng)的流程設(shè)計進銷存管理系統(tǒng)是一個比較復雜的系統(tǒng)，它的內(nèi)部包括了若干個子系統(tǒng)及許多功能模塊，各個功

43、能模塊之間有數(shù)據(jù)信息的交流，如庫存信息就是來源于銷售信息，進貨信息，生產(chǎn)信息等，因此，在具體設(shè)計中要使各個組成部分協(xié)調(diào)一致，成為一個整體。對數(shù)據(jù)在某一模塊內(nèi)的變化，其結(jié)果要全面周密地覆蓋整個系統(tǒng)，確保各種關(guān)聯(lián)數(shù)據(jù)邏輯關(guān)系的正確性。經(jīng)過對企業(yè)進銷存流程的分析，現(xiàn)做出本系統(tǒng)的數(shù)據(jù)流程圖如下圖 進銷存管理系統(tǒng)設(shè)計系統(tǒng)除了要實現(xiàn)某些具體的功能，對系統(tǒng)進行初始化設(shè)置更是所有功能實現(xiàn)的基礎(chǔ)。本系統(tǒng)就倉庫信息、業(yè)務員信息、業(yè)務員類別、供貨商信息、商品類別和商品信息進行了初始化我們可以對其進行維護，包括增加、刪除、修改倉庫信息、業(yè)務員信息、業(yè)務員類別供貨商信息、商品類別和商品信息。下面給出產(chǎn)品

44、信息管理的工作流程如圖4.1所示1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)圖4.2進銷存管理系統(tǒng)的數(shù)據(jù)流程圖用戶設(shè)置產(chǎn)品信息時，輸入所有的與產(chǎn)品相關(guān)的信息。當輸入信息錯誤時系統(tǒng)給出相應的提示，更新日期系統(tǒng)自動生成。產(chǎn)品信息設(shè)置完單擊“保存”后系統(tǒng)提示用戶設(shè)置成功。具體實現(xiàn)方法如下：Private Sub cmdSave_Click()Dim intCount As IntegerDim sMeg As StringDim MsgText As StringFor intCount = 0 To 724If Trim(txtItem(intCount) & " "

45、) = "" ThenSelect Case intCountCase 0sMeg = "款號"Case 1sMeg = "名稱"Case 2sMeg = "單位"Case 3sMeg = "入庫價格"Case 4sMeg = "分銷價格"Case 5sMeg = "零售價格"Case 6sMeg = "生產(chǎn)廠家"Case 7sMeg = "設(shè)置日期"End SelectsMeg = sMeg & "

46、;不能為空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(intCount).SetFocusExit SubEnd IfNext intCountFor intCount = 3 To 5If Not IsNumeric(Trim(txtItem(intCount) Then sMeg = "產(chǎn)品價格"sMeg = sMeg & "請輸入數(shù)字！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" tx

47、tItem(intCount).SetFocusExit Sub1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)End IfNext intCountIf gintWZSmode = 1 ThentxtSQL = "select * from dm_wz where dm ='" & Trim(txtItem(0) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF = False ThenMsgBox "已經(jīng)存在此產(chǎn)品編號的記錄！", vbOKOnl

48、y + vbExclamation, "警告" txtItem(0).SetFocusExit SubEnd Ifmrc.CloseEnd IftxtSQL = "delete from dm_wz where dm ='" & Trim(txtItem(0) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)txtSQL = "execute wz_setup '"For intCount = 0 To 2txtSQL = txtSQL &

49、amp; Trim(txtItem(intCount) & "','"Next intCounttxtSQL = txtSQL & Trim(Combo1(1) & "','"For intCount = 3 To 7txtSQL = txtSQL & Trim(txtItem(intCount) & "','"Next intCounttxtSQL = txtSQL & Trim(txtItem(8) & "'&

50、quot;Set mrc = ExecuteSQL(txtSQL, MsgText)If gintWZSmode = 1 ThenMsgBox "添加記錄成功！", vbOKOnly + vbExclamation, "添加記錄"For intCount = 0 To 8txtItem(intCount) = ""Next intCounttxtItem(7) = Format(Now, "yyyy-mm-dd")mblChange = FalseUnload frmWZSetup26frmWZSetup.txtS

51、QL = "select * from dm_wz"frmWZSetup.ShowElseIf gintWZSmode = 2 ThenUnload MeUnload frmWZSetupfrmWZSetup.txtSQL = "select * from dm_wz"frmWZSetup.ShowEnd IfEnd SubPrivate Sub Combo1_Change(Index As Integer)mblChange = TrueEnd Sub產(chǎn)品信息管理模塊產(chǎn)品信息設(shè)置運行界面如圖4.3所示：圖4.3產(chǎn)品信息設(shè)置界面4.1.3 具體功能的實現(xiàn)

52、由于有些功能實現(xiàn)起來比較簡單，如應收款項的收款登記、應付款項的付款登記、產(chǎn)品盤點；或者有些模塊功能相似，如各查詢模塊，所以在本文僅詳細介紹了入庫單管理、組裝單管理、銷售單管理、轉(zhuǎn)庫單管理和庫存信息查詢這五個模塊的實現(xiàn)過程。(1)入庫單管理產(chǎn)品入庫需要實現(xiàn)入庫單和庫存信息的更新。在實現(xiàn)這個模塊功能的過程中需要特別注意多個數(shù)據(jù)表的數(shù)據(jù)關(guān)聯(lián)如：修改入庫單信息時，首先需要刪除入庫記錄，恢復庫存信息到原始狀態(tài)然后添加新的入庫記錄，并更新庫存信息。工作流程圖如圖4.4 1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)所示圖4.4進貨信息管理工作流程圖產(chǎn)品進貨入庫時設(shè)置進貨相關(guān)的信息，如果輸入錯誤時系統(tǒng)給出相

53、應的提示，當設(shè)置完后單擊“保存”后會顯示操作結(jié)果。具體實現(xiàn)方法如下：Private Sub cmdSave_Click()Dim intCount As IntegerDim sMeg As StringDim MsgText As StringDim mrce As ADODB.RecordsetFor intCount = 1 To 7If Trim(txtItem(intCount) & " ") = "" ThenSelect Case intCountCase 1sMeg = "訂貨單號"Case 2sMeg = &

54、quot;供應商代碼"28Case 3sMeg = "產(chǎn)品代碼"Case 4sMeg = "數(shù)量"Case 5sMeg = "訂貨單價"Case 6sMeg = "折扣比例"Case 7sMeg = "總金額"End SelectsMeg = sMeg & "不能為空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(intCount).SetFocusExit SubEnd IfN

55、ext intCountIf txtItem(8).Visible = True ThenIf Trim(txtItem(8) & " ") = "" ThensMeg = "預付比例不能為空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(8).SetFocusExit SubEnd IfEnd IfFor intCount = 0 To 2If Trim(Combo1(intCount) & " ") = "

56、" ThenSelect Case intCountCase 0sMeg = "業(yè)務員"Case 1sMeg = "供應商名稱"1基于C/S模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn)Case 2sMeg = "產(chǎn)品名稱"End SelectsMeg = sMeg & "不能為空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" Combo1(intCount).SetFocusExit SubEnd IfNext intCountFor intC

57、ount = 4 To 5If Trim(Combo1(intCount) & " ") = "" ThenSelect Case intCountCase 4sMeg = "倉庫名稱"Case 5sMeg = "支付方式"End SelectsMeg = sMeg & "不能為空！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" Combo1(intCount).SetFocusExit SubEnd IfNext i

58、ntCountFor intCount = 4 To 7If Not IsNumeric(Trim(txtItem(intCount) Then sMeg = "請輸入數(shù)字！"MsgBox sMeg, vbOKOnly + vbExclamation, "警告" txtItem(intCount).SetFocusExit SubEnd IfNext intCountIf txtItem(8).Visible = True Then30If Not IsNumeric(Trim(txtItem(8) ThensMeg = "預付比例請輸入數(shù)字！

59、"MsgBox sMeg, vbOKOnly + vbExclamation, "警告"txtItem(8).SetFocusExit SubEnd IfEnd If'添加判斷是否有相同的ID記錄If gintINHmode = 1 ThentxtSQL = "select * from inh where inh_no ='" & Trim(txtItem(1) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)If mrc.EOF = False

60、ThenMsgBox "已經(jīng)存在此入庫單編號的記錄！", vbOKOnly + vbExclamation, "警告" txtItem(1).SetFocusExit SubEnd Ifmrc.CloseEnd If'先刪除已有記錄txtSQL = "delete from inh where inh_no ='" & Trim(txtItem(1) & "'"Set mrc = ExecuteSQL(txtSQL, MsgText)'再加入新記錄txtSQL = "execute inh_setup '"txtSQL = txtSQL & Trim(txtItem(0) & "','"txtSQL = txtSQL & Trim(Combo1(0).ItemData(Combo1(0).ListIndex) & "','"