【正文】 客戶機和 web 服務(wù)器之間的通訊量 ， 而且也包括 web 服務(wù)器與數(shù)據(jù)庫服務(wù)器之間的通訊量。 在企業(yè)的“進、銷、存”業(yè)務(wù)流程中 由于核算組負責(zé)所有的進貨業(yè)務(wù)，同時負責(zé)對各倉庫的產(chǎn) 品實時調(diào)撥以及供貨方和客戶的基礎(chǔ)數(shù)據(jù)管理，計算和操作相對復(fù)雜，因而采用 C/S 結(jié)構(gòu) 。而服務(wù)器部分執(zhí)行后臺服務(wù)，如管理共享外設(shè)、控制對共享數(shù)據(jù)庫的操縱、接受并應(yīng)答客戶機的請求等。 C/S 系統(tǒng)的結(jié)構(gòu)如圖 所示。用統(tǒng)一、規(guī)范、完整的數(shù)據(jù)格式基于 C/S 模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn) 14 描述，將所有的業(yè)務(wù)工作標(biāo)準(zhǔn)化、規(guī)范化、電算化。系統(tǒng)的設(shè)計一定要在符合傳統(tǒng)的人工管理的基礎(chǔ)上，做到業(yè)務(wù)功能實用、到位，簡單、易學(xué)、易用，界面友好，美觀大方，便于管理。 (3)層次化的數(shù)據(jù)共享，為所有用戶提供數(shù)據(jù)保障。在保證數(shù)據(jù)安全的同時一定要提供對數(shù)據(jù)的高效處理能力。系統(tǒng)要能夠?qū)τ脩暨M行身份認(rèn)證和權(quán)限檢查，保證數(shù)據(jù)的安全、可靠，并具 有數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)功能。另外系統(tǒng)還應(yīng)能夠適應(yīng)計算機技術(shù)的更新?lián)Q代。本課題開發(fā)的系統(tǒng)包括 系統(tǒng)用戶管理、基本信息設(shè)置、進貨信息管理、生產(chǎn)信息管理、銷售信息管理、庫存信息管理以及財務(wù)信息管理的功能。如果登陸者是授權(quán)用戶，將進入系統(tǒng)，否則將停止程序的執(zhí)行。用戶可以修改自己的密碼。 (3)進貨信息管理模塊： 主要有訂單管理、入庫單管理以及進貨信息查詢 。入庫產(chǎn)品信息可 以按照供應(yīng)商、保存?zhèn)}庫和業(yè)務(wù)員進行查詢。 (5)銷售信息管理模塊：主要功能有訂貨單、銷售單的錄入和修改以及銷售信息的查詢。產(chǎn)品出庫，同時完成庫存和出活信息的更新。 1 (6)庫存信息管理模塊：根據(jù)經(jīng)營活動的需要，產(chǎn)品在各個倉庫中調(diào)配并產(chǎn)生相應(yīng)的轉(zhuǎn)倉單并且可以按照轉(zhuǎn)出倉庫、轉(zhuǎn)入倉庫 和轉(zhuǎn)出轉(zhuǎn)入方式查詢轉(zhuǎn)倉信息。 (7)財務(wù)信息管理模塊：主要功能有應(yīng)收款項的收款登記和應(yīng)付款項的付款登記。資料的管理是企業(yè)進銷存管理系統(tǒng)成功的關(guān)鍵 。企業(yè)數(shù)據(jù)庫是有企業(yè)經(jīng)營的基礎(chǔ)資料及其他一些相關(guān)數(shù)據(jù)組成的完整集合。數(shù)據(jù)庫管理系統(tǒng)的選擇應(yīng)根據(jù)企業(yè)進銷存數(shù)據(jù)量的大小。 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計是將前面對企業(yè)進銷存管理系統(tǒng)的功能需求分析得到的用戶需求抽象為概念模型。實體屬性圖如圖 所示， 進銷存 ER 圖如圖 所示 基于 C/S 模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn) 16 進 貨 訂 單訂 貨 日 期 編 號業(yè) 務(wù) 員總 金 額 產(chǎn) 品 編 號折扣比例備注信息供 應(yīng) 商 編 號 單 價 數(shù) 量業(yè) 務(wù) 員業(yè) 務(wù) 員 編 號 業(yè) 務(wù) 員 姓 名 類 別電話號碼家庭地址身 份 證 號 碼 備 注 信 息產(chǎn) 品產(chǎn) 品 編 號 產(chǎn) 品 名 稱 計 量 單 位 入 庫 價 格零售價格分銷價格生 產(chǎn) 廠 家 更 新 日 期 備 注 信 息 類 別庫 存更 新 日 期 編 號倉 庫 編 號產(chǎn)品編號備注信息數(shù) 量 單 價總 金 額轉(zhuǎn) 倉 信 息轉(zhuǎn) 倉 日 期編 號業(yè) 務(wù) 員 轉(zhuǎn) 出 倉 庫 編 號轉(zhuǎn) 入 倉 庫 編 號 數(shù) 量 總 金 額產(chǎn)品編號備注信息 倉 庫倉 庫 編 號倉 庫 名 稱 客 戶客 戶 編 號 客 戶 名 稱 地 址 郵 政 編 碼 電 話 號 碼公司主頁銀行帳號電 子 郵 件 地 址 稅 號 開 戶 銀 行 聯(lián) 系 人 備 注 信 息 供 應(yīng) 商供 應(yīng) 商 編 號 供 應(yīng) 商 名 稱 地 址郵 政 編 碼電話號碼公司主頁電 子 郵 件 地 址 稅 號 銀 行 帳 號 開 戶 銀 行聯(lián) 系 人 備 注 信 息 1 入 庫 單入 庫 日 期 編 號業(yè) 務(wù) 員 供 應(yīng) 商 編 號 產(chǎn) 品 編 號折扣比例是否記帳數(shù) 量單 價預(yù) 付 比 例備 注 信 息 總 金 額 是 否 即 時 付 款 銷 售 出 貨 單銷 售 日 期 編 號 業(yè) 務(wù) 員 客 戶 編 號產(chǎn)品編號數(shù) 量單 價折扣比例總 金 額是 否 即 時 付 款 是 否 記 帳 預(yù) 付 比 例 備 注 信 息 生 產(chǎn) 計 劃計 劃 編 號 計 劃 制 定 人 計 劃 制 定 時 間產(chǎn) 品 編 號產(chǎn)品名稱計量單位生 產(chǎn) 數(shù) 量 單 價總 金 額計 劃 起 始 時 間 計 劃 結(jié) 束 時 間備 注 信 息 配 料 單配 料 單 編 號設(shè) 置 日 期產(chǎn) 品 編 號產(chǎn) 品 名 稱產(chǎn) 品 計 量 單 位配料編號配料名稱配 料 計 量 單 位配 料 數(shù) 量 配 料 單 價 配 料 總 金 額業(yè) 務(wù) 員 編 號備 注 信 息 圖 基于 C/S 模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn) 18 N 1 N 1 M M 1 1 N N 1 M 1 N 1 N N 1 1 1 1 圖 進銷存管理系統(tǒng) ER圖 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計 將數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計階段設(shè)計好的基本Ｅ－Ｒ圖轉(zhuǎn)化 為相應(yīng)的邏輯結(jié)構(gòu)。所有的數(shù)據(jù)表都只規(guī)范到了第二范式 (2NF),即關(guān)系模式 R(U,F)中的所有非主屬性都完全依賴于任意一個候選關(guān)鍵字。對數(shù)據(jù)在某一模塊內(nèi)的變化，其結(jié)果 要全面周密地覆蓋整個系統(tǒng)，確保各種關(guān)聯(lián)數(shù)據(jù)邏輯關(guān)系的正確性。本系統(tǒng)就倉庫信息、業(yè)務(wù)員信息、業(yè)務(wù)員類別、供貨商信息、商品類別和商品信息進行了初始化我們可以對其進行維護，包括增加、刪除、修改倉庫信息、業(yè)務(wù)員信息、業(yè)務(wù)員類別 供貨商信息、商品類別和商品信息。 當(dāng)輸入信息錯誤時系統(tǒng)給出相應(yīng)的提示 ，更新日期系統(tǒng)自動生成。 具體實現(xiàn)方法如下： Private Sub cmdSave_Click() Dim intCount As Integer Dim sMeg As String Dim MsgText As String For intCount = 0 To 7 工業(yè)企業(yè)基本信息 基本信息錄入 基本信息管理 生產(chǎn)信息設(shè)置 配料單 錄入 配料單信息管理 進貨信息設(shè)置 基本信息錄入 進貨信息管理 組裝、生產(chǎn) 生產(chǎn)信息管理 銷售信息設(shè)置 基本信息錄入 庫存統(tǒng)計 銷售信息管理 庫存信息管理 財務(wù)計算 財務(wù)信息管理 1 If Trim(txtItem(intCount) amp。 不能為空！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 txtItem(intCount).SetFocus Exit Sub End If Next intCount For intCount = 3 To 5 If Not IsNumeric(Trim(txtItem(intCount))) Then sMeg = 產(chǎn)品價格 sMeg = sMeg amp。 amp。 39。 amp。 39。 For intCount = 0 To 2 txtSQL = txtSQL amp。 39。 Next intCount txtSQL = txtSQL amp。 39。 For intCount = 3 To 7 txtSQL = txtSQL amp。 39。 Next intCount txtSQL = txtSQL amp。 39。 (1)入庫單管理 產(chǎn)品 入庫需要實現(xiàn)入庫單和庫存信息的更新。 工作流程圖如圖 基于 C/S 模式企業(yè)進銷存管理系統(tǒng)的設(shè)計與實現(xiàn) 28 所示 否 否 否 是 否 圖 信息管理工作流程圖 產(chǎn)品進貨入庫時 設(shè)置 進貨相關(guān)的信息，如果輸入錯誤時系統(tǒng)給出相應(yīng)的提示，當(dāng)設(shè)置完后單擊“保存”后會顯示操作結(jié)果。 ) = Then Select Case intCount Case 1 sMeg = 訂貨單號 Case 2 sMeg = 供應(yīng)商代碼 開始 初始化并顯示已有的 進貨信息 添加 進貨單 輸入內(nèi)容驗證 有相同記錄 ？ 刪除已有記錄，加入新記錄 更新進貨和庫存信息 結(jié)束 刪除 進貨單 選擇刪除記錄 庫存中有相關(guān)信息？ 商品數(shù)量為零？ 1 Case 3 sMeg = 產(chǎn)品代碼 Case 4 sMeg = 數(shù)量 Case 5 sMeg = 訂貨單價 Case 6 sMeg = 折扣比例 Case 7 sMeg = 總金額 End Select sMeg = sMeg amp。 ) = Then sMeg = 預(yù)付比例不能為空！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 txtItem(8).SetFocus Exit Sub End If End If For intCount = 0 To 2 If Trim(Combo1(intCount) amp。 不能為空！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 Combo1(intCount).SetFocus Exit Sub End If Next intCount For intCount = 4 To 5 If Trim(Combo1(intCount) amp。 不能為空！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 Combo1(intCount).SetFocus Exit Sub End If Next intCount For intCount = 4 To 7 If Not IsNumeric(Trim(txtItem(intCount))) Then sMeg = 請輸入數(shù)字！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 txtItem(intCount).SetFocus Exit Sub End If Next intCount If txtItem(8).Visible = True Then 1 If Not IsNumeric(Trim(txtItem(8))) Then sMeg = 預(yù)付比例請輸入數(shù)字！ MsgBox sMeg, vbOKOnly + vbExclamation, 警告 txtItem(8).SetFocus Exit Sub End If End If 39。 amp。 39