商品銷售管理系統(tǒng)

1、摘要摘要未來的競爭將是效率的競爭，計(jì)算機(jī)的合理應(yīng)用無疑將會大大提高競者的競爭力。本系統(tǒng)就是為了讓更多的人合理的使用計(jì)算機(jī)，提高工作效率。本文論述的是一種便捷高效，適合小型企業(yè)和個(gè)體使用的商品銷售管理系統(tǒng)。通過本文你可以了解到該系統(tǒng)從構(gòu)想到誕生的全過程。 本系統(tǒng)可以讓你通過對鼠標(biāo)的點(diǎn)擊和鍵盤便捷的實(shí)現(xiàn)日常業(yè)務(wù)，銷售報(bào)表，基礎(chǔ)信息的管理。除此之外你還可以實(shí)現(xiàn)對銷售，庫存，貨款進(jìn)行查詢。本系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)。對于數(shù)據(jù)庫要滿足數(shù)據(jù)的完整性與安全性要求。由于本程序的使用者一般對計(jì)算機(jī)不太熟練，所以開發(fā)出來的系統(tǒng)盡可能的要操作簡便

2、，操作錯誤時(shí)要給出相關(guān)提示信息。添加、修改和刪除三者之間的聯(lián)系是本系統(tǒng)的核心，每一個(gè)表的修改都將聯(lián)動的影響其它的表，當(dāng)完成添加或刪除操作時(shí)系統(tǒng)會自動地完成商品進(jìn)銷存的修改。除此之外，本系統(tǒng)還具有查詢功能，在系統(tǒng)中可以根據(jù)商品名稱或編號進(jìn)行查詢。系統(tǒng)管理員可以設(shè)置自己的登陸通行證，實(shí)現(xiàn)多用戶安全操作。本系統(tǒng)是用 VB6.0 編寫的，雖然她不是目前最流行的語言，但她是以事件為驅(qū)動對象的，具有很強(qiáng)的實(shí)用性。另外，SQL SEVER 2000為該系統(tǒng)提供了有力的數(shù)據(jù)服務(wù)。由于水平有限加之時(shí)間只有短短數(shù)月，本文難免會有不足的地方，望各位專家，恩師，同窗以其他讀者批評指正，在此深表感謝。 關(guān)鍵字：關(guān)鍵字：

3、商品銷售管理系統(tǒng)，VB6.0, SQL SEVER 2000，ODBC, 模塊，界面，報(bào)表.ABSTRACTThe completion in the future is the efficiency. It is doubtless that using the computer in the right way will improve your ability. The purpose of this system is to make more people use the computer in the right way and increase the efficiency.Th

4、e system we discussed in this issue is a convenient and effective system, which is designed for small company and personal use. From this issues you will know how the system was designed and how it was made.The using of keyboard and mouse will make you manage the business information,the check of sa

5、ling and basci information.Besides you can require the sale ,money ect. This system is a typical management information system (MIS), which includ building and mataining datebase and make progamme.As the datebaes ,it must be enough and safe.Since most of the custommers are not very good at using com

6、puter ,this programme must be as simple as possible and if there was mistake ,there should have the advice. Add ,change and delete is the key of the system .once you delete or change something ,other things which related to it will also be changed.requirement is another key of the system .according

7、to the name or ID of the commidity,you can get the right information timely .it is very convient. Besides you can add ,change and creat the password. This system is made by VB6.0.Though it is not most popular ,but it is driven by the object.And SQL SEVER 2000 supply a very good date service. Because

8、 of the limits of knowledge and time ,there would have some shortcomings inevitably. We are looking forward to any suggestions from our readers. Thank you。KEYKEY WORLDWORLD: the system of sale management; VB6.0 , SQL SEVER 2000 , ODBC , MODEL , FRAME , TABLE.目錄目錄摘要摘要.1 1關(guān)鍵字：.2ABSTRACTABSTRACT.3 3KEY

9、 WORLD.4第一章第一章 背景介紹背景介紹.7 7為何要選擇該課題.71.2 系統(tǒng)開發(fā)目的.81.3 可行性研究.81.4 開發(fā)工具選取.11第二章第二章 高效的開發(fā)工具高效的開發(fā)工具.1212簡介.122.2 ODBC.14.16系統(tǒng)配置.19第三章第三章 總體設(shè)計(jì)總體設(shè)計(jì).2323系統(tǒng)功能分析.233.2 系統(tǒng)功能模塊設(shè)計(jì).233.3 系統(tǒng)流程圖.24第四章第四章 系統(tǒng)應(yīng)用程序設(shè)計(jì)系統(tǒng)應(yīng)用程序設(shè)計(jì).3030系統(tǒng)綜述.30模塊組成.30核心窗體簡介.31銷售報(bào)表模塊的界面及其代碼實(shí)現(xiàn).39第五章第五章 放眼未來放眼未來.4444致謝致謝.4545參考文獻(xiàn)參考文獻(xiàn).4646第一章第一章 背

10、景介紹背景介紹為何要選擇該課題為何要選擇該課題 技術(shù)的發(fā)展，科技的進(jìn)步使計(jì)算的應(yīng)用不僅僅再局限與大中型企業(yè)。計(jì)算機(jī)的普及已經(jīng)成為一種勢不可擋的趨勢。為了提高自身的競爭力和工作效率，小型企業(yè)與個(gè)體商戶開始尋求一種經(jīng)濟(jì)可行的計(jì)算機(jī)管理方法。商品銷售管理系統(tǒng)在這種情況下應(yīng)運(yùn)而生，因時(shí)而起！ 該系統(tǒng)操作方便，便捷的實(shí)現(xiàn)了對客戶信息，銷售信息以及銷售員信息及時(shí)，高效的處理。 該系統(tǒng)是 VB 與 SQL 的有效結(jié)合，通過這兩種有效的工具，我們順利實(shí)現(xiàn)了一個(gè)商品銷售管理系統(tǒng)應(yīng)有的功能。為小型企業(yè)和個(gè)人更好更快的做好銷售工作貢獻(xiàn)了自己的一點(diǎn)微薄之力。運(yùn)行環(huán)境運(yùn)行環(huán)境硬件環(huán)境硬件環(huán)境：CPU:PC586,133

11、HZ 以上；內(nèi)存：16M 以上硬盤：1G 以上光驅(qū)：4 倍速以上軟件平臺軟件平臺：操作系統(tǒng):windows98/2000/XP關(guān)系數(shù)據(jù)庫管理系統(tǒng)：SQL SEVER 20001.21.2 系統(tǒng)開發(fā)目的系統(tǒng)開發(fā)目的 (1)大大提高中小企業(yè)以及個(gè)體商戶的運(yùn)作效率；(2)通過全面的信息采集和處理，輔助提高中小企業(yè)以及個(gè)體商戶的商品銷售管理及其效率； (3)使用本系統(tǒng)，可以迅速提升中小企業(yè)以及個(gè)體商戶的管理水平，為降低經(jīng)營成本， 提高效益，增強(qiáng)中小企業(yè)以及個(gè)體商戶擴(kuò)張力， 提供有效的技術(shù)保障。1.31.3 可行性研究可行性研究 在系統(tǒng)初步調(diào)查的基礎(chǔ)上，明確了中小企業(yè)以及個(gè)體工商戶存在的問題，建立了初步

12、的商品銷售管理信息系統(tǒng)設(shè)想，并了解了中小企業(yè)以及個(gè)體工商戶對將要開發(fā)的系統(tǒng)的功能要求，下面就開發(fā)本系統(tǒng)的技術(shù)、經(jīng)濟(jì)、可行性和系統(tǒng)的開發(fā)目標(biāo)范圍等因素進(jìn)行分析研究。（1）系統(tǒng)的可行性研究 鑒于目前社會上電腦的日益普及化，無紙化作業(yè)已經(jīng)成為一個(gè)趨勢，中小企業(yè)以及個(gè)體工商戶有關(guān)商品的進(jìn)銷存是核心內(nèi)容。這部分的規(guī)范化、自動化管理迫在眉睫。本系統(tǒng)開發(fā)安全易用，使操作員能在很短的時(shí)間內(nèi)就可以熟練的操作本系統(tǒng)。 （2）系統(tǒng)的目標(biāo) 本系統(tǒng)的目標(biāo)是：按照 MIS 的原理和方法，采用計(jì)算機(jī)和信息化技術(shù)等手段，支持商品信息管理的全過程，提高中小企業(yè)以及個(gè)體工商戶對商品信息管理的工作的效率，及時(shí)準(zhǔn)確的了解商品的進(jìn)銷存

13、情況。 （3）數(shù)據(jù)庫需求分析 根據(jù)需求分析，系統(tǒng)共需要六張表，分別是：操作員信息表，商品信息表廠商信息表，庫存信息表，進(jìn)貨信息表、和售貨信息表。下面分析每張數(shù)據(jù)表要的詳細(xì)信息“員工信息表”用來存放員工的基本信息。所需的字段有：員工號、姓性別、出生日期、文化程度、身份證號碼、家庭地址和聯(lián)系 等。其中員工作為該表的住索引?！吧唐沸畔⒈怼庇脕碛涗洺欣锩糠N商品的信息，這是系統(tǒng)中主要的操作對大部分操作都需要涉及到該表中的信息。 “商品信息表”所需字段有：商品 id、商品名稱、商品簡稱、價(jià)格、規(guī)格、產(chǎn)地、單價(jià)和庫存數(shù)量等。其中每個(gè)商品都有惟一的編號商品 id，該字段為數(shù)據(jù)表的關(guān)鍵字段。 “庫存信息”表是

14、用來存放超市里面每種商品的庫存信息，該表所需字段有：商品 id 和庫存數(shù)量等。 “進(jìn)貨信息表”用來存放每次的進(jìn)貨信息。 “進(jìn)貨信息表”與系統(tǒng)的多張數(shù)據(jù)表相關(guān)聯(lián)，在表中需要的字段有：進(jìn)貨 id、商品 id、進(jìn)價(jià)、數(shù)量、金額、員工 id 和進(jìn)貨日期。由于不同的進(jìn)貨記錄可能有相同的員工 id 和商品 id，所以員工 id 和商品 id 的組合不能作為進(jìn)貨信息表的住索引，在進(jìn)貨信息表中需要設(shè)置一個(gè)進(jìn)貨 id 作為住索引。 “售貨信息表”用來記錄每次的售貨信息，售貨信息表中的字段有：售貨 id、員工 id、商品 id、數(shù)量、金額和銷售日期等。結(jié)論:本系統(tǒng)適用于各種中小企業(yè)以及個(gè)體工商戶的銷售管理，全面概

15、括了產(chǎn)品的進(jìn)、銷、存等各種處理，便于用戶添加、刪除、修改、查詢。通過進(jìn)貨單、出貨單的登記可實(shí)現(xiàn)產(chǎn)品的入庫、出庫。在入庫查詢和出庫查詢中可看到每一次入庫、出庫的詳細(xì)信息。同時(shí)，每次的進(jìn)貨、出貨也都會在庫存中留下紀(jì)錄，可在庫存賬中查詢到。通過本系統(tǒng)的使用，可以真正的實(shí)現(xiàn)信息的合理化、現(xiàn)代化、信息化管理，充分的利用資源，節(jié)約管理開支，避免資源的浪費(fèi)。首先要明確系統(tǒng)要實(shí)現(xiàn)什么功能，繪制出數(shù)據(jù)流圖，根據(jù)數(shù)據(jù)流圖中劃分出的系統(tǒng)基本功能，進(jìn)一步將它們具體化。一個(gè)完整的系統(tǒng)包含了很多模塊，在保證每一個(gè)模塊本身的正確性外，還要看它是否可以和其他模塊正確的連接，從而保證整個(gè)系統(tǒng)的功能的實(shí)現(xiàn)。系統(tǒng)開發(fā)實(shí)際上是一個(gè)很

16、細(xì)致的事情，在設(shè)計(jì)上很多的細(xì)節(jié)問題是決定系統(tǒng)能否正常運(yùn)行的關(guān)鍵，這就是所謂的“不怕做不到，就怕想不到！” 產(chǎn)品進(jìn)銷存管理系統(tǒng)如果能投入使用，將會給中小企業(yè)以及個(gè)體工商戶的銷售管理帶來很大的方便。但是本管理系統(tǒng)仍然存在著一些不足。如本系統(tǒng)只能用于單個(gè)的企業(yè)以及個(gè)體工商戶，還不能用于連網(wǎng)銷售。還有，出貨單這塊，我原以為就是進(jìn)貨的反過程，其實(shí)不然，首先要在庫存中查找是否由該產(chǎn)品，沒有的話就給出提示，有的話再比較出貨數(shù)量和庫存數(shù)量的關(guān)系，若出貨數(shù)量小于庫存數(shù)量，修改庫存數(shù)量即可，若出貨數(shù)量等于庫存數(shù)量，將庫存中這一產(chǎn)品的記錄刪除，若出貨數(shù)量大于庫存數(shù)量，給出提示，并轉(zhuǎn)到庫存查詢模塊供用戶查詢。問題就出

17、在最后一種情況。雖然現(xiàn)在還不能解決這些問題，我會在以后的學(xué)習(xí)中進(jìn)一步完善。1.41.4 開發(fā)工具選取開發(fā)工具選取本系統(tǒng)以 VB6.0 為基本開發(fā)平臺，以 SQL SERVER2000 為后臺支持，界面簡潔實(shí)用，操作方便。第二章 高效的開發(fā)工具Visual BASIC 的發(fā)展：1991 年 Microsoft 首次推出了可視化的 BASIC1C1992 年秋 Microsoft 推出 Visual BASIC 20，對 10 版本作了許多改進(jìn)；1993 年 Microsoft 推出 Visual BASIC 30，增加了數(shù)據(jù)庫訪問功能和三維圖形外觀設(shè)計(jì)功能；1995 年推出了 Visual Ba

18、sic 40，適應(yīng)了 32 位操作系統(tǒng)的要求，能開發(fā) 32 位應(yīng)用程序。1997 年推出了基于 win95 的 Visual Basic 50，增加了對 Internet的支持和開發(fā)能力，分三個(gè)版本（學(xué)習(xí)版、專業(yè)版、企業(yè)版）1998 年推出了 Visual BASIC 6.0，進(jìn)一步加強(qiáng)對數(shù)據(jù)庫和 Internet的訪問。Visual Basic 有三種版本，可以滿足不同的開發(fā)需要。學(xué)習(xí)版：使編程人員輕松開發(fā) Windows 和 Windows NT(r)的應(yīng)用程序。該版本包括所有的內(nèi)部控件以及網(wǎng)格、選項(xiàng)卡和數(shù)據(jù)綁定控件。學(xué)習(xí)版提供的文檔有 Learn VB Now CD 和包含全部聯(lián)機(jī)文檔的

19、Microsoft Developer Network CD。專業(yè)版：為專業(yè)編程人員提供了一整套功能完備的開發(fā)工具。該版本包括學(xué)習(xí)版的全部功能以及 ActiveX 控件、Internet Information Server Application Designer、集成的 Visual Database Tools 和 DataEnvironment、Active Data Objects 和 Dynamic HTML Page Designer。專業(yè)版提供的文檔有 Visual Studio Professional Features 手冊和包含全部聯(lián)機(jī)文檔的 Microsoft Deve

20、loper Network CD。企業(yè)版：使得專業(yè)編程人員能夠開發(fā)功能強(qiáng)大的組內(nèi)分布式應(yīng)用程序。該版本包括專業(yè)版的全部功能以及 Back Office 工具，例如 SQL Server。1 1具有面向?qū)ο蟮目梢暬O(shè)計(jì)工具具有面向?qū)ο蟮目梢暬O(shè)計(jì)工具：VB 在設(shè)計(jì)應(yīng)用程序界面時(shí)，可以通過鍵盤鼠標(biāo)以及徒手畫出來，不需要大量的代碼再編譯生成。2 2事件驅(qū)動編程事件驅(qū)動編程：在使用 VB 設(shè)計(jì)應(yīng)用程序時(shí)，必須首先確定應(yīng)用程序是通過哪個(gè)事件（如鼠標(biāo)單擊、鍵盤輸入等）同用戶進(jìn)行交互的，這就是事件驅(qū)動編程。2.22.2 ODBCODBCODBC(Open Database Connectivity，開放數(shù)據(jù)

21、庫互連)是微軟公司開放服務(wù)結(jié)構(gòu)(WOSA，Windows Open Services Architecture)中有關(guān)數(shù)據(jù)庫的一個(gè)組成部分，它建立了一組規(guī)范，并提供了一組對數(shù)據(jù)庫訪問的標(biāo)準(zhǔn) API（應(yīng)用程序編程接口） 。這些 API 利用 SQL 來完成其大部分任務(wù)。ODBC 本身也提供了對 SQL 語言的支持，用戶可以直接將 SQL 語句送給 ODBC。一個(gè)基于 ODBC 的應(yīng)用程序?qū)?shù)據(jù)庫的操作不依賴任何 DBMS，不直接與 DBMS 打交道，所有的數(shù)據(jù)庫操作由對應(yīng)的 DBMS 的ODBC 驅(qū)動程序完成。也就是說，不論是 FoxPro、Access , MYSQL還是 Oracle 數(shù)據(jù)庫

22、，均可用 ODBC API 進(jìn)行訪問。由此可見，ODBC的最大優(yōu)點(diǎn)是能以統(tǒng)一的方式處理所有的數(shù)據(jù)庫。一個(gè)完整的 ODBC 由下列幾個(gè)部件組成：應(yīng)用程序(Application)。ODBC 管理器(Administrator)驅(qū)動程序管理器(Driver Manager) ODBC APIODBC 驅(qū)動程序。數(shù)據(jù)源各部分之間的關(guān)系如下圖所表示：應(yīng)用程序要訪問一個(gè)數(shù)據(jù)庫，首先必須用 ODBC 管理器注冊一個(gè)數(shù)據(jù)源，管理器根據(jù)數(shù)據(jù)源提供的數(shù)據(jù)庫位置、數(shù)據(jù)庫類型及 ODBC 驅(qū)動程序等信息，建立起 ODBC 與具體數(shù)據(jù)庫的聯(lián)系。這樣，只要應(yīng)用程序?qū)?shù)據(jù)源名提供給ODBC，ODBC 就能建立起與相應(yīng)數(shù)據(jù)

23、庫的連接。ODBC 使用層次的方法來管理數(shù)據(jù)庫，在數(shù)據(jù)庫通信結(jié)構(gòu)的每一層，對可能出現(xiàn)依賴數(shù)據(jù)庫產(chǎn)品自身特性的地方，ODBC 都引入一個(gè)公共接口以解決潛在的不一致性，從而很好地解決了基于數(shù)據(jù)庫系統(tǒng)應(yīng)用程序的相對獨(dú)立性，這也是ODBC 一經(jīng)推出就獲得巨大成功的重要原因之一。 SQLSQL SERVERSERVER 是由是由 MICROSOFTMICROSOFT 開發(fā)和推廣的關(guān)系數(shù)據(jù)庫管理系統(tǒng)（DBISDBIS） ，它最初是由 Mirosoft、Sybase 和 Ashton-Tate 三家公司共同開發(fā)的，并于 1988 年推出了第一個(gè) OS/2 版本。SQL Server 近年來不斷的更新版本，1

24、996 年 Mirosoft 推出了 SQL Server 6.5 版本；1998 年，SQL Server 7.0 版本和擁護(hù)見面；SQL Server 2000 是大型數(shù)據(jù)庫管理系統(tǒng)；它建立在成熟而強(qiáng)大的關(guān)系模型基礎(chǔ)上，可以很好地支持客戶機(jī)/服務(wù)器網(wǎng)絡(luò)模式，能夠滿足各種類型的企事業(yè)單位對構(gòu)件網(wǎng)絡(luò)數(shù)據(jù)庫的需求，并且在易用性、可擴(kuò)展性、可靠性以及數(shù)據(jù)倉庫等方面確立了世界領(lǐng)先的地位，是目前各級學(xué)校學(xué)習(xí)大型數(shù)據(jù)庫管理系統(tǒng)的首選教材。1.SQL1.SQL ServerServer 20002000 常見的版本：常見的版本：企業(yè)版（Enterprise Edition）標(biāo)準(zhǔn)版（Standard Edi

25、tion）個(gè)人版 (Personal Edition)開發(fā)者版 (Developer Edition)2.SQL2.SQL ServerServer 系統(tǒng)數(shù)據(jù)庫及簡介系統(tǒng)數(shù)據(jù)庫及簡介1.SQL1.SQL ServerServer 20002000 有六個(gè)系統(tǒng)數(shù)據(jù)庫：有六個(gè)系統(tǒng)數(shù)據(jù)庫：Master 數(shù)據(jù)庫是 SQL Server 系統(tǒng)最重要的數(shù)據(jù)庫，它記錄了SQL Server 系統(tǒng)的所有系統(tǒng)信息。這些系統(tǒng)信息包括所有的登錄信息、系統(tǒng)設(shè)置信息、SQL Server 的初始化信息和其它系統(tǒng)數(shù)據(jù)庫及用戶數(shù)據(jù)庫的相關(guān)信息。Model 數(shù)據(jù)庫是所有用戶數(shù)據(jù)庫和 Tempdb 數(shù)據(jù)庫的摸板數(shù)據(jù)庫，它包含有

26、 Master 數(shù)據(jù)庫所有的系統(tǒng)表的子集，這些系統(tǒng)數(shù)據(jù)庫是每個(gè)用戶定義數(shù)據(jù)庫需要的。Msdb 數(shù)據(jù)庫是代理服務(wù)器時(shí)局棵，為其警報(bào)、任務(wù)調(diào)度和記錄操作員的操作提供存儲空間。Tempdb 是一個(gè)臨時(shí)數(shù)據(jù)庫，它為所有的臨時(shí)表、臨時(shí)存儲過程及其它臨時(shí)操作提供存儲空間。Pubs 和 Northwind 數(shù)據(jù)庫是兩個(gè)實(shí)例數(shù)據(jù)庫，它們可以作為 SQL Server 的學(xué)習(xí)工具。 2.SQL2.SQL ServerServer 系統(tǒng)簡介：系統(tǒng)簡介：系統(tǒng)目錄是由描述 SQL Server 系統(tǒng)的數(shù)據(jù)庫、基表、視圖和索引等對象的結(jié)構(gòu)的系統(tǒng)表組成。SQL Server 經(jīng)常訪問系統(tǒng)目錄，檢索系統(tǒng)正常運(yùn)行所需要的必要

27、信息。包括下面幾個(gè)重要的系統(tǒng)表：SysobjectsSysobjects：SQL 2000 的主要系統(tǒng)表 Sysobjects 出現(xiàn)在每個(gè)數(shù)據(jù)庫中，它對每個(gè)數(shù)據(jù)庫對象含有一行記錄。SyscolumnsSyscolumns 表：表：系統(tǒng)表 Syscolumns 出現(xiàn)在 master 數(shù)據(jù)庫和每個(gè)用戶自定義的數(shù)據(jù)庫中，它對基表或者視圖的沒個(gè)列和存儲過程中的每個(gè)參數(shù)含有一行記錄。SysindexesSysindexes 表：表：系統(tǒng)表 Sysindexes 出現(xiàn)在 master 數(shù)據(jù)庫和每個(gè)用戶自定義的數(shù)據(jù)庫中，它對每個(gè)索引和沒有聚族索引的每個(gè)表含有一行記錄，它還對包括文本/圖象數(shù)據(jù)的每個(gè)表含有一行

28、記錄。SysusersSysusers 表：表：系統(tǒng)表 Sysusers 出現(xiàn)在 master 數(shù)據(jù)庫和每個(gè)用戶自定義的數(shù)據(jù)庫中，它對整個(gè)數(shù)據(jù)庫中的每個(gè) Windows XP 用戶、Windows XP 用戶組、SQL Server 用戶或者 SQL Server 角色含有一行記錄。SysdatabaseSysdatabase 表：表：系統(tǒng)表 Sysdatabase 對 SQL Server 系統(tǒng)上的每個(gè)系統(tǒng)數(shù)據(jù)庫和用戶自定義的數(shù)據(jù)庫含有一行記錄，它只出現(xiàn)在master 數(shù)據(jù)庫中。1 1、運(yùn)行環(huán)境設(shè)置、運(yùn)行環(huán)境設(shè)置本實(shí)例是在 Windows 2000 下開發(fā)的，程序測試環(huán)境為Windows20

29、00 和 WindowsXP。用戶在 Windows 98、Windows 2000 和Windows XP 下都可使用本實(shí)例。2 2、源程序使用方法、源程序使用方法如果用戶要使用源程序，計(jì)算機(jī)除了滿足上面要求的配置外，還需要完成如下工作。在系統(tǒng)上安裝。如果后臺數(shù)據(jù)庫為 SQL Server 2000，請?jiān)谙到y(tǒng)上安裝SQLServer2000。關(guān)于數(shù)據(jù)庫方面的說明參見下一節(jié)。程序統(tǒng)一用戶名及密碼，用戶名：mr，密碼：mingrisoft。3 3、使用數(shù)據(jù)庫、使用數(shù)據(jù)庫1.將實(shí)例目錄“database”文件夾下擴(kuò)展名為“.MDF”和“.LDF”的兩個(gè)文件拷貝到 SQL Server 2000 安

30、裝路徑下的“MSSQL”/“Data”目錄下。2.打開 SQL Server 2000 中的“企業(yè)管理器” ，然后展開本地服務(wù)器，在“數(shù)據(jù)庫”數(shù)據(jù)項(xiàng)上單擊鼠標(biāo)右鍵，在彈出的快捷菜單中選擇“所有任務(wù)”/“附加數(shù)據(jù)庫”菜單項(xiàng)，如圖 1 所示。圖 1 附加數(shù)據(jù)庫3.將彈出“附加數(shù)據(jù)庫”對話框，如圖 2 所示。圖 2 附加數(shù)據(jù)庫對話框4.在該對話框中單擊“”按鈕選擇所要附加數(shù)據(jù)庫的.mdf 文件的路徑，例：加采購管理系統(tǒng)的數(shù)據(jù)庫可以選擇 “C:sqlMSSQLDataData_cggl” ，如圖 3 所示。單擊【確定】按鈕，即可完成數(shù)據(jù)庫的附加操作。圖 3 選擇所要附加的數(shù)據(jù)庫4 4、配置、配置 OD

31、BCODBC下面以門診計(jì)價(jià)收費(fèi)管理系統(tǒng)為例，講解配置 ODBC 的方法。1.單擊“控制面板”/“ODBC 數(shù)據(jù)源” ，打開“ODBC 數(shù)據(jù)源管理器” 。2.單擊“添加”按鈕，打開“創(chuàng)建新數(shù)據(jù)源”窗口，在此選擇“SQL Server” 。3.單擊“完成”按鈕，打開“建立新的數(shù)據(jù)源到 SQL Server”窗口，在“名稱”文本框中輸入“MZJJSFXT” （數(shù)據(jù)庫名稱） ；在“服務(wù)器”下拉列表框中輸入想連接的 SQL Server 服務(wù)器。如果要連接的SQL Server 是安裝在本地機(jī)上的，那么可以選擇 local，local 表示連接到本地的服務(wù)器。如果要連接的 SQL Server 是安裝在

32、其他的服務(wù)器上的，則選擇所需的服務(wù)器名稱。4.單擊“下一步”按鈕，打開“創(chuàng)建到 SQL Server 的新數(shù)據(jù)源”窗口，選定“使用用戶輸入登錄 ID 和密碼的 SQL Server 驗(yàn)證”選項(xiàng)，在“登錄 ID”文本框中輸入“sa” ；“密碼”文本框?yàn)榭铡?.單擊“下一步”按鈕，在彈出的對話框中勾選“更改默認(rèn)的數(shù)據(jù)庫為”選項(xiàng)，在下拉列表中選擇“MZJJSFXT”數(shù)據(jù)庫，單擊“下一步”按鈕，再單擊“完成”按鈕，數(shù)據(jù)源便配置成功了。第三章 總體設(shè)計(jì)商品銷售管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)

33、、數(shù)據(jù)安全性好的庫。而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。本系統(tǒng)主要完成對商品進(jìn)銷存的管理，包括添加、修改、刪除，查詢以用戶管理等六個(gè)方面。系統(tǒng)可以完成對各類信息的瀏覽、查詢、添加、刪除、修改等功能。 系統(tǒng)的核心是添加、修改和刪除三者之間的聯(lián)系，每一個(gè)表的修改都將聯(lián)動的影響其它的表，當(dāng)完成添加或刪除操作時(shí)系統(tǒng)會自動地完成商品進(jìn)銷存的修改。查詢功能也是系統(tǒng)的核心之一，在系統(tǒng)中主要根據(jù)商品名稱和商品編號進(jìn)行查詢，其目的都是為了方便用戶使用。系統(tǒng)有完整的用戶添加、刪除和密碼修改功能，適合多用戶操作管理。3.23.2 系統(tǒng)功能模塊設(shè)計(jì)系統(tǒng)功能模塊設(shè)計(jì)該系統(tǒng)主要有五大塊：日常業(yè)務(wù)管理模塊、查詢

34、統(tǒng)計(jì)管理模塊、銷售報(bào)表管理模塊、基礎(chǔ)信息管理模塊、系統(tǒng)設(shè)置管理模塊。日常業(yè)務(wù)管理模塊包括銷售開單 銷售退貨 客戶結(jié)款等資料的錄入與查詢。查詢統(tǒng)計(jì)管理模塊包括有銷售查詢、銷售退貨查詢、應(yīng)收款查詢、庫存商品查詢等查詢。銷售報(bào)表管理模塊包括有商品銷售匯總表、客戶銷售匯總表、操作員銷售匯總表等?；A(chǔ)信息管理模塊包括有商品信息管理、操作員信息管理、客戶信息管理等。5. 系統(tǒng)設(shè)置管理模塊系統(tǒng)設(shè)置管理模塊包括有操作員管理和系統(tǒng)初始化管理等。3.33.3 系統(tǒng)流程圖系統(tǒng)流程圖1.1.本系統(tǒng)數(shù)據(jù)流程圖基本圖形元素如下所示本系統(tǒng)數(shù)據(jù)流程圖基本圖形元素如下所示： 數(shù)據(jù)的開始與結(jié)束 決策 過程 數(shù)據(jù)程序流向2.2.程

35、序邏輯結(jié)構(gòu)描述圖例程序邏輯結(jié)構(gòu)描述圖例順序結(jié)構(gòu)：一個(gè)命令接一個(gè)地執(zhí)行；選擇結(jié)構(gòu)：(或 IF-THEN-ELSE)當(dāng)一個(gè)決定有多種不同執(zhí)行結(jié)果時(shí)；循環(huán)結(jié)構(gòu)：只要條件成立就一直執(zhí)行.3.3. 程序流程圖程序流程圖1.1.登陸流程圖登陸流程圖 Y N Y N 設(shè)計(jì)說明:進(jìn)入主界面后,提示輸入用戶名和密碼,在輸入之后按確定進(jìn)入,驗(yàn)證用戶名和密碼,實(shí)現(xiàn)流程:1.檢測數(shù)據(jù)庫中有無管理員帳號,如果有,則等待用戶輸入用戶名和密碼,否則按程序本身自動執(zhí)行插入命令,新建一個(gè)管理員用戶,并等待用戶輸入. 2.驗(yàn)證用戶名和密碼是否正確。 3.當(dāng)驗(yàn)證通過后,檢測該登陸用戶的管理權(quán)限,并設(shè)置變量傳值給主窗體。2.2.主界

36、面操作圖：主界面操作圖：通過主界面可以進(jìn)入如下圖所表示的相應(yīng)模塊，然后在進(jìn)入下一級子模塊實(shí)現(xiàn)商品銷售的全面管理。登陸主界面驗(yàn)證帳號驗(yàn)證密碼進(jìn)入主界面日常業(yè)務(wù)銷售開單銷售退貨客戶結(jié)款主界面日常業(yè)務(wù)查詢統(tǒng)計(jì)基礎(chǔ)信息管理銷售報(bào)表退出系統(tǒng)退出系統(tǒng)系統(tǒng)設(shè)置銷售報(bào)表客戶銷售報(bào)表商品銷售報(bào)表操作員銷售報(bào)表基礎(chǔ)信息管理客戶信息管理商品信息管理銷售員信息管理查詢統(tǒng)計(jì)銷售查詢銷售退貨查詢庫存商品查詢應(yīng)收貨款查詢系統(tǒng)信息設(shè)置操作員管理系統(tǒng)初始化第四章第四章 系統(tǒng)應(yīng)用程序設(shè)計(jì)系統(tǒng)應(yīng)用程序設(shè)計(jì) 該系統(tǒng)以 VB6.0 為基本開發(fā)平臺，SQL SEVER 2000 為后臺支持，界面清晰，操作簡便。每一個(gè)操作員都有自己的通行

37、證，只能對自己的信息進(jìn)行高效操作，安全可靠。 該系統(tǒng)主要包括五大模塊：日常業(yè)務(wù)，查詢統(tǒng)計(jì)，銷售報(bào)表，基礎(chǔ)信息管理，系統(tǒng)設(shè)置。 ：銷售開單，退貨，結(jié)款三個(gè)字模塊。通過它們可以輕松實(shí)現(xiàn)日常業(yè)務(wù)的管理。：銷售查詢，退貨查詢，貨款查詢以及庫存查詢四個(gè)模塊。通過這四個(gè)子模塊可以實(shí)現(xiàn)各種基本信息的查詢。 ：客戶報(bào)表，銷售報(bào)表，銷售員報(bào)表三個(gè)子模塊。通過這三個(gè)子模塊可以便捷的查詢相關(guān)報(bào)表的具體信息。：商品，銷售員，客戶信息三個(gè)子模塊。通過這三個(gè)模塊可以實(shí)現(xiàn)對基礎(chǔ)信息的管理。 ：做作員管理，系統(tǒng)初始化。通過這兩個(gè)模塊可以實(shí)現(xiàn)管理員之間的透明操作，互不干擾。 1.1.系統(tǒng)登錄界面及其代碼實(shí)現(xiàn)：系統(tǒng)登錄界面及其代

38、碼實(shí)現(xiàn)： 雙擊系統(tǒng)圖標(biāo)，出現(xiàn)登陸界面，然后輸入相應(yīng)的通行證，方可進(jìn)入系統(tǒng)如下圖所示： 實(shí)現(xiàn)代碼實(shí)現(xiàn)代碼Dim Tim As Integer 定義一個(gè)整型變量Dim rs1 As New ADODB.Recordset 定義一個(gè)數(shù)據(jù)集對象Dim myval As String 定義一個(gè)單精度浮點(diǎn)型變量Private Sub DataCombo1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then Text2.SetFocus text2 獲得焦點(diǎn)End SubPrivate Sub Form_Ac

39、tivate()End SubPrivate Sub text2_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then Cmd1.Visible = True End IfEnd SubPrivate Sub Cmd1_Click() rs1.Open select * from 操作員信息表 where 操作員名稱= & DataCombo1.BoundText & , Cnn, adOpenKeyset, adLockOptimistic If rs1.RecordCount

40、0 Then If DataCombo1.Text = Then MsgBox (請選擇操作員！), vbOKOnly Exit Sub End If 驗(yàn)證操作員及密碼 Dim MESSAGE As String Textime.Text = Tim If Text2.Text = rs1.Fields(密碼) Then Load frm_main Unload Me Else If Tim = 3 Then MESSAGE = MsgBox(密碼輸入錯誤,請向系統(tǒng)管理員查詢!, 0, ) If MESSAGE = vbOK Then End End If If Text2.Text rs1.

41、Fields(密碼) Then MsgBox (密碼錯誤,請重新輸入密碼!) Tim = Tim + 1 End If End If Else MsgBox 初次登錄本系統(tǒng)，請?jiān)谶M(jìn)入系統(tǒng)后，立即設(shè)置操作員及其密碼，以確保系統(tǒng)的安全！, , 提示窗口 Load frm_main Unload Me End IfEnd SubPrivate Sub cmd2_Click() EndEnd Sub2 主界面及其代碼實(shí)現(xiàn)：主界面及其代碼實(shí)現(xiàn)：在主界面上可以通過相應(yīng)下拉菜單進(jìn)入日常業(yè)務(wù)，查詢統(tǒng)計(jì)，銷售報(bào)表，系統(tǒng)設(shè)置的相關(guān)操作，除此之外還可以通過下方的快捷方式直接進(jìn)入相關(guān)操作。代碼實(shí)現(xiàn)：Private S

42、ub Form_Load() 在標(biāo)題欄上顯示軟件名稱及版本 Dim i As Integer 定義整型變量 For i = 0 To 1 Next iEnd SubPublic Sub updateStatusBar(ByVal PanelNum As Integer, ByVal StringVal As String, ByVal Bitmap As Boolean) If Not Bitmap Then St1.Panels(panelnume).Text = StringVal Else End If End SubPrivate Sub Form_MouseMove(Button A

43、s Integer, Shift As Integer, X As Single, Y As Single) St1.Panels(1).Text = updateStatusBar(1, frm_main.jcxxgl.Caption, True)End SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Case Is = xs 調(diào)入銷售窗口 xskd_Click Case Is = xsth 調(diào)入銷售退貨窗口 xsth_Click Case Is = xscx 調(diào)入銷售查詢窗口 xscx_Clic

44、k Case Is = xsbb 調(diào)入客戶銷售匯總窗口 khxshzb_Click Case Is = xssk 調(diào)入銷售收款窗口 xssk_Click Case Is = kh 調(diào)入客戶信息管理窗口 khxxgl_Click Case Is = xsy 調(diào)入銷售員信息管理窗口 xsyxxgl_Click Case Is = help 調(diào)入幫助窗口 myhelp_Click End SelectEnd SubPrivate Sub Timer1_Timer() 設(shè)置時(shí)間 St1.Panels(1).Text = Format(Date, long date) & & TimeE

45、nd SubPrivate Sub xskd_Click() 調(diào)入銷售窗口 Load main_rcyw_xs frm_main.Enabled = FalseEnd SubPrivate Sub xssk_Click() 調(diào)入銷售收款窗口 Load main_rcyw_xssk frm_main.Enabled = FalseEnd SubPrivate Sub xsth_Click() 調(diào)入銷售退貨窗口 Load main_rcyw_xsth frm_main.Enabled = FalseEnd SubPrivate Sub xscx_Click() 調(diào)入銷售查詢窗口 Load main

46、_cxtj_xscx frm_main.Enabled = FalseEnd SubPrivate Sub xsthcx_Click() 調(diào)入銷售退貨查詢窗口 Load main_cxtj_xsthcx frm_main.Enabled = FalseEnd SubPrivate Sub skcx_Click() 調(diào)入應(yīng)收款查詢窗口 Load main_cxtj_skcx frm_main.Enabled = FalseEnd SubPrivate Sub kccx_Click() 調(diào)入庫存商品查詢窗口 Load main_cxtj_kccx frm_main.Enabled = FalseE

47、nd SubPrivate Sub khxshzb_Click() 調(diào)入客戶銷售匯總表 Load main_xsbb_khxshzb frm_main.Enabled = FalseEnd SubPrivate Sub khxsmxb_Click() 調(diào)入客戶銷售明細(xì)表 Load main_xsbb_khxsmxb frm_main.Enabled = FalseEnd SubPrivate Sub spxshzb_Click() 調(diào)入商品銷售匯總表 Load main_xsbb_spxshzb frm_main.Enabled = FalseEnd SubPrivate Sub spxsmx

48、b_Click() 調(diào)入商品銷售明細(xì)表 Load main_xsbb_spxsmxb frm_main.Enabled = FalseEnd SubPrivate Sub ywyxshzb_Click() 調(diào)入業(yè)務(wù)員銷售匯總表 Load main_xsbb_xsyxshzb frm_main.Enabled = FalseEnd SubPrivate Sub ywyxsmxb_Click() 調(diào)入業(yè)務(wù)員銷售明細(xì)表 Load main_xsbb_ywyxsmxb frm_main.Enabled = FalseEnd SubPrivate Sub spxxgl_Click() 調(diào)入商品信息管理窗

49、口 Load main_jbxx_spll frm_main.Enabled = FalseEnd SubPrivate Sub xsyxxgl_Click() 調(diào)入銷售員信息管理窗口 Load main_jbxx_xsrycx frm_main.Enabled = FalseEnd SubPrivate Sub khxxgl_Click() 調(diào)入客戶信息管理窗口 Load main_jbxx_kh frm_main.Enabled = FalseEnd SubPrivate Sub czysz_Click() 調(diào)入操作員及密碼管理窗口 Load main_xtsz_czysz frm_mai

50、n.Enabled = FalseEnd SubPrivate Sub qxsz_Click() 調(diào)入權(quán)限設(shè)置 Load main_xtsz_qxsz frm_main.Enabled = FalseEnd SubPrivate Sub xtcsh_Click() 調(diào)入初始化窗口 Load main_xtsz_xtcsh frm_main.Enabled = FalseEnd SubPrivate Sub myhelp_Click() 調(diào)入幫助窗口 Load frmTip frm_main.Enabled = FalseEnd SubPrivate Sub about_Click() 調(diào)入關(guān)于

51、窗口 Load frmAbout frm_main.Enabled = FalseEnd SubPrivate Sub exit_Click() EndEnd SubPrivate Sub 退出_Click() EndEnd Sub 這三個(gè)子模塊在設(shè)計(jì)上有一個(gè)共同點(diǎn)，那就是通過界面上方的兩個(gè)下拉菜單可以選擇需要查詢信息的日期區(qū)間內(nèi)相關(guān)報(bào)表的情況。在客戶銷售報(bào)表里面可是看到相關(guān)日期內(nèi)銷售報(bào)表的匯總；在商品銷售匯總里面可以看到商品銷售匯總表；在員銷售匯總表里面管理者可以輕松查閱銷售員的工作情況，有利于業(yè)績的進(jìn)一步提高和相關(guān)數(shù)據(jù)分析。代碼實(shí)現(xiàn)：Private Sub Form_Load() DTP1

52、.Value = Date - 30: DTP2.Value = Date 設(shè)置日期 Command1_ClickEnd SubPrivate Sub Form_Unload(Cancel As Integer) frm_main.Enabled = True 設(shè)置主窗體有效End SubPrivate Sub Command1_Click() 統(tǒng)計(jì)匯總客戶銷售商品信息 Adodc1.RecordSource = select 客戶全稱,count(*)as 銷售品種,sum(數(shù)量)as 銷售數(shù)量,sum(金額)as 銷售金額,銷售員,操作員 from 銷售信息表 where 日期 betwe

53、en + Str(DTP1.Value) + and + Str(DTP2.Value) + group by 客戶全稱,銷售員,操作員 Set DataGrid1.DataSource = Adodc1End SubPrivate Sub Command2_Click() Call CmdEnd(Me)End Sub代碼實(shí)現(xiàn)：Private Sub Form_Load() DTP1.Value = Date - 30: DTP2.Value = Date 設(shè)置日期 Command1_Click Me.Caption = Me.Caption & 操作員： & frm_main

54、.St1.Panels(3).TextEnd SubPrivate Sub Form_Unload(Cancel As Integer) frm_main.Enabled = True 設(shè)置主窗體有效End SubPrivate Sub Command1_Click() 統(tǒng)計(jì)匯總客戶銷售商品信息 Adodc1.RecordSource = select 商品名稱,count(*)as 銷售品種,sum(數(shù)量)as 銷售數(shù)量,sum(金額)as 銷售金額,客戶全稱,銷售員,操作員 from 銷售信息表 where 日期 between + Str(DTP1.Value) + and + Str(DTP2.Value) + group by 商品名稱,客戶全稱,銷售員,操作員 Set DataGrid1.DataSource = Adodc1End Su