【正文】 或企業(yè)進(jìn)銷存管理中的典型代表，涉及到了商品或貨物管理，入庫、出庫、查詢等。 、項(xiàng)目目標(biāo)與思路 根據(jù)對(duì)中小企業(yè)的特點(diǎn)進(jìn)行分析調(diào)查與用戶的溝通 ,初步制定系統(tǒng)的綱領(lǐng)和思路如下 : (1)界面設(shè)計(jì)簡(jiǎn)潔、友好、美觀大方。 (3)數(shù)據(jù)存儲(chǔ)安全、可靠。 (5)強(qiáng)大的模糊查詢功能，保證數(shù)據(jù)查詢的靈活性。 (7) 提供靈活、方便的權(quán)限設(shè)置功能，使整個(gè)系統(tǒng)的分工明確。 項(xiàng)目功能模塊 項(xiàng)目功能模塊：進(jìn)銷存系統(tǒng)主要由基礎(chǔ)信息模塊、進(jìn)貨信息模塊、銷售信息模 塊、庫存信息模塊、系統(tǒng)維護(hù)模塊和幫助信息模塊六部分組成。 圖 1 功能結(jié)構(gòu)圖 基礎(chǔ)信息模塊：庫存商品、往來單位、退出系統(tǒng)。 進(jìn)貨信息模塊：進(jìn)貨單、進(jìn)貨退貨、進(jìn)貨分析、進(jìn)貨統(tǒng)計(jì)不含退貨、與供應(yīng)商對(duì)帳 。 銷售信息模塊：銷售單、銷售退貨、銷售統(tǒng)計(jì)不含退貨、月銷售狀況、商品銷售排行、與代理商對(duì)帳、商品銷售成本表。 庫存信息模塊：庫存狀況、庫存上限警報(bào)、庫存下限報(bào)警、商品進(jìn)銷存變動(dòng)表、庫存盤點(diǎn)。 系統(tǒng)維護(hù)模塊：操作員設(shè)置、操作員權(quán)限設(shè)置、數(shù)據(jù)備份和恢復(fù)、數(shù)據(jù)清理。 幫助信息模塊：本單位信息、幫助信息、系統(tǒng)關(guān)于。同時(shí)該模塊更能為客戶提供使用本系統(tǒng)時(shí)所需的 幫助信息 ,使客戶更容易熟悉本系統(tǒng)的使用。 系統(tǒng)在運(yùn)行時(shí)，能保證數(shù)據(jù)的準(zhǔn)確性、安全性和可靠性。結(jié)構(gòu)簡(jiǎn)單，編寫程序?qū)ο到y(tǒng)的資源占有極低，是程序編寫者編寫小型程序的第一選擇！如果你是一個(gè)對(duì)編程一無所知，而又迫切希望掌握一種快捷實(shí)用的編程語言的初學(xué)者，那選擇 VB 沒錯(cuò)的 。 VB 的中心思想就是要便于程序員使用，無論是新手或者專家。 VB的程序是一種基于窗體的可視化組件安排的聯(lián)合，并且增加代碼來指定組建的屬性和方法。過去的版本里面 VB 程序的性能問題一 直被放在了桌面上，但是隨著計(jì)算機(jī)速度的飛速增加，關(guān)于性能的爭(zhēng)論已經(jīng)越來越少。一個(gè)排列滿控件的工具箱用來顯示可用控件（比如文本框或者按鈕）。默認(rèn)的屬性值會(huì)在控件創(chuàng)建的時(shí)候提供，但是程序員也可以進(jìn)行更改。舉個(gè)例子來說：窗體的大小改變事件中加入了可以改變控件位置的代碼，在運(yùn)行時(shí)候每當(dāng)用戶更改窗口大小，控件也會(huì)隨之改變位置。 VB 的程序可以包含一個(gè)或多個(gè)窗體，或者是一個(gè)主窗體和多個(gè)子窗體，類似于操作系統(tǒng)的樣子。 VB 的組件既可以擁有用戶界面，也可以沒有。 VB 使用引用計(jì)數(shù)的方法來進(jìn)行垃圾收集，這個(gè)方法中包含有大量的對(duì)象，提供基本的面向?qū)ο笾С帧?和有些語言不一樣， VB 對(duì)大小寫不敏感，但是能自動(dòng)轉(zhuǎn)換關(guān)鍵詞到標(biāo)準(zhǔn)的大小寫狀態(tài)，以及強(qiáng)制使得符號(hào)表入口的實(shí)體的變量名稱遵循書寫規(guī)則。 VB 使得大量的外界控件有了自己的生存空間。 VB 也提供了建立、使用和重用這些控件的方法，但是由于語言問題，從一個(gè)應(yīng)用程序創(chuàng)建另外一個(gè)并不簡(jiǎn)單 基于 B/S 結(jié)構(gòu)的 企業(yè)進(jìn)銷存管理系統(tǒng) 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)畢業(yè)論文（設(shè)計(jì)） 10 SQL Server 2020 SQL Server 2020 是 Microsoft 公司推出的 SQL Server 數(shù)據(jù)庫管理系統(tǒng)的一個(gè)版本。 Inter 集成 SQL Server 2020 數(shù)據(jù)庫引擎提供完整的 XML 支持。 SQL Server 2020 程序設(shè)計(jì)模型與 Windows DNA 構(gòu)架集成，用以開發(fā) Web 應(yīng)用程序，并且 SQL Server 2020 支持 English Query 和 Microsoft 搜索服務(wù)等功能，在 Web 應(yīng)用程序中包含了用戶友好的查詢和強(qiáng)大的搜索功能。reg。 SQL Server 2020 企業(yè)版支持聯(lián)合服務(wù)器、索引視圖和大型內(nèi)存支持等功能，使其得以升級(jí)到最大 Web 站點(diǎn)所需的性能級(jí)別。數(shù)據(jù)庫引擎充分保護(hù)數(shù)據(jù)完整性，同時(shí)將管理上千個(gè)并發(fā)修改數(shù)據(jù)庫的用戶的開銷減到最小。復(fù)制同樣使您得以維護(hù)多個(gè)數(shù)據(jù)復(fù)本，同時(shí)確保單獨(dú)的數(shù)據(jù)復(fù)本保持同步。 易于安裝部署和使用 SQL Server 2020 中包括一系列管理和開發(fā)工具，這些工具可改進(jìn)在多個(gè)站點(diǎn)上安裝、部署、管理和使用 SQL Server 的過程。這些功能使您得以快速交付 SQL Server 應(yīng)用程序，使客戶只需最少的安裝和管理開銷即可實(shí)現(xiàn)這些應(yīng)用程序。 SQL Server 2020 中包括析取和分析匯總數(shù)據(jù)以進(jìn)行聯(lián)機(jī)分析處理 (OLAP) 基于 B/S 結(jié)構(gòu)的 企業(yè)進(jìn)銷存管理系統(tǒng) 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)畢業(yè)論文（設(shè)計(jì)） 11 的工具。 系統(tǒng)管理先進(jìn)，支持 Windows 圖形化管理工具，支持本地和遠(yuǎn)程的系統(tǒng)管理和配置。 支持對(duì)稱多處理器結(jié)構(gòu)、存儲(chǔ)過程、 ODBC，并具有自主的 SQL 語言。 第三章 系統(tǒng)的分析與設(shè)計(jì) 系統(tǒng)業(yè)務(wù)流程圖 企業(yè)進(jìn)銷存管理系統(tǒng)的業(yè)務(wù)流程圖如圖 2： 基于 B/S 結(jié)構(gòu)的 企業(yè)進(jìn)銷存管理系統(tǒng) 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)畢業(yè)論文（設(shè)計(jì)） 12 圖 2 業(yè)務(wù)流程圖 系統(tǒng)功能結(jié)構(gòu)圖 與功能模塊 企業(yè)進(jìn)銷存管理系統(tǒng)功能結(jié)構(gòu)如圖 3所示。該模塊主要提供給使用者進(jìn)行基礎(chǔ)信息查詢 ,以方便客戶可以快速查閱庫存信息和往來單位信息。該模塊主要對(duì)進(jìn)貨方面信息進(jìn)行管理，包含了 對(duì)退貨信息的反映 ,確保把每一筆的交易記錄都能準(zhǔn)確的反映出來 ,還包含了進(jìn)貨分析 ,能準(zhǔn)確的顯示每一筆進(jìn)貨的信息和兼顧進(jìn)貨單據(jù)和對(duì)帳，保證數(shù)據(jù)的準(zhǔn)確性。該模塊能準(zhǔn)確的記錄了整個(gè)銷售方面所需的各個(gè)業(yè)務(wù) ,更增加了月銷售狀況的信息 ,能讓公司領(lǐng)導(dǎo)能快速了解到產(chǎn)品的銷售情況 ,了解市場(chǎng)熱點(diǎn) ,及時(shí)調(diào)整銷售策略 ,同時(shí)能顯示各種銷售信息，兼顧了單據(jù)和對(duì)帳的管理，保證數(shù)據(jù)不會(huì)出錯(cuò)。該模塊能實(shí)現(xiàn)實(shí)時(shí)顯示庫存的狀況，能讓銷售人員能在銷售時(shí)準(zhǔn)確知道供貨能力 ,而且能夠協(xié)助采購人員制定采購計(jì)劃 ,確保公司產(chǎn)品的銷售庫存而不會(huì)積壓過多的產(chǎn)品而無故占用資金。該模塊主要實(shí)現(xiàn)必要的操作員管理和權(quán)限設(shè)置，能很方便的對(duì)操作員進(jìn)行增加和刪除 ,并對(duì)其權(quán)限進(jìn)行管理分配 .該模塊同時(shí)能對(duì)數(shù)據(jù)進(jìn)行備份和恢復(fù) ,使數(shù)據(jù)的安全管理更容易實(shí)現(xiàn) ,還能對(duì)數(shù)據(jù)進(jìn)行清理 ,更方便對(duì)數(shù)據(jù)進(jìn)行管理。提供本單位信息和系統(tǒng)相關(guān)信息 ,讓客戶在使用過程中可了解本系統(tǒng)信息。 編碼設(shè)計(jì) 編碼設(shè)計(jì)是數(shù)據(jù)庫系統(tǒng)開發(fā)的前提條件，是系統(tǒng)不可缺少的重要內(nèi)容。它是進(jìn)行信息交換、處理、傳輸和實(shí)現(xiàn)信息資源共享的關(guān)鍵。 基于 B/S 結(jié)構(gòu)的 企業(yè)進(jìn)銷存管理系統(tǒng) 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)畢業(yè)論文（設(shè)計(jì)） 14 數(shù)據(jù)庫命名規(guī)則 數(shù)據(jù)庫命名統(tǒng)一以字母 db(小寫）開頭，后面加數(shù)據(jù)庫相關(guān)英文單詞或縮寫。 字段命名一律采用英文單詞或詞組（可利用翻譯軟件）命名，如果找不到專業(yè)的英文單詞或者詞組，可以用相同意義的英文單詞或者詞組代替。窗體一般采用 frm_**或者 Frm_main 的形式，如 frm_main 等。數(shù)據(jù)庫設(shè)計(jì)是根據(jù)程序的需求及其實(shí)現(xiàn)功能所制定的，數(shù)據(jù)庫設(shè)計(jì)的合理與否將直接影響到程序的開發(fā)過程。數(shù)據(jù)庫 db_SSS 中包含 16 張表。 圖 4 數(shù)據(jù)庫表 第四章 系統(tǒng)設(shè)計(jì)與實(shí)現(xiàn) 、 公共模塊實(shí)現(xiàn) 在開發(fā)應(yīng)用程序時(shí)，可以將數(shù)據(jù)庫的相關(guān)操作以及對(duì)一些控件的設(shè)置、遍歷等封裝在自定義模塊中，以便于在開發(fā)程序時(shí)調(diào)用，這樣可以提高代碼的重用性。 主函數(shù)設(shè)定 在一個(gè)應(yīng)用程序中，一般都有一個(gè)主程序（ Sub Main） ,程序的執(zhí)行從這個(gè)主程序開始。在本程序中為了優(yōu)化數(shù)據(jù)庫的連接，減少代碼的使用，在公共模塊中定義一個(gè)函數(shù)用 于執(zhí)行數(shù)據(jù)庫連接。 關(guān)鍵代碼如下： Public Function n() As 39。Persist Security Info=False。Initial Catalog=db_SSS End Function 拼音簡(jiǎn)碼函數(shù) 拼音簡(jiǎn)碼函數(shù)的設(shè)計(jì)很有必要性，在進(jìn)銷存管理系統(tǒng)中進(jìn)行商品的進(jìn)貨和銷售操作時(shí)，可以讓操作者直接輸入商品的拼音簡(jiǎn)碼來完成商品的檢索，這樣可以為信息的錄入帶來極大的方便。獲得漢字的拼音簡(jiǎn)碼 On Error Resume Next If Asc(Mystr) 0 Then If Asc(Left(Mystr, 1)) Asc(啊 ) Then py = 0 Exit Function End If If Asc(Left(Mystr, 1)) = Asc(啊 ) And Asc(Left(Mystr, 1)) Asc(芭 ) Then py = A Exit Function End If ‘? .此處代碼有省略 If UCase(Mystr) = Z And UCase(Mystr) = A Then py = UCase(Left(Mystr, 1)) Else py = Mystr End If End If End Function 基于 B/S 結(jié)構(gòu)的 企業(yè)進(jìn)銷存管理系統(tǒng) 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)畢業(yè)論文（設(shè)計(jì)） 17 啟動(dòng)窗體的實(shí)現(xiàn) 啟動(dòng)窗體用作歡迎客戶使用之友好界面，可以在應(yīng)用程序啟動(dòng)時(shí)一閃而過，也可以為用戶提示一定信息，但用戶無需對(duì)其進(jìn)行任何操作。企業(yè)進(jìn)銷存管理系統(tǒng)中的啟動(dòng)窗體如圖 5 所示 : 圖 5 啟動(dòng)窗體 系統(tǒng)登錄實(shí)現(xiàn) 由于本系統(tǒng)內(nèi)容關(guān)乎一個(gè)企業(yè)的來貨以及銷售信息，因此，一個(gè)安全的登錄窗體設(shè)計(jì)是非常重要的。 登錄窗體主要是通過對(duì)數(shù)據(jù)表 tbS_power 的查詢，結(jié)合 IF 語句判斷選定的用戶以及輸入的密碼是否符合數(shù)據(jù)庫中的用 戶名和密碼是否正確，如果正確則正常登錄，否則錯(cuò)誤超過 3 次則強(qiáng)行退出系統(tǒng)。 關(guān)鍵代碼如下： Private Sub ListView1_Click() 基于 B/S 結(jié)構(gòu)的 企業(yè)進(jìn)銷存管理系統(tǒng) 計(jì)算機(jī)科學(xué)與技術(shù)專業(yè)畢業(yè)論文（設(shè)計(jì)） 18 If 0 Then 39。 + + 39。給相應(yīng)的控件賦值 = (userid) = (sysuser) End If End If End Sub 選中用戶名以后，在“密碼”文本框中輸入該用戶的密碼，然后單擊“確定”按鈕，進(jìn)入系統(tǒng)內(nèi)部。確定 select * from tbS_power where sysuser =39。, n, adOpenKeyset If 0 Then 39。驗(yàn)證操作員及密碼 If = (password) Then 39。 + Trim() + 39。進(jìn)貨管理 = True Else = False End If If (vendition).Value Then 39。庫存管理 = True Else = False End If If (system).Value Then 39。使控件獲得焦點(diǎn) Exit Sub End If (2).Text = (2).Text amp。密碼錯(cuò)誤 3次，退出系統(tǒng) MyMsg = MsgBox(密碼輸入錯(cuò)誤 ,請(qǐng)向系統(tǒng)管理員查詢