汽車(chē)銷售管理系統(tǒng)的設(shè)計(jì)實(shí)現(xiàn)與汽車(chē)4S店銷售管理軟件的應(yīng)用

1、汽車(chē)銷售管理系統(tǒng)的設(shè)計(jì)實(shí)現(xiàn)與汽車(chē)4S店管理系統(tǒng)應(yīng)用一、緒論摘要：本系統(tǒng)是為解決汽車(chē)銷售公司的管理問(wèn)題而設(shè)計(jì)。 隨著經(jīng)濟(jì)的發(fā)展和國(guó)汽車(chē)市場(chǎng)的不斷擴(kuò)大， 某汽車(chē)銷售公司定單成倍增加， 各項(xiàng)業(yè)務(wù)更加細(xì)化， 各部門(mén)分工更加明確。而目前的人工管理方式顯然已是不符合現(xiàn)代企業(yè)的管理要求?；谡w考慮， 本次課程設(shè)計(jì)任務(wù)就是設(shè)計(jì)一個(gè)管理系統(tǒng)， 利用計(jì)算機(jī)來(lái)代替人工操作。 減輕了員工的勞動(dòng)強(qiáng)度， 提高了勞動(dòng)質(zhì)量和效率， 減少了錯(cuò)誤的發(fā)生。本次設(shè)計(jì)，從需求分析， 概念設(shè)計(jì)，邏輯設(shè)計(jì)，物理設(shè)計(jì)，到數(shù)據(jù)庫(kù)的建立、運(yùn)行，再到數(shù)據(jù)庫(kù)的安全維護(hù)等各個(gè)方面進(jìn)行了詳細(xì)的分析設(shè)計(jì)。 并且值得一提的是，我認(rèn)真分析了企業(yè)的業(yè)務(wù)需求，

2、 公司的主要職責(zé)和主要結(jié)構(gòu)等信息， 從而保證了設(shè)計(jì)出比較符合公司需要的管理系統(tǒng)。1.1系統(tǒng)簡(jiǎn)介智百盛汽車(chē)銷售管理系統(tǒng) 是針對(duì)汽車(chē)銷售行業(yè)的業(yè)務(wù)特點(diǎn)， 專為汽車(chē)銷售的公司設(shè)計(jì)制作。 我們依據(jù)現(xiàn)代科學(xué)管理理念， 集國(guó)外先進(jìn)管理思想， 并結(jié)合自身多年積累的開(kāi)發(fā)經(jīng)驗(yàn)和大量的市場(chǎng)調(diào)研， 在高度集成、操作簡(jiǎn)單、方便管理、使用靈活等原則的指導(dǎo)下精心研發(fā)的一款軟件。該軟件主要包括客戶關(guān)系管理、 進(jìn)車(chē)管理、庫(kù)存管理、售車(chē)管理、代辦管理、財(cái)務(wù)管理、報(bào)表分析、系統(tǒng)管理等模塊。軟件價(jià)格低廉，功能強(qiáng)大，維護(hù)簡(jiǎn)單，無(wú)論中、小型企業(yè)，花費(fèi)很少投資，可以迅速得到企業(yè)全面信息化管理應(yīng)用。智百盛汽車(chē)銷售管理系統(tǒng) 7.5 緊密結(jié)合

3、當(dāng)今汽銷模式，為汽銷企業(yè)提供了全面的信息管理功能。是廣大汽車(chē)經(jīng)銷商、汽車(chē)特許專營(yíng)店等用戶優(yōu)秀的計(jì)算機(jī)管理方案。滿足各級(jí)部門(mén)對(duì)工作的需求，如總經(jīng)理、銷售經(jīng)理、銷售人員、會(huì)計(jì)、出納、計(jì)劃員、庫(kù)管員等，是汽車(chē)銷售企業(yè)最佳管理利器。·集汽銷企業(yè)的進(jìn)、銷、存、財(cái)管理于一體。·所有單據(jù)和報(bào)表均支持底盤(pán)號(hào)、發(fā)動(dòng)機(jī)號(hào)、合格證號(hào)等顯示、查詢和打印。·先進(jìn)的萬(wàn)能查詢功能。·支持用戶自定義報(bào)表。·所有單據(jù)和表格可以導(dǎo)出至Excel、Word、HTML 、TXT 格式文件。·嚴(yán)謹(jǐn)?shù)臋?quán)限設(shè)置，不僅可以定義菜單權(quán)限，還可以定義具體操作權(quán)限。·實(shí)用的多帳

4、套管理。·操作簡(jiǎn)單、極易上手，無(wú)須專業(yè)培訓(xùn)，會(huì)用鍵盤(pán)鼠標(biāo)即會(huì)使用。智百盛汽車(chē)銷售管理系統(tǒng) 采用了大量的最新技術(shù)， 進(jìn)一步完善了業(yè)務(wù)管理功能，整個(gè)產(chǎn)品在管理功能、易用性、數(shù)據(jù)容量、數(shù)據(jù)安全性等方面都有了很大的提高。二、系統(tǒng)需求分析本系統(tǒng)的設(shè)計(jì)模擬一般醫(yī)院的汽車(chē)銷售管理系統(tǒng)容， 經(jīng)過(guò)充分的系統(tǒng)分析和調(diào)研，系統(tǒng)主要包括的信息有 3 類：汽車(chē)商品信息、汽車(chē)進(jìn)貨信息以及汽車(chē)銷售信息。本在傳統(tǒng)的銷售管理工作中，往往是用人工清點(diǎn)的方式來(lái)掌握倉(cāng)庫(kù)中的汽車(chē)商品、使用手工記賬的方式來(lái)掌握商品的進(jìn)貨和銷售情況。 這種方式在數(shù)量較少、 庫(kù)存變換少的情況下，不失為一種好的方法。但是，隨著每天所發(fā)生的進(jìn)貨和銷售

5、情況紛繁復(fù)雜，如果借助人工來(lái)記錄和管理，將會(huì)耗費(fèi)大量的時(shí)間，而且容易出現(xiàn)錯(cuò)誤，造成管理上的混亂。具體而言，汽車(chē)銷售管理系統(tǒng)需要實(shí)現(xiàn)一下的需求：（1）能夠?qū)︶t(yī)院過(guò)擁有的各種汽車(chē)的基礎(chǔ)信息進(jìn)行維護(hù)和管理。汽車(chē)的基礎(chǔ)信息包括：汽車(chē)的順序號(hào)、汽車(chē)名稱、汽車(chē)規(guī)格、計(jì)量單位、備注信息、庫(kù)存數(shù)量等。 系統(tǒng)需要能夠?qū)ζ?chē)信息進(jìn)行添加、修改和刪除， 也可以以圖形的方式顯示出現(xiàn)汽車(chē)的庫(kù)存數(shù)量的比較。（2）跟蹤各種汽車(chē)的的進(jìn)貨信息。汽車(chē)的進(jìn)貨信息包括順序號(hào)、汽車(chē)名稱、 進(jìn)貨數(shù)量、進(jìn)貨價(jià)格、 進(jìn)貨日期、 備注等。 系統(tǒng)還需要能夠?qū)M(jìn)貨信息進(jìn)行添加、修改和刪除，也可以按照一定的條件來(lái)進(jìn)行查詢。（3）跟蹤各種汽車(chē)的銷售信

6、息。汽車(chē)的銷售信息包括順序號(hào)、汽車(chē)名稱、 顧客名稱、購(gòu)買(mǎi)數(shù)量、售出價(jià)格、銷售日期、備注等。系統(tǒng)需要能夠?qū)︿N售信息進(jìn)行添加、修改和刪除，也可以按照一定的條件來(lái)進(jìn)行查詢。三、界面設(shè)計(jì)設(shè)計(jì)主界面美觀，方便實(shí)用：四、概念結(jié)構(gòu)設(shè)計(jì)本階段的主要任務(wù)是將需求分析得到的用戶需求抽象為信息結(jié)構(gòu)結(jié)構(gòu) （即概念模型）設(shè)計(jì)概念結(jié)構(gòu)通常有四類方法：自頂向下、自底向上、逐步擴(kuò)和混合策略。我在這里采用自底向上方法。概念設(shè)計(jì)結(jié)果如下：（某公司轎車(chē)銷售管理系統(tǒng)的基本E R圖）五、邏輯結(jié)構(gòu)設(shè)計(jì)邏輯結(jié)構(gòu)設(shè)計(jì)的任務(wù)就是把概念結(jié)構(gòu)設(shè)計(jì)階段設(shè)計(jì)好的基本E-R 圖轉(zhuǎn)換為與sql所支持的數(shù)據(jù)模型相符合的邏輯結(jié)構(gòu)。1E-R 圖向關(guān)系模型轉(zhuǎn)換由

7、概念設(shè)計(jì)的E-R 圖可得一般關(guān)系模型如下廠商（廠商號(hào) , 廠商名 , 地址 , 信用度）客戶（客戶號(hào) , 客戶名 , 地址 , 信用度）發(fā)貨單（貨單號(hào), 細(xì)節(jié)號(hào) , 產(chǎn)品號(hào) , 客戶號(hào) , 數(shù)量 , 日期 , 金額 , 折扣）收款單（客戶號(hào)，定單號(hào), 收據(jù)號(hào) , 收款金額 , 收款日期）定單（定單號(hào)，細(xì)節(jié)號(hào),產(chǎn)品號(hào) ,廠商號(hào) ,數(shù)量,日期,金額）付款（廠商號(hào) , 定單號(hào) , 發(fā)票號(hào) , 支付金額 , 支付日期）用戶(用戶 ID, 用戶名 ,密碼 ,用戶類型 , 權(quán)限)員工(員工號(hào) , 性別,部門(mén), 職務(wù),)產(chǎn)品（產(chǎn)品號(hào) , 產(chǎn)品名 , 廠商號(hào) , 單價(jià) , 庫(kù)存量）2 數(shù)據(jù)模型的優(yōu)化數(shù)據(jù)庫(kù)邏輯

8、設(shè)計(jì)的結(jié)果不是唯一的. 為進(jìn)一步提高數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)的性能, 我們還應(yīng)該根據(jù)應(yīng)用需要適當(dāng)?shù)男薷? 調(diào)整數(shù)據(jù)模型的結(jié)構(gòu)，這就是數(shù)據(jù)模型的優(yōu)化。(1) 數(shù)據(jù)依賴舉例R 廠商 廠商號(hào) -> 廠商名 , 廠商號(hào) -> 地址 , 廠商號(hào) ->R 用戶 用戶 ID >用戶名，用戶ID >密碼，用戶ID >用戶類型，用戶ID >權(quán)限，用戶類型 >權(quán)限 (2) 對(duì)數(shù)據(jù)依賴進(jìn)行極小化處理，消除冗余聯(lián)系舉例上述關(guān)系中， 發(fā)貨單中存在冗余聯(lián)系（具體是細(xì)節(jié)號(hào)、 折扣等），因此我們可以增加一個(gè)發(fā)貨細(xì)節(jié)單和折扣規(guī)則單。(3)按照數(shù)據(jù)依賴的理論對(duì)關(guān)系模式逐一進(jìn)行分析，考察是否存

9、在部分函數(shù)依賴，傳遞函數(shù)依賴，多值依賴等，確定各關(guān)系分別屬于第幾式舉例上述關(guān)系中， 用戶表存在非主屬性傳遞依賴，因此用戶表屬于2NF。我們可以增加一個(gè)用戶權(quán)限表來(lái)消除該表中非主屬性傳遞依賴。3. 邏輯設(shè)計(jì)最終結(jié)果如下：（ UserType 表）（ Users 表）（ Staff 表）（ 共 13 個(gè)表， 其他截圖略）六、系統(tǒng)結(jié)構(gòu)設(shè)計(jì)1在關(guān)系模式存取方法選擇之前，我們首先要對(duì)要運(yùn)行的事務(wù)進(jìn)行詳細(xì)分析，獲得選擇物理數(shù)據(jù)庫(kù)設(shè)計(jì)所需要的參數(shù)。 同時(shí)，還要知道每個(gè)事務(wù)在各關(guān)系上運(yùn)行的頻率和性能要求。（ 1） 對(duì)于數(shù)據(jù)庫(kù)查詢事務(wù)，我們需要得到如下信息：查詢的關(guān)系、查詢條件/ 連接條件涉及的屬性、查詢的投影

10、屬性A、查詢發(fā)貨廠商名、產(chǎn)品、發(fā)貨數(shù)量（>100）和日期事務(wù)、查詢的關(guān)系：廠商表、發(fā)貨單表、產(chǎn)品表、查詢條件所涉及的屬性：廠商號(hào)、發(fā)貨數(shù)量、產(chǎn)品號(hào)III 、連接條件所涉及的屬性：廠商號(hào)、產(chǎn)品號(hào)IV 、查詢的投影屬性：廠商名、產(chǎn)品名、發(fā)貨數(shù)量、發(fā)貨日期（ 2） 對(duì)于數(shù)據(jù)更新事務(wù)，我們需要得到如下信息：被更新的關(guān)系、每個(gè)關(guān)系上的更新操作條件涉及的屬性、修改操作要改變的屬性值B、對(duì)發(fā)貨事務(wù)、被更新的關(guān)系：發(fā)貨表、每個(gè)關(guān)系上的更新操作條件所涉及的屬性：無(wú)III 、需要改的屬性值：貨單號(hào)、產(chǎn)品號(hào)、發(fā)貨數(shù)量、發(fā)貨日期2. 關(guān)系模式存取方法選擇（即建立哪些存儲(chǔ)路徑）C、對(duì) carsale建立索引對(duì)廠商

11、表上的廠商號(hào)、發(fā)貨表的產(chǎn)品號(hào)、產(chǎn)品表的產(chǎn)品號(hào)等建立索引，因?yàn)樗麄兘?jīng)常在查詢條件和連接條件中出現(xiàn)根據(jù)事務(wù)查詢中的廠商表建立索引如下：CREATE UNIQUE INDEX FaPa_no ON Factory(Fa_no);D、對(duì) carsale建立聚簇索引對(duì)產(chǎn)品表的廠商號(hào)、 付款表的廠商號(hào)、 收款表的客戶號(hào)等建立聚簇索引， 因?yàn)樗麄冊(cè)谄潢P(guān)系表中的值重復(fù)率很高對(duì)產(chǎn)品表的產(chǎn)品號(hào)、 發(fā)貨表的產(chǎn)品號(hào)、 訂單表的產(chǎn)品號(hào)等建立聚簇索引， 因?yàn)樗麄兘?jīng)常出現(xiàn)在相等比較條件中根據(jù)事務(wù)查詢中產(chǎn)品表建立聚簇索引如下CREATE CLUSTER INDEX ProFa_no ON Product(Fa_no);E、對(duì)

12、 carsale確定數(shù)據(jù)的存放位置為提高系統(tǒng)性能， 我們根據(jù)應(yīng)用情況將數(shù)據(jù)的易變部分和穩(wěn)定部分、 經(jīng)常存取部分和存取頻率較低部分分開(kāi)存放。即我們把表和索引放在不同的磁盤(pán)上。F、對(duì) carsale確定系統(tǒng)配置使用數(shù)據(jù)庫(kù)的用戶數(shù)（我們只要設(shè)置比較少的用戶數(shù)）；同時(shí)打開(kāi)的數(shù)據(jù)庫(kù)對(duì)象數(shù)（用戶同時(shí)操作對(duì)象不超過(guò)3 個(gè)）；存分配參數(shù)（運(yùn)行exe 文件需要5M存）；緩沖區(qū)分配參數(shù)（略） ；數(shù)據(jù)庫(kù)的大?。A(yù)留500M數(shù)據(jù)存儲(chǔ)空間）等。G、對(duì) carsale物理結(jié)構(gòu)的評(píng)價(jià)數(shù)據(jù)庫(kù)物理設(shè)計(jì)過(guò)程中需要對(duì)時(shí)間效率、空間效率、維護(hù)代價(jià)和各種用戶要求進(jìn)行權(quán)衡，其結(jié)果產(chǎn)生多種方案。經(jīng)過(guò)我們的細(xì)致評(píng)價(jià)，得出上述系統(tǒng)配置作為ca

13、rsale的數(shù)據(jù)庫(kù)物理結(jié)構(gòu)。七、詳細(xì)設(shè)計(jì)數(shù)據(jù)的載入和應(yīng)用程序的調(diào)試（1）由于該系統(tǒng)尚未投入使用，我們僅象征性地載入少量數(shù)據(jù)（轎車(chē)信息表導(dǎo)入實(shí)驗(yàn)數(shù)據(jù)）（客戶信息表導(dǎo)入實(shí)驗(yàn)數(shù)據(jù)）（訂單表導(dǎo)入實(shí)驗(yàn)數(shù)據(jù)）（生產(chǎn)商表導(dǎo)入實(shí)驗(yàn)數(shù)據(jù)）【應(yīng)用程序的調(diào)試】數(shù)據(jù)庫(kù)應(yīng)用程序的設(shè)計(jì)應(yīng)該與數(shù)據(jù)庫(kù)設(shè)計(jì)同時(shí)進(jìn)行，鑒于 VB簡(jiǎn)單易用， 我們選擇VB作為應(yīng)用程序的設(shè)計(jì)語(yǔ)言。因此在組織數(shù)據(jù)入庫(kù)的同時(shí)還要調(diào)試應(yīng)用部分代碼：部分代碼A 進(jìn)貨信息列表窗體代碼Private Sub cmdAdd_Click()frmStock.mbAddMode = TruefrmStock.Show vbModalEnd SubPrivate Sub

14、 cmdDelete_Click()On Error GoTo errHandlerDim l As Longl = grdList.TextMatrix(grdList.Row, 1)gConn.Execute "delete from stock where順序號(hào) =" & lUnload MeLoad MeMe.SQL = "select * from stock"Me.ShowExit SuberrHandler:MsgBox Err.Description, vbCritical, " 錯(cuò)誤 "End SubPriv

15、ate Sub cmdEdit_Click()frmStock.mnSerial = CLng(grdList.TextMatrix(grdList.Row, 1)frmStock.mbAddMode = TruefrmStock.Show vbModalEnd SubPrivate Sub cmdFind_Click()frmFind.SQL = mRs.SourcefrmFind.Show vbModalUnload MeLoad MeIf Trim(frmFind.msResultSQL) <> "" ThenMe.SQL = "select *

16、 from stock where" & frmFind.msResultSQLEnd IfMe.ShowUnload frmFindEnd SubPrivate Sub cmdShowAll_Click()Unload MeLoad MeMe.SQL = "select * from stock"Me.ShowEnd SubPrivate Sub Form_Load()Dim i As IntegerWith grdList.Cols = 8.TextMatrix(0, 1) = "".TextMatrix(0, 2) = "

17、; 汽車(chē)名稱 ".TextMatrix(0, 3) = " 供應(yīng)商名稱 ".TextMatrix(0, 4) = " 進(jìn)貨數(shù)量 ".TextMatrix(0, 5) = " 商品單價(jià) ".TextMatrix(0, 6) = " 進(jìn)貨日期 ".TextMatrix(0, 7) = " 備注 ".FixedRows = 1For i = 0 To .Cols - 1.ColAlignment(i) = 0Next i.FillStyle = flexFillRepeat.Col = 0.

18、Row = 0.RowSel = 1.ColSel = .Cols - 1.CellAlignment = 4.ColWidth(0) = 100.ColWidth(1) = 0.ColWidth(2) = 1000.ColWidth(3) = 1000.ColWidth(4) = 1000.ColWidth(5) = 1000.ColWidth(6) = 1000.ColWidth(7) = 1000.Row = 1End WithSet mRs = New ADODB.RecordsetEnd SubPrivate Sub Form_Resize()fraManage.Left = (Me

19、.ScaleWidth - fraManage.Width) / 2fraManage.Top = Me.ScaleHeight - 200 - fraManage.HeightgrdList.Top = 200grdList.Width = Me.ScaleWidth - 200grdList.Left = Me.ScaleLeft + 100grdList.Height = Me.ScaleHeight - fraManage.Height - grdList.Top - 200End SubPrivate Sub Form_Unload(Cancel As Integer)If mRs.

20、State <> adStateClosed Then mRs.CloseEnd SubB 進(jìn)貨信息編輯窗體代碼Private Sub cmdCancel_Click()If mbChange ThenIf MsgBox(" 保存當(dāng)前記錄的變化嗎？", vbOKCancel + vbExclamation, "警告 ") = vbOK ThenCall cmdOK_ClickEnd IfEnd IfUnload MeUnload frmStockListLoad frmStockListfrmStockList.SQL = "sel

21、ect * from stock"frmStockList.ShowEnd SubPrivate Sub cmdOK_Click()On Error GoTo errHandlerIf txtIntem(3).Text = "" ThenMsgBox "字段不能為空，而且只能輸入數(shù)字", vbCritical, " 錯(cuò)誤 "End IfIf txtIntem(4).Text = "" ThenMsgBox "字段不能為空，而且只能輸入數(shù)字", vbCritical, " 錯(cuò)誤

22、 "End IfIf Trim(cboItem) = "" ThenMsgBox "必須選擇汽車(chē)名稱", vbCritical, " 錯(cuò)誤 "cboItem.SetFocusExit SubEnd IfIf Not IsDate(Trim(txtIntem(5) ThenMsgBox "請(qǐng)輸入正確的日期格式！", vbOKOnly + vbExclamation, " 警告 "txtIntem(5).SetFocusExit SubEnd IfIf Not mbAddMode Then

23、gConn.Execute "delete from stock where順序號(hào) ='" & mnSerial & "'"End IfDim rs As New ADODB.Recordsetrs.Open "select * from stock", gConn, adOpenDynamic, adLockOptimisticrs.AddNewrs("汽車(chē)名稱 ") = cboItem.TextDim i As IntegerFor i = txtIntem.LBound To

24、txtIntem.UBoundrs.Fields(i).Value = txtIntem(i)Next irs.Updaters.ClosemnQuantity = CInt(txtIntem(3) - mnQuantitygConn.Execute "update products set庫(kù)存數(shù)量 =庫(kù)存數(shù)量 +" & mnQuantity & "where汽車(chē)名稱='" & cboItem.Text & "'"If mbAddMode ThenmbChange = TrueMsgBo

25、x "添加進(jìn)貨信息成功！繼續(xù)添加下一條進(jìn)貨信息", vbOKOnly + vbExclamation, " 添加進(jìn)貨信息 "Unload MeMe.Show vbModalElseUnload MefrmStockList.SQL = "select * from stock"frmStockList.ShowEnd IfExit SuberrHandler:MsgBox Err.Description, vbCritical, " 錯(cuò)誤 "End SubPrivate Sub Form_Load()On Error GoTo errHandlerDim rs As New ADODB.Recordsetrs.Open "select distinct汽車(chē)名稱from products", gConn, adOpenKeysetIf Not rs.EOF ThencboItem.ClearDo While Not rs.EOFcboItem.AddItem rs(" 汽車(chē)名稱 ")rs.MoveNextLoopElseMsgBox " 當(dāng)前數(shù)