基于access數據庫技術的企業營銷管理系統設計畢業論文-資料下載頁

　　

【正文】 + 39。,負責人=39。 + Text1(2) + _ 39。,所在區域 =39。 + Text1(3) + 39。,地址=39。 + Text1(4) + 39。,電話=39。 + Text1(5) + 39。,EMALL=39。 + _ Text1(6) + 39。,郵編=39。 + Text1(7) + 39。,簡介 =39。 + Text1(8) + 39。,成立日期=39。 + _ Str() + 39。,核心產品=39。 + Text1(9) + 39。,備注=39。 + Text1(10) + 39。where 編號 =39。 + _ Text1(0) + 39。) End If If XSZZBookmark Then = XSZZBookmark Unload Me Exit SubSaveErr: MsgBox End Sub 銷售業績考核銷售業績考核模塊主要用于對業務員的銷售業績考核信息進行有效管理，并根據業務員銷售業績的完成比率，自動計算業務員的得分情況。本模塊可實現銷售業績考核信息的添加、修改、刪除、查找等功能。銷售業績考核模塊的運行結果如圖13所示。圖13 銷售業績考核單擊“增加”按鈕，添加業務員的銷售業績考核信息，如圖14所示。圖14 銷售業績考核信息添加單擊“修改”按鈕，修改業務員的銷售業績考核信息，如圖15所示。圖15 銷售業績考核信息修改單擊“查找”按鈕，查找業務員的銷售業績考核信息，如圖16所示。圖16 銷售業績考核信息查詢1．父窗體設計（1）選擇“工程”→“添加窗體”命令，添加一個窗體，將該窗體的“名稱”屬性設置為main_xszz_xsyjgl。（2）在窗體中設計如圖13所示的工具欄。（3）在窗體上添加一個ADO控件和一個DataGrid控件。（4）主要控件的屬性設置如表3所示。表3 主要控件對象的屬性列表對象屬性值功能Adodc1 RecordSource 銷售考核表 提供數據綁定DataGrid1 DataSource Adodc1 顯示銷售考核信息（5）程序代碼。Dim rs1 As New Private Sub Form_Activate() If sql Then = sql If 0 Then Else MsgBox 沒有找到符合條件的記錄！, , 提示窗口 End If End IfEnd Sub雙擊DataGrid表格，進入修改狀態，同時調出main_xszz_xsyjgl_lr窗體，代碼如下。Private Sub DataGrid1_DblClick() If 0 Then blnAddXSKH = False XSKHBookmark = Load main_xszz_xsyjgl_lr 1 Else MsgBox 系統沒有要修改的數據！, , 提示窗口 End IfEnd Sub單擊工具欄按鈕，調出相應窗體或執行相應操作，代碼如下。Private Sub Toolbar1_ButtonClick(ByVal Button As ) Select Case Case add 39。添加狀態 blnAddXSKH = True = 2 Load main_yyxx 1 Case modify 39。修改狀態，并調用DataGrid1_DblClick過程 DataGrid1_DblClick Case delete If 0 Then Else MsgBox 系統沒有要刪除的數據！, , 提示窗口 End If Case find tb = 銷售考核表 Load main_find 1 Case all = 銷售考核表 order by ID End SelectEnd Sub2．子窗體設計（1）在工程中添加一個新窗體，將該窗體的“名稱”屬性設置為main_xszz_xszzgl_lr。（2）在窗體上添加TextBox控件數組（text1(0)～text1(10)）、一個TextBox控件（txtID）、一個Combo控件、一個DTPicker控件（默認名稱為DTPicker1）和3個CommandButton控件等。（3）在窗體上添加一個ADODC控件、一個DataCombo控件，DataCombo控件屬于ActiveX控件，在使用前應先將其添加到工具箱中，具體添加方法如下：在“部件”對話框中選中Microsoft DataList Controls （SP3）選項，然后單擊【確定】按鈕。此時，DataCombo控件將出現在工具箱中。（4）主要控件的屬性設置如表4所示。表4 主要控件對象的屬性列表對象屬性值功能Adodc1RecordSource考核指標表提供數據綁定DataCombo1RowSourceListFieldAdodc1考核指標顯示考核指標信息（5）程序代碼。Dim n1 As Single窗體載入時，將首先通過布爾型變量blnAddXSKH判斷是添加還是修改。如果是添加狀態，則設置窗體的標題為“銷售業績考核信息添加”；如果是修改狀態，則顯示當前所選擇的記錄，代碼如下。Private Sub Form_Load() For i = 2005 To 3010 i amp。 年 Next i = 1 If blnAddXSKH = True Then = 銷售業績考核信息添加 Else = 銷售業績考核信息修改 = True: = True With If .RecordCount 0 Then txtID = .Fields(ID) Text1(0) = .Fields(業務員編號): Text1(1) = .Fields(業務員姓名) DataCombo1 = .Fields(考核指標): Text1(2) = .Fields(完成率) Text1(3) = .Fields(分數): If .Fields(年度) Then Combo1 = .Fields(年度) If .Fields(考核日期) Then DTPicker1 = .Fields(考核日期) End If End With End IfEnd SubPrivate Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn And Index = 2 Then n1 = Val(Text1(2)) Text1(3) = Round(3 * (n1 / 100) / (2 * (n1 / 100) + 1), 2) * 100 End IfEnd SubPrivate Sub Command1_Click() n1 = Val(Text1(2)) Text1(3) = Round(3 * (n1 / 100) / (2 * (n1 / 100) + 1), 2) * 100 If blnAddXSKH = True Then (insert into 銷售考核表(業務員編號,業務員姓名,考核指標,完成率,分數,年度,考核日期) values(39。 + Text1(0) + 39。,39。 + Text1(1) + 39。,39。 + DataCombo1 + 39。,39。 + Text1(2) + 39。, + Text1(3) + ,39。 + Combo1 + 39。,39。 + Str(DTPicker1) + 39。)) Else (update 銷售考核表 set 考核指標=39。 + DataCombo1 + 39。,完成率=39。 + Text1(2) + 39。,分數= + Text1(3) + ,年度=39。 + Combo1 + 39。,考核日期=39。 + Str(DTPicker1) + 39。where ID= + txtID + ) End If If XSKHBookmark Then = XSKHBookmark Unload MeEnd Sub第六章 文件架構。 主文件架構圖，其中銷售訓練項目設置和銷售考核指標設置模塊使用了公用窗體main_jbzl_public。 基本資料文件架構圖。 銷售業務管理和市場管理文件架構圖。 銷售業務管理和銷售分析文件架構圖。 營銷資源管理文件架構圖第七章 系統評價7．1系統測試系統的測試是通過一些真實數據來測試軟件設計和編碼的錯誤。由于軟件比較小，所以沒必要像大型系統一樣來測試。比如大型系統需要分模塊測試，子系統測試，系統測試等。在這一軟件的測試中，我們直接采用系統測試來完成。7．2系統的特點本系統軟件的編制按照軟件工程的方法和要求，具有以下特點：（1）系統維護簡單，系統所需要的任何數據或者任何公路橋梁信息資料，都是被保存在各自獨立的數據庫當中的，大部分的工作都由我們的系統來完成，系統管理員和用戶只要做一些簡單的工作就可以了。（2）系統的使用方便，系統任何截面都全中文顯示，友好和可預見性的界面，及時的提示，讓用戶能很快的掌握操作方法。（3）系統的高效實用。數據庫的引入，不僅使本系統便于維護，而且，使得系統高效實用，無須了解系統的運行體制和內部結構，就能掌握要領，運用自如。（4）對于不同的數據資料都是采用分別獨立的數據庫來保存的。（5）可方便地按照各種查詢條件查詢得到相關數據，系統還支持模糊查詢，你只需輸入其中所包含的任意字符即可查詢得到相關的數據信息。7．3 系統總結系統實現了預期的效果，主要解決數據錄入、數據任意字段及任意字段模糊查詢、數據維護等功能。致謝正值論文完成之際，謹向所有曾給予我指導、鼓勵、支持、幫助、關心和理解的老師、同學以及朋友表示深深的謝意！首先感謝我的畢業設計指導老師巫宗賓老師和王新勝老師！在他們的精心幫助，細致的指導和言傳身教下，我的開發軟件的能力和獨立思考的能力得到系統的鍛煉和很大的提高，使得本文得以順利完成。感謝和我系機房的管理人員及教師，為我們畢業設計安排了理想的環境及公路橋梁，為我們的畢業設計的實際完成提供了可能。感謝我班的其他同學，在設計時給予的無私幫助和真誠的關心！參考文獻[1]趙杰、李濤、王國業 畢業設計指導及案例剖析——數據庫方向[M].北京:清華大學出版社，2005[2]張國藩 軟件工程導論[M].北京大學出版社， 2003[3]崔巍 數據庫系統及應用[M].北京:高等教育出版社， 2004[4]方盈 SQL Server 2000中文版 徹底研究[M].北京:中國鐵道出版社，2001[5]甘仞初 管理信息系統[M].機械工業出版社，2001,P11152,P341[6]計算機軟件開發規范[S].[7]袁玲 三層客戶/服務器體系結構實現信息管理系統技術探討人事管理系統的實現[D].成都:電子科技大學，2000– 53 –