【正文】 ............................................................................9 數(shù)據(jù)庫連接技術 .........................................................................................9 第 三章 系統(tǒng)設計 ........................................................................................................... 11 系統(tǒng)分析 ........................................................................................................... 11 數(shù)據(jù)庫設計 ........................................................................................................ 12 第 4 章 系統(tǒng)實現(xiàn) ........................................................................................................... 14 系統(tǒng)界面實現(xiàn) ........................................................................................................... 14 具體設計實現(xiàn) .................................................................................................... 18 主要界面的實現(xiàn) ................................................................................................. 20 第 5 章 調試和優(yōu)化 ........................................................................................................ 29 結束語 ........................................................................................................................... 32 主要參考文獻 ................................................................................................................. 33 摘要 商品營銷管理系統(tǒng)是 典型的信息管理系統(tǒng) (MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護以及前端應用程序的開發(fā)兩個方面。系統(tǒng)有完整的用戶添加、刪除和密碼修改功能，系統(tǒng)采用 Microsoft Office 中的 Access 2020 來設計數(shù)據(jù)庫，并使用當前優(yōu)秀的開發(fā)工具— VB ，它有著最為靈活的數(shù)據(jù)庫結構，對數(shù)據(jù)庫應用有著良好的支持。數(shù)據(jù)庫技術是數(shù)據(jù)管理的技術，它隨著數(shù)據(jù)管理任務的需要而產(chǎn)生于 20世紀 60年代中期。因此，本人結合已學過的知識及在指導老師的幫助下，運用 Microsoft Visual 中文版，在Windows XP 中文版環(huán)境下開發(fā)成功本系統(tǒng)，經(jīng)過在實踐中的運行驗證，本系統(tǒng)能夠正常和穩(wěn)定地運行，為企業(yè)創(chuàng)造了較大的商業(yè)機會，保證了公司對進銷存的管理信息化工作的順利進行。如今，世界已進入在計算機信息管理領域中激烈競爭的時代。因此，經(jīng)濟管理是計算機應用的主要領域。 表現(xiàn)之三為：有的企業(yè)單位既有了微機同時也有了銷售管理軟件，但硬件上去了，軟件 上不去。實施先進的辦公室自動化系統(tǒng)，實現(xiàn)企業(yè)內部信息管理、共享及交流，才能讓企業(yè)在競爭激烈的 21世紀取得先機。例如查詢所有平均成績在 80分以上的學生姓名，用戶必須一條一條地把滿足條件的學生記錄找出來（通常要說明具體處理過程，即按照哪條路徑，如何循環(huán)等）。 可視化開發(fā)工具 Visual Basic 作為當今社會功能強大的可視化開發(fā)工具具有以下幾大特點： （ 1）成功的簡化了界面的設計過程。一方面，它可以使用第三方廠家提供的各種 Visual Basic 使用的控件；另一方面，開發(fā)者也可以使用其他編程語言編寫自己所需的控件，因此它是一種可以不斷擴充功能的開發(fā)系統(tǒng)。它能操作其它來源的資料，包括許多流行的 PC 數(shù)據(jù)庫程序（如 dBASE， Paradox， Microsoft FoxPro）和服務器、小型積極大型機上的許多 SQL 數(shù)據(jù)庫。 ADO 最重要的三個對象 是 :Connection, Command, Recordset。 在 ADO 對象模型中 ,是在行中檢查和修改數(shù)據(jù)的最主要的方法 ,所有對數(shù)據(jù)的操作幾乎都是在 Recordset 對象中完成 的 。進貨和進銷存的主要交易都是在此進行。 （ 3）銷貨統(tǒng)計：包括今日進銷存統(tǒng)計、本月進銷存統(tǒng)計、本季度進銷存統(tǒng)計、本年度進銷存統(tǒng)計等，其中每次進銷存統(tǒng)計都是按生產(chǎn)廠商和進銷存總金額統(tǒng)計顯示的。 (6) 其它窗體： 包括主窗體、登陸窗體、系統(tǒng)初始化窗體。開發(fā)本系統(tǒng)中使用的數(shù)據(jù)庫系統(tǒng)是 Windows Access 2020 。 表 31 buy表 字段名 數(shù)據(jù)類 型 說明 進貨編號 文本 字段大小為 20 商品名稱 文本 字段大小為 20 生產(chǎn)廠商 文本 字段大小為 20 型號 文本 字段大小為 20 數(shù)量 數(shù)字 長整型 進貨價 貨幣 貨幣 進貨年 數(shù)字 整型 進貨月 數(shù)字 整型 進貨日 數(shù)字 整型 業(yè)務員編號 文本 字段大小為 20 總金額 貨幣 貨幣 goods 表（現(xiàn)存商品表）中包括有商品編號、生產(chǎn)廠商、商品名稱、型號、進貨價、銷貨價、數(shù)量、進貨年、進貨月、進貨日、業(yè)務員編號、總金額等字段。在通過登陸窗體中還要對用戶名做一下判斷：如果是管理員登陸，則進入系統(tǒng)初始化窗體，如果是普通用戶登陸，則進入主界面。其權限的設置使管理員 能夠方便的查看任何時間段內的所有信息，還可以對員工表進行管理。為此，進貨編號、商品編號是 buy 表、 goods 表中不可重復的屬性。在銷貨窗體中，如果用戶輸入的商品編號已經(jīng)存在，則該商品的其它屬性將隨著 text2(即商品編號 )的 Change 事件出現(xiàn)在其對應的位置上。 （ 7）進貨統(tǒng)計菜單 進貨統(tǒng)計菜單下有 4 個子菜單，分別是今日進貨統(tǒng)計、本月進貨統(tǒng)計、本季度進貨統(tǒng)計、今年進貨統(tǒng)計。 （ 8）銷貨統(tǒng)計窗體 進銷存統(tǒng)計菜單下有 4個子菜單，分別是今日銷貨、本月銷貨、本季度銷貨、今年銷貨。該窗體的實現(xiàn)是要在窗體集的變量中設置一 個記錄集 rs_goods，用來控制 goods 表，然后將記錄集在打開窗體時的select 語句設為與本窗體的 text1 和 text2 有關的 SQL 語句。 本節(jié)總結 ：對于本商品營銷管理系統(tǒng)功能的實現(xiàn)，重點和難點有以下幾處：交易管理模塊：在本模塊中，對于商品的進貨、銷貨和退貨操作時，都要注意其操作過程中商品數(shù)量及其它屬性的變化，本人在制做此模塊時，采用了指導教師的提供給我的思想：進貨登記時，將進貨信息添加到進貨表中。實體 ER圖如下： 是否管理員 否 交易管理 退貨登記 銷售登記 進貨登記 進貨統(tǒng)計管理 銷售統(tǒng)計管理 本季度銷售 本月銷售 今年銷售 今日銷售 本季度進貨 本月進貨 今年進貨 今日進貨 4．查看數(shù)據(jù)表 ： 主要能查看進貨表，商品信息表，進銷存表，退貨表等進行查看，以實現(xiàn)對商品信息的及時了解。 amp。 strbuy, n, adOpenKeyset, adLockPessimistic = strbuy If = True Then = strbuy MsgBox 您本月沒有進貨記錄！ , vbOKOnly + vbInformation, 注意 = False = False = False = False = False = False = False = False Exit Sub End If strfctotal = select 生產(chǎn)廠商 ,sum(總金額 ) as 各廠商進貨總金額 from buy where 進貨年 = amp。 strtotal, n, adOpenKeysetm, adLockPessimistic = (進貨總金額 ) End Sub 進貨統(tǒng)計界面 圖 24 進貨統(tǒng)計窗體 39。 打開進貨表 If = True Then (進貨編號 ) = (商品名稱 ) = (生產(chǎn)廠商 ) = (型號 ) = (數(shù)量 ) = Val() (進貨價 ) = Val() (進貨年 ) = (進貨月 ) = (進貨日 ) = (業(yè)務員編號 ) = (總金額 ) = Val() 39。具體測試結果如下 : （ 1）對交易管理模塊進行測試： 在進貨登記窗體中，發(fā)現(xiàn)對于進貨編號系統(tǒng)需要對其進行唯一設定，即入庫登記時進貨編號應 是 buy（進貨表）表中所沒有的。 str_buy, n, adOpenStatic, adLockOptimistic If = True Then (進貨編號 ) = …… ’ 將進貨信息添加到 buy(進貨表 )表中 39。 （ 2）對進貨統(tǒng)計模塊的測試： 由于本模塊中四個字菜單的窗體界面大體一致，所以我只對其一個界面的測試進行一下介紹：在今日進貨子菜單中，首先發(fā)現(xiàn)在 buy 表為空的時候， 8個命令按紐的點擊 將產(chǎn)生非法操作，也就是記錄集無法實現(xiàn)上下移動。 intd amp。 對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。這些都有待進一步改善。 Exit Sub End If （ 3）對銷貨統(tǒng)計模塊的測試： 在銷貨統(tǒng)計的測試中，其非法操作與進貨統(tǒng)計時一樣，只需要對各個子菜單中的 8個 Command 命令按紐的 Enable 屬性進行修改即可。其它三個子菜單的測試也產(chǎn)生了同樣的錯誤，也需要對 3個子菜單中的 8個 Command 命令按紐進行相對屏蔽，在這里就不詳細介紹了。同時為了方便用戶的操作，在輸入商品編號的文本框 text2 的 Change 事件里設定了關于已存在商品編號的處理：將該商品的其它屬性自動添加到該窗體的對應文本框中。具體做法是：在窗體級變量中定義一個變量 rs_buy，作為對 buy（進貨表）表的記錄集。 關閉進貨表 End If 銷貨統(tǒng)計界面 圖 25 銷貨統(tǒng)計界面 進貨表界面 圖 26 進貨表窗體 進銷存表、退貨表、商品庫存表、進貨商表與進貨表基本相同，表略。對入庫時做的一些屏蔽操作！ If = Then MsgBox 請?zhí)顚戇M貨 編號！ , vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請?zhí)顚懮唐肪幪枺?, vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請?zhí)顚懮唐访Q ！ , vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請?zhí)顚懮a(chǎn)廠商！ , vbOKOnly + vbInformation, 注意 Exit Sub ElseIf = Then MsgBox 請?zhí)顚懮唐沸吞枺?, vbOKOnly + vbInformation, 注意