【正文】 2 查詢 對客戶關(guān)系信息進行查詢 3 用戶管理 對系統(tǒng)用戶名和密碼進行修改和刪除等操作 4 系統(tǒng) 退出系統(tǒng) 第五章 ． 結(jié)束語 經(jīng)過一個多月的設(shè)計和開發(fā) ， 圖書管理系統(tǒng)基本開發(fā)完畢。這些都有待進一步改善。 另外，在系統(tǒng)開發(fā)過程中助手同學(xué)也給于我很大的幫助，幫助解決了不少的難點，使得系統(tǒng)能及時開發(fā)完成，還有同組的同學(xué)同樣給與我不少幫助，這里一并表示感謝。s eve I was reading the book, and had lost myself in it so pletely, that I fot my usual New Year39。 but we have a wild journey, also which is national and modern, and that is the journey to Amack on the night of the New Year. All indifferent poets and poetesses, musicians, newspaper writers, and artistic notabilities, I mean those who are no good, ride in the New Year39。 beaucoup de bruit, peu de fruit: much bruit, little fruit Yet certainly there is use of this quality, in civil affairs. Where there is an 。 for all bravery stands upon parisons. They must needs be violent, to make good their own vaunts. Neithe r can they be secret, and therefore not effectual。t know what that is! The journey of the witches on broomsticks is well enough known that journey is taken on St. John39。 the fly sat upon the axletree of the chariot wheel, and said. What a dust do I raise? So are there some vain persons, that whatsoever goeths indeed! They could tell us something worth hearing, if they only knew how to talk. It39。楊老師認真負責(zé)的工作態(tài)度，嚴謹?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺。 對于數(shù)據(jù)的一致性的問題也通過程序進行了有效的解決。 = True End If End Sub Private Sub Command3_Click() = True = True = True = True = True = True = True If = Or = Then MsgBox 名稱和管理員不能為空！ , 16, 出錯： = Else MsgBox 開始新建群組！ , 64, 恭喜！ = False = False = False End If End Sub Private Sub Command4_Click() If = True And = True Then MsgBox 您的數(shù)據(jù)庫中沒有信息可以刪 除！ , 16, 出錯！ Else MsgBox 您確定要刪除這條信息？ , 32, 提示！ If = False Then Else MsgBox 您的數(shù)據(jù)庫中沒有信息可以刪除！ , 16, 出錯！ End If End If End Sub Private Sub Form_Unload(Cancel As Integer) If = True Then Cancel = 0 Else MsgBox 請編輯完這條記錄再退出！ , 64, 提示： Cancel = 1 End If End Sub 4． 6 用戶管理 一個完整的應(yīng)用系統(tǒng)，必須要能夠具備適當(dāng)?shù)挠脩艄芾砉δ?，以防系統(tǒng)數(shù)據(jù)的安全。MsgBox 您的數(shù)據(jù)庫中沒有信息可以刪除！ , 16, 出錯！ End If End If End Sub Private Sub Command7_Click() If = Or = Then MsgBox 編號或姓名不能為空！ , 16, 出錯： = Else MsgBox 信息保存完畢！ , 16, 恭喜！ = True = True = True End If End Sub Private Sub Command8_Click() Unload Me End Sub Private Sub Form_Unload(Cancel As Integer) If = True Then Cancel = 0 Else MsgBox 請編輯完這條記錄再退出！若不編程請選擇任一記錄保存后退出 , 64, 提示： Cancel = 1 End If End Sub 客戶信息查詢： 本功能模塊是本系統(tǒng)的查詢功能模塊，用戶可以在本模塊上進行按條件進行查詢，也可以按編號和姓名進行查詢。 = 1500 39。 = True 39。 = 修改記錄： Else If = Then MsgBox 姓名不能為空！ , 16, 出錯： Else For X = 11 To 13 If Len(Trim()) 200 Then MsgBox 太長 , 16, 出錯： Exit Sub End If Next X 39。 = False 39。從而完成本系統(tǒng)的客戶信息管理。ADO 是錯誤退出，正確進入 Else If Trim() = Trim() And Trim() = Trim() Then = Unload Me Else X = X 1 End If End If Next X End If = End Sub Private Sub Command2_Click() Unload Me 39。當(dāng)然，用戶可以在系統(tǒng)登錄時為了防止系統(tǒng)密碼的泄露而可以進行對密碼的及時修改和更新。 客戶管理系統(tǒng) 系統(tǒng)登陸 客戶信息錄入 客戶信息查詢 用戶管理 添加 新增 刪除 恢復(fù) 按編號 按姓名 用戶添加 密碼修改 用戶刪除 群組設(shè)置 退出系統(tǒng) 本系統(tǒng)涉及到的實體：（共有三個數(shù)據(jù)表，分別為： ， ， ）。該系統(tǒng)執(zhí)行時，先錄入數(shù)據(jù)，然后根據(jù)客戶的個人信息可以進行查詢以及按照相同的屬于進行排序，并可將結(jié)果進行預(yù)覽。 3． 2 軟件模塊結(jié)構(gòu)設(shè)計 3． 2． 1 系統(tǒng)方案確定。 3． 數(shù)據(jù)流圖 3． 1． 3 數(shù)據(jù)字典 下面為借書業(yè)務(wù)流程圖中的每一部分編制數(shù)據(jù)字典。一個記錄集合是動態(tài)的也就意味著，當(dāng)原來的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會隨之改變。 Visual Basic、 Access以及其他微軟的軟件產(chǎn)品都是通過共用 JET數(shù)據(jù)庫引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。這種連接是指一個表被連接到它自己的一個字段，或在不同的紀錄中由重復(fù)數(shù)據(jù)的組合字段。這三種操作均可由 Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié) 將詳細描述實現(xiàn)的具體方法。 _ 新建一個數(shù)據(jù)庫 創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設(shè)計必須是靈活的、有邏輯的。 數(shù)據(jù)庫的概念 數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的工具。另外，Access 允許創(chuàng)建自定義報表用于打印或輸出數(shù)據(jù)庫中的信息。此外，通過動態(tài)鏈接庫，還可以調(diào)用 Windows應(yīng)用程序接口 (API)函數(shù)，實現(xiàn) SDK所具有的功能。 OLE 技術(shù)是 Microsoft 公司對象技術(shù)的戰(zhàn)略，它把多個應(yīng)用程序合為一體 ，將每個應(yīng)用程序看做是一個對象進行鏈接和嵌入，是一種應(yīng)用程序一體化的技術(shù)。 動態(tài)數(shù)據(jù)交換 (DDE) 利用動態(tài)數(shù)據(jù)交換 (Dynamic Data Exchange)技術(shù)，可以把一種應(yīng)用程序中的數(shù)據(jù)動態(tài)地鏈接到另一種應(yīng)用程序中，使兩種完全不同的應(yīng)用程序建立起一條動態(tài)數(shù)據(jù) 鏈路。 訪問數(shù)據(jù)庫 Visual Basic 具有強大的數(shù)據(jù)庫管理功能，利用數(shù)據(jù)控件和數(shù)據(jù)庫管理窗口，可以直接建立或處理 Microsoft Access 格式的數(shù)據(jù)庫，并提供了強大的數(shù)據(jù)存儲和檢索功能。一個對象可能會產(chǎn)生多個事件，每個事件都可以通過一段程序來響應(yīng)。 Visual Basic 語句簡單易懂，其編輯器支持彩色代碼，可自動進行語法錯誤檢查，同時具有功能強大且使用靈活的調(diào)試器和編譯器。 在一般的面向?qū)ο蟪绦蛟O(shè)計語言中，對象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而 Visual Basic 則是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計方法 (OOP)，把程序和數(shù)據(jù)封裝起來作為一個對象，并為每個對象賦予應(yīng)有的屬性，使對象成為實在的東西。 Visual Basic 提供了可視化設(shè)計工具，把 Windows 界面設(shè)計的復(fù)雜性“封裝”起來，開發(fā)人員不必為界面設(shè)計而編寫大量程序代碼。在 Visual Basic 環(huán)境下，利用事件驅(qū)動的編程機制、新穎易用的可視化設(shè)計工具，使用 Windows 內(nèi)部的應(yīng)用程序接口 (API)函數(shù)，以及動態(tài)鏈接庫 (DLL)、動態(tài)數(shù)據(jù)交換 (DDE)、對象的鏈接與嵌入 (OLE)、開放式數(shù)據(jù)訪問 (ODBC)等技術(shù)，可以高效、快速地開發(fā)出 Windows 環(huán)境下功能強大、圖形界面豐富的應(yīng)用軟件系統(tǒng)。然而，語 言的彈性和工具的便利性是密不可分的，只有便利的工具，卻沒有彈性的語言作支持，許多特殊化的處理動作必需要耗費數(shù)倍的工夫來處理，使得原來所標榜的效率提高的優(yōu)點失去了作用；相反，如果只強調(diào)程語言的彈性，卻沒有便利的工具作配合，會使一些即使非常簡單的界面處理動作，也會嚴重地浪費程序設(shè)計師的寶貴時間。另外，客戶部和上級領(lǐng)導(dǎo)對開發(fā)該系統(tǒng)也是大力支持的，同時制定了培訓(xùn)計劃，并進行了實施MIS 的物質(zhì)準備和工作準備。 技術(shù)上可行：該系統(tǒng)所需硬件設(shè)備，市場上銷售且價格較低，甚至可以使用原有的設(shè)備，軟件上，操作系統(tǒng)采用 Windows 系列操作系統(tǒng)，數(shù)據(jù)庫管理系統(tǒng)采用 Visual ，這些軟件在 MIS 開 發(fā)中已被大量應(yīng)用，技術(shù)上都比較成熟。 在軟、硬件方面對系統(tǒng)的需求，軟件要求易學(xué)，界面友好，容易掌握，可以很簡單方便的管理各種客戶信息。 客 戶信息系統(tǒng)的建立，需要進行用戶的需求調(diào)查與分析，以確定系統(tǒng)目標，提出解決問題的詳細方案，這是系統(tǒng)建設(shè)的重要環(huán)節(jié)。 得出該客戶業(yè)務(wù)流程圖如下所示： 1． 2 現(xiàn)行系統(tǒng)存在的問題 以前該公司的客戶管理工作大部分還是進行著手工管理，工作起來效率很低，并且 不能及時了解各類客戶的實際情況，也無法快速地進行客戶信息的查詢等操作，不便于動態(tài)及時地調(diào)整客戶資料，以便更好地適應(yīng)當(dāng)前經(jīng)濟形勢發(fā)展的需要和本企業(yè)的管理的先進性。 下面繪制出客戶管理業(yè)務(wù)中的流程圖?；谝陨先N方法 的特點和各自的優(yōu)缺點，本客戶管理系統(tǒng)利用軟件工程化思想和方法，總體上是采用結(jié)構(gòu)化生命法進行系統(tǒng)分析和設(shè)計的，而系統(tǒng)實現(xiàn)等步驟則采用了原型法和面對對象的方法。信息和材料、能源一樣成為一種社會的基本生產(chǎn)資料，在人類的社會生產(chǎn)活動中發(fā)揮著重要的作用。文章介紹了客戶管理信息系統(tǒng)的系統(tǒng)分析部分，包括可行性分析、業(yè)務(wù)流程分析等；系統(tǒng)設(shè)計部分主要介紹了系統(tǒng)功能設(shè)計和數(shù)據(jù)庫設(shè)計及代碼設(shè)計；系統(tǒng)實現(xiàn)部分說明了 幾個主要模塊的算法，并附帶了一些主要的窗口和程序。 摘要 隨著信息技術(shù)在管理上越來越深入而廣泛的應(yīng)用，管理信息系統(tǒng)的實施在技術(shù)上已逐步成熟。 客戶關(guān)系信息 管理信息系統(tǒng)是根據(jù)某企業(yè)所屬客戶的實際管理情況進行編寫的，主要目的是為了方便企業(yè)對客戶來往業(yè)務(wù)及客戶關(guān)系信息情況進行集中的查詢與管理工作。 ******************* 客戶關(guān)系信息管理系統(tǒng) （ CRM） 姓 名 學(xué) 科 專 業(yè) 計算機科學(xué)與技術(shù) 指