客戶資源管理系統(tǒng)設(shè)計(jì)

1、 軟件開發(fā)綜合技能訓(xùn)練 報(bào)告客戶資源管理系統(tǒng)設(shè)計(jì)專業(yè)學(xué)生班級(jí)學(xué)號(hào)指導(dǎo)教師萍完成日期2015年 1月 9日信息學(xué)院目 錄第1章 緒 論11.1 課題背景11.1.1 管理信息系統(tǒng)的發(fā)展歷史11.2課題研究的目的與意義1第2章 需求分析22.1 系統(tǒng)設(shè)計(jì)思想22.2 需求分析32.2.1 設(shè)計(jì)目標(biāo)42.1.2 用戶特點(diǎn)52.2 需求描述52.2.1 信息管理系統(tǒng)的總需求目標(biāo)52.2.2 數(shù)據(jù)需求52.2.3 功能性需求概述62.2.4 約束（Constraints）62.2.5 用戶的需求分析62.3 DBMS的選擇62.4 開發(fā)工具的介紹72.4.1 Visual Basic 6.0開發(fā)工具的簡

2、介72.4.2 SQL Server 2000的簡介72.4.3ADO控件的介紹82.4.4ADO控件的綁定控件82.4.5 連接數(shù)據(jù)庫9第3章 系統(tǒng)設(shè)計(jì)93.1 系統(tǒng)功能模塊劃分93.2 系統(tǒng)功能模塊介紹103.3 設(shè)計(jì)和創(chuàng)建數(shù)據(jù)庫103.3.1 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)103.3.2 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)123.3.3 創(chuàng)建數(shù)據(jù)庫14第4章 詳細(xì)設(shè)計(jì)及實(shí)現(xiàn)154.1 程序流程圖154.2 公共模塊的設(shè)計(jì)154.3 主界面的設(shè)計(jì)164.4 登錄模塊的設(shè)計(jì)184.5 系統(tǒng)管理模塊設(shè)計(jì)204.5.1 用戶管理的設(shè)計(jì)214.5.2口令修改的設(shè)計(jì)234.6 信息管理設(shè)計(jì)244.6.1 客戶信息維護(hù)設(shè)計(jì)264

3、.6.2 客戶反饋信息設(shè)計(jì)284.6.3 工作日程安排設(shè)計(jì)294.6.4 客戶信息添加設(shè)計(jì)294.7 信息服務(wù)模塊設(shè)計(jì)294.7.1 群發(fā)的設(shè)計(jì)304.7.2 信息查詢?cè)O(shè)計(jì)304.7.3 信息提醒設(shè)計(jì)304.8 信息查詢?cè)O(shè)計(jì)314.8.1 客戶基本信息查詢?cè)O(shè)計(jì)314.8.2 客戶反饋信息查詢32第5章 系統(tǒng)的測(cè)試與運(yùn)行335.1 系統(tǒng)測(cè)試簡介335.2 測(cè)試與運(yùn)行33參考文獻(xiàn)1實(shí)驗(yàn)小結(jié)11 / 37第1章 緒 論1.1 課題背景管理信息系統(tǒng)（Management Information System），在強(qiáng)調(diào)管理，強(qiáng)調(diào)信息的現(xiàn)代社會(huì)中它變得越來越普及。MIS是一門新的學(xué)科，它跨越了若干個(gè)領(lǐng)域，

4、比如管理科學(xué)、系統(tǒng)科學(xué)，運(yùn)籌學(xué)、統(tǒng)計(jì)學(xué)以及計(jì)算機(jī)科學(xué)。在這些學(xué)科的基礎(chǔ)上，形成信息收集和加工的方法，從而形成一個(gè)縱橫交織的系統(tǒng)。1.1.1 管理信息系統(tǒng)的發(fā)展歷史信息作為生產(chǎn)力中最活躍的因素，很早就在人類經(jīng)濟(jì)生活中發(fā)揮著不可替代的作用，但把信息納入企業(yè)經(jīng)營管理系統(tǒng)中高效處理和應(yīng)用是在計(jì)算機(jī)發(fā)明以后的50年代末。目前人們所提到的管理信息系統(tǒng)，通常是指以計(jì)算機(jī)為工具，對(duì)管理信息進(jìn)行收集、存貯、檢索、加工和傳遞，使其應(yīng)用于組織機(jī)構(gòu)及企業(yè)管理領(lǐng)域的“人機(jī)系統(tǒng)”，該系統(tǒng)是70年代初“后工業(yè)經(jīng)濟(jì)”時(shí)代的產(chǎn)物，在企業(yè)管理信息系統(tǒng)在其發(fā)展的初期，是單一的人機(jī)系統(tǒng)，系統(tǒng)功能簡單，效率低，對(duì)管理的作用有限。進(jìn)入2

5、0世紀(jì)80年代末，隨著計(jì)算機(jī)網(wǎng)絡(luò)和通信技術(shù)的大力發(fā)展，企業(yè)管理信息系統(tǒng)進(jìn)入網(wǎng)絡(luò)化的發(fā)展時(shí)期。世界發(fā)達(dá)國家已建立起了完善的先進(jìn)的管理信息系統(tǒng)體系，在其社會(huì)經(jīng)濟(jì)發(fā)展領(lǐng)域中發(fā)揮著巨大的作用。1.2課題研究的目的與意義信息社會(huì)的高科技，商品經(jīng)濟(jì)化的高效益，使計(jì)算機(jī)的應(yīng)用已普及到經(jīng)濟(jì)和社會(huì)生活的各個(gè)領(lǐng)域。計(jì)算機(jī)雖然與人類的關(guān)系愈來愈密切，還有人由于計(jì)算機(jī)操作不方便繼續(xù)用手工勞動(dòng)。為了適應(yīng)現(xiàn)代社會(huì)人們高度強(qiáng)烈的時(shí)間觀念，客戶信息管理系統(tǒng)軟件為管理人員帶來了極大的方便。計(jì)算機(jī)在客戶信息管理部門的廣泛使用，改進(jìn)了統(tǒng)計(jì)手段，改革了統(tǒng)計(jì)方法，提高了統(tǒng)計(jì)工計(jì)算機(jī)在客戶部門的廣泛應(yīng)用，將為我國的客戶管理工作，提供現(xiàn)代

6、化的管理手段和科學(xué)的管理方法，并將為開創(chuàng)客戶管理工作的新局面創(chuàng)造條件。目前，計(jì)算機(jī)在我國的客戶信息管理工作中，主要可用來進(jìn)行檔案管理，文書編輯，信息查詢，綜合分析。但這種手工統(tǒng)計(jì)過程，存在著幾個(gè)明顯的問題，比如說統(tǒng)計(jì)資料缺乏準(zhǔn)確性，及時(shí)性，需要花費(fèi)大量的人力，物力，財(cái)力等。手工方法所表現(xiàn)出來的種種劣勢(shì)，使人們慢慢意識(shí)到管理現(xiàn)代化已成為當(dāng)代社會(huì)發(fā)展的一股不可抗拒的洪流。在管理現(xiàn)代化的浪潮中，客戶信息管理現(xiàn)代化也勢(shì)在必行。實(shí)現(xiàn)客戶信息管理現(xiàn)代化是一個(gè)復(fù)雜的系統(tǒng)工程，需要采取科學(xué)的管理方法和先進(jìn)的科技手段?？茖W(xué)的管理方法在管理中一般是指數(shù)學(xué)方法、系統(tǒng)方法、信息方法、控制論方法、社會(huì)學(xué)方法、心理學(xué)方法

7、等科學(xué)方法，而先進(jìn)的科技手段主要是運(yùn)用當(dāng)代最新科學(xué)技術(shù)之一的電子計(jì)算機(jī)來為客戶管理現(xiàn)代化服務(wù)。隨著經(jīng)濟(jì)的發(fā)展和社會(huì)信息化程度的提高，人們的生活質(zhì)量和工作效率也越來越來越高，消費(fèi)者對(duì)企業(yè)的信息管理質(zhì)量也提出了更高的要求，快速消費(fèi)行業(yè)的競爭也異常激烈。作為成熟的行業(yè)，不斷增多的競爭品牌使得消費(fèi)者的品牌忠誠度有進(jìn)一步下降的趨勢(shì)。為了滿足消費(fèi)者的要求，更好的服務(wù)于客戶，使企業(yè)在激烈的競爭中占有 一席之地，搭建一流的客戶信息管理系統(tǒng)已成為企業(yè)發(fā)展的必然。第2章 需求分析2.1 系統(tǒng)設(shè)計(jì)思想1.系統(tǒng)架構(gòu)的選擇本系統(tǒng)采用的是兩層結(jié)構(gòu)客戶/服務(wù)器模式，即客戶端和數(shù)據(jù)庫服務(wù)器端（C/S）.客戶端提供用戶操作界面

8、，接受用戶的數(shù)據(jù)輸入，向數(shù)據(jù)庫服務(wù)器發(fā)出命令或數(shù)據(jù)請(qǐng)求，并接受執(zhí)行命令后返回的數(shù)據(jù)結(jié)果，根據(jù)業(yè)務(wù)邏輯進(jìn)行相關(guān)的運(yùn)算，向客戶顯示相應(yīng)的信息。數(shù)據(jù)庫服務(wù)器端接受客戶端的數(shù)據(jù)或命令請(qǐng)求，并執(zhí)行相應(yīng)的命令得到相應(yīng)的數(shù)據(jù)集，對(duì)數(shù)據(jù)集進(jìn)行相應(yīng)的處理，然后將數(shù)據(jù)集或處理的數(shù)據(jù)集返回給客戶端。它的工作原理圖如圖2-1所示?？蛻粜畔⒐芾硐到y(tǒng)操作界面（數(shù)據(jù)或命令請(qǐng)求）數(shù)據(jù)或命令處理發(fā)送數(shù)據(jù)或名令請(qǐng)求返回命令執(zhí)行得到的結(jié)果集圖2-1 C/S工作的原理示意圖盡管隨著應(yīng)用系統(tǒng)程序規(guī)模的不斷擴(kuò)大，兩層結(jié)構(gòu)的C/S開發(fā)模式的缺點(diǎn)越來越明顯，即需要高昂的投資和復(fù)雜的技術(shù)支持，維護(hù)成本很高，維護(hù)任務(wù)很大，但是在這種體系結(jié)構(gòu)下，

9、能夠快速建立并運(yùn)行系統(tǒng)程序的基本功能，使系統(tǒng)開發(fā)變得簡單而快捷。和三層架構(gòu)的C/S模式不同的是，利用兩層架構(gòu)的開發(fā)模式，在編碼時(shí)只需要查看本系統(tǒng)程序中的模塊就能瀏覽到程序的功能代碼，而不需要查看另一組件中的代碼，這樣就使代碼的查看和修改相當(dāng)方便，功能實(shí)現(xiàn)和調(diào)試也比較容易。2系統(tǒng)設(shè)計(jì)思想簡介本系統(tǒng)主要完成客戶信息的管理，包括客戶的基本信息和客戶反饋的信息，為此，系統(tǒng)必須能夠維護(hù)至少2個(gè)用于記錄客戶基本信息和客戶反饋信息的數(shù)據(jù)表，對(duì)這2個(gè)表進(jìn)行添加 、刪除和查詢操作。于此同時(shí)還要維護(hù)系統(tǒng)用戶的信息和其他的信息。用戶登錄系統(tǒng)時(shí)，程序首先根據(jù)用戶輸入的數(shù)據(jù)庫連接信息，連接到指定的服務(wù)器，然后從db_C

10、service1數(shù)據(jù)庫中已有的用戶資料數(shù)據(jù)表中讀出用戶名和密碼，并檢驗(yàn)該密碼與用戶輸入的密碼是否匹配，中有用戶名在數(shù)據(jù)庫中存在，并且密碼正確時(shí)，用戶才能進(jìn)入系統(tǒng)。當(dāng)需要進(jìn)行客戶信息維護(hù)、客戶反饋信息維護(hù)時(shí)，程序就將添加或修改的信息存儲(chǔ)到客戶信息維護(hù)數(shù)據(jù)表和客戶信息反饋數(shù)據(jù)表中。當(dāng)需要進(jìn)行用戶管理的添加、注冊(cè)和刪除時(shí)，程序就將添加、注冊(cè)和刪除的信息存儲(chǔ)到用戶信息表中。當(dāng)需要進(jìn)行發(fā)送時(shí)，就會(huì)從聯(lián)系人數(shù)據(jù)表中查看到客戶的地址。另外，該系統(tǒng)還能查詢客戶的基本信息和客戶反饋的信息，還能進(jìn)行數(shù)據(jù)的恢復(fù)和備份。2.2 需求分析隨著企業(yè)的規(guī)模不斷擴(kuò)大，客戶數(shù)量急劇增加，有關(guān)客戶的各種信息量也成倍增長。面對(duì)龐大

11、的信息量需要有客戶信息管理系統(tǒng)來提高客戶管理工作的效率。通過這樣的系統(tǒng)可以做到信息的規(guī)管理、科學(xué)統(tǒng)計(jì)和快速查詢、修改、增加、刪除等，從而減少管理方面的工作量。在一些大的企業(yè)中已經(jīng)建立可客戶信息管理系統(tǒng)，但在一些小的企業(yè)中并沒有建立客戶信息管理系統(tǒng)。隨著社會(huì)的發(fā)展人們對(duì)于自己的信息越來越不希望被別人隨便的就可以查看到。然而現(xiàn)實(shí)并非如此，例如我們?nèi)コ匈I東西在辦理會(huì)員卡的時(shí)候需要填寫一些個(gè)人信息，因?yàn)楹芏喑羞€是使用人工登記的方法，所以客戶的資料很容易就會(huì)被別人看到。我認(rèn)為這樣對(duì)客戶是不尊重的。而在銀行方面就做的很好，他們把客戶的信息錄入電腦，只有操作人員才可能看到，這樣對(duì)客戶是負(fù)責(zé)任的。本系統(tǒng)主

12、要用于企業(yè)客戶信息管理，總體任務(wù)是實(shí)現(xiàn)客戶信息關(guān)系的系統(tǒng)化、規(guī)化和自動(dòng)化，其主要任務(wù)是用計(jì)算機(jī)對(duì)客戶各種信息進(jìn)行日常管理，如查詢、修改 、增加、刪除，接收，針對(duì)這些要求設(shè)計(jì)了客戶信息管理系統(tǒng)。 本系統(tǒng)主要包括系統(tǒng)管理、信息管理 信息服務(wù) 和客戶信息查詢等四部分。其功能主要有：1、有關(guān)系統(tǒng)管理，包括用戶管理、口令修改、數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)等。其中用戶管理中可以增加、 注冊(cè)和 刪除用戶。2、信息管理，包括客戶信息維護(hù)、客戶信息反饋和工作日程安排?？蛻粜畔⒕S護(hù)包括添加 、保存 和刪除客戶?？蛻粜畔⒎答伩梢燥@示用戶的反饋信息，同樣也可以添加和刪除反饋信息。3、信息服務(wù)，包括群發(fā)、 管理和信息提醒。群發(fā)中

13、選擇地址就可以發(fā)送，管理則可以統(tǒng)計(jì)的數(shù)量，只要你需要信息提醒就可以運(yùn)行次界面。4、信息查詢，包括客戶基本信息查詢和客戶反饋信息查詢。客戶基本信息查詢可以查詢客戶名稱，聯(lián)系，傳真和網(wǎng)址等。客戶反饋信息查詢則可以顯示客戶的名稱，滿意程度和反饋時(shí)間等。5、退出系統(tǒng)，包括重新登錄和退出。作為系統(tǒng)管理員，如何最大限度地發(fā)揮人員的才能，這是客戶管理學(xué)研究的根本任務(wù)。對(duì)這個(gè)問題進(jìn)行個(gè)體研究方面，目前是做得不夠的。因?yàn)閭€(gè)體寓于群體之中，群體對(duì)人員才能發(fā)揮之影響作用，可利用系統(tǒng)原理去指示。通過群體研究來尋求合理的年齡結(jié)構(gòu)、知識(shí)結(jié)構(gòu)、專業(yè)結(jié)構(gòu)、來取得令人滿意的配合效果等。不論客戶管理怎樣復(fù)雜，最基本的管理就是客戶

14、信息的維護(hù)，客戶反饋信息的查詢等。使用客戶信息管理系統(tǒng)，便于領(lǐng)導(dǎo)掌握客戶的意見，及時(shí)調(diào)整企業(yè)的決策。本人將完成此客戶信息管理基本功能實(shí)現(xiàn)的任務(wù)?？蛻粜畔⒐芾硐到y(tǒng)是典型的信息管理系統(tǒng) (MIS)，其開發(fā)主要包括后臺(tái)數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面。對(duì)于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的庫。而對(duì)于后者則要求應(yīng)用程序功能完備，易使用等特點(diǎn)。2.2.1 設(shè)計(jì)目標(biāo)開發(fā)的系統(tǒng)是一個(gè)單機(jī)版的客戶信息管理系統(tǒng)。如表2-1所示：表2-1 設(shè)計(jì)目標(biāo)表需求對(duì)公司客戶信息進(jìn)行信息化管理用戶客戶信息管理員用戶所做的事添加 、保存、 刪除用戶添加、 保存、 刪除客戶信息維護(hù)客戶的信息及客戶

15、反饋的信息收發(fā)電子并進(jìn)行統(tǒng)計(jì)用戶需求管理用戶的基本信息管理客戶的基本信息現(xiàn)在已經(jīng)存在的有最好的解決方案用SQL Server 2000數(shù)據(jù)庫來實(shí)現(xiàn)，用語言是VB來開發(fā)最好方案的理由選SQL Server 2000是目前比較流行的數(shù)據(jù)庫之一，具有存儲(chǔ)數(shù)據(jù)量大 數(shù)據(jù)安全性高 讀取與存儲(chǔ)數(shù)據(jù)快等優(yōu)點(diǎn)。用VB 是因?yàn)槲覍?duì)它比較熟悉。2.1.2 用戶特點(diǎn)用戶為非專業(yè)技術(shù)人員，對(duì)計(jì)算機(jī)技術(shù)沒有詳細(xì)了解，必須盡可能的提供友好的操作界面和使用提示。2.2 需求描述2.2.1 信息管理系統(tǒng)的總需求目標(biāo)在計(jì)算機(jī)網(wǎng)絡(luò)，數(shù)據(jù)庫和先進(jìn)的開發(fā)平臺(tái)上，利用現(xiàn)有的軟件，配置一定的硬件，開發(fā)一個(gè)具有開放體系結(jié)構(gòu)的、易擴(kuò)充的、易

16、維護(hù)的、具有良好人機(jī)交互界面的客戶信息管理系統(tǒng)，實(shí)現(xiàn)維護(hù)客戶信息，實(shí)現(xiàn)客戶信息查詢，統(tǒng)計(jì)客戶反饋信息的自動(dòng)化，高效的計(jì)算機(jī)系統(tǒng)。2.2.2 數(shù)據(jù)需求(1)數(shù)據(jù)錄入和處理的準(zhǔn)確性和實(shí)時(shí)性數(shù)據(jù)的輸入是否準(zhǔn)確是數(shù)據(jù)處理的前提，錯(cuò)誤的輸入會(huì)導(dǎo)致系統(tǒng)輸出的不正確和不可用，從而使系統(tǒng)的工作失去意義。數(shù)據(jù)的輸入來源是手工輸入。手工輸入要通過系統(tǒng)界面上的安排系統(tǒng)具有容錯(cuò)性，并且對(duì)操作人員要進(jìn)行系統(tǒng)的培訓(xùn)。在系統(tǒng)中，數(shù)據(jù)的輸入往往是大量的，因此系統(tǒng)要有一定的處理能力，以保證迅速的處理數(shù)據(jù)。(2)數(shù)據(jù)的安全性本系統(tǒng)為企業(yè)客戶信息管理部門設(shè)計(jì)，因此只有特定的用戶管理者才能對(duì)數(shù)據(jù)實(shí)現(xiàn)增，刪，改，查等操作。未獲授權(quán)人員

17、不能進(jìn)入系統(tǒng)。(3)數(shù)據(jù)的備份要定期對(duì)數(shù)據(jù)庫中的數(shù)據(jù)進(jìn)行全部或新增部分的備份工作，以保證在硬件出現(xiàn)故障或人為原因?qū)е聼o法運(yùn)行時(shí)是可以快速及時(shí)的還原到原來的正常狀態(tài)。2.2.3 功能性需求概述(1)能夠管理普通用戶的基本信息(2)能夠管理客戶的基本信息(3)能夠管理客戶反饋的信息(4)以上這些信息都應(yīng)便于查詢(5)能夠群發(fā)和接收2.2.4 約束（Constraints）操作系統(tǒng)：Windows XP數(shù)據(jù)庫系統(tǒng):SQL Server 20002.2.5 用戶的需求分析用戶的需求可為如下幾個(gè)方面1客戶信息的管理客戶信息應(yīng)該包括編號(hào)、客戶名稱、聯(lián)系地址、客戶類型、客戶來源等信息。可以輸入和修改客戶的信

18、息。2系統(tǒng)用戶的管理 能夠增加和注冊(cè)用戶，只有在用戶名和密碼正確的情況下才能進(jìn)入到系統(tǒng)。3.數(shù)據(jù)庫的維護(hù)系統(tǒng)應(yīng)該提供給用戶數(shù)據(jù)庫備份和恢復(fù)的功能，以便用戶能夠及時(shí)地備份數(shù)據(jù)庫，并在數(shù)據(jù)庫丟失或出現(xiàn)錯(cuò)誤時(shí)，及時(shí)地恢復(fù)數(shù)據(jù)庫，最大程度的避數(shù)據(jù)的丟失。2.3DBMS的選擇開發(fā)客戶信息管理系統(tǒng)的核心工具是數(shù)據(jù)庫管理系統(tǒng)（DBMS）。隨著局域網(wǎng)和Internet的發(fā)展以及企業(yè)和事業(yè)單位的信息管理規(guī)模日漸增大，越來越多的用戶開始選擇大型關(guān)系型RDBMS，常用的有Oracle數(shù)據(jù)庫管理系統(tǒng)、DB2數(shù)據(jù)庫管理系統(tǒng)、Microsoft SQL Server數(shù)據(jù)庫管理系統(tǒng)、Sybase SQL Anywhere數(shù)

19、據(jù)庫管理系統(tǒng)等。考慮我們的做畢業(yè)設(shè)計(jì)的實(shí)際環(huán)境和實(shí)際能力，我們選擇SQL Server2000，SQL Server2000作為一種關(guān)系型數(shù)據(jù)庫管理系統(tǒng)，是中小型信息管理系統(tǒng)的理想開發(fā)環(huán)境，在當(dāng)前數(shù)據(jù)庫領(lǐng)域，已有越來越多的人開始采用SQL Server2000。它是一個(gè)功能強(qiáng)大的數(shù)據(jù)庫管理系統(tǒng)和MIS（Management Information System）系統(tǒng)開發(fā)工具，具有界面友好，易學(xué)易用，開發(fā)簡單，接口靈活等特點(diǎn)。2.4 開發(fā)工具的介紹2.4.1 Visual Basic 6.0開發(fā)工具的簡介在眾多的可視化編程工具中，Visual Basic 6.0可以說是易學(xué)易用的優(yōu)秀工具。由于它

20、的通俗易懂，再加上數(shù)據(jù)庫應(yīng)用的普及，Visual Basic 6.0已經(jīng)成為很多數(shù)據(jù)庫開發(fā)人員的首選編程語言。VB是Microsoft的一種通用程序設(shè)計(jì)語言，是在Windows操作平臺(tái)下設(shè)計(jì)應(yīng)用程序的最迅速、最簡介的工具之一。不論是初學(xué)者還是專業(yè)開發(fā)人員，VB都為他們提供一整套工具，可以輕松方便地開發(fā)應(yīng)用程序。利用VB 的數(shù)據(jù)訪問特性，用戶可對(duì)包括Micorosoft SQL Server和其他企業(yè)數(shù)據(jù)庫在的大部分?jǐn)?shù)據(jù)庫格式創(chuàng)建數(shù)據(jù)庫和前端應(yīng)用程序，以及可調(diào)整的服務(wù)器端部件。利用ActiveX技術(shù)，VB可使用如Microsoft Word 字處理器及其他應(yīng)用程序提供的功能，甚至可以直接使用VB

21、專業(yè)版或企業(yè)版創(chuàng)建的應(yīng)用程序和對(duì)象。用戶最終創(chuàng)建的程序是一個(gè)真正的.exe文件。2.4.2 SQL Server 2000的簡介SQL Server 2000是新一代大型關(guān)系型數(shù)據(jù)庫管理系統(tǒng)（DBMS），它在電子商務(wù)、數(shù)據(jù)倉庫和數(shù)據(jù)庫解決方案等應(yīng)用中起著重要的核心作用，為企業(yè)的數(shù)據(jù)管理提供強(qiáng)大的支持，對(duì)數(shù)據(jù)庫中的數(shù)據(jù)提供有效的管理，并采用有效的措施實(shí)現(xiàn)數(shù)據(jù)的完整性及數(shù)據(jù)的安全性。SQL Server 2000是一個(gè)基于客戶機(jī)/服務(wù)器（C/S）模式的關(guān)系數(shù)據(jù)庫管理系統(tǒng)，如圖2-2所示。客戶應(yīng)用程序提交SQL 查詢結(jié)果返回前臺(tái)客戶端服務(wù)器SQL Server 2000SQL Server 2000

22、圖2-2SQL Server 2000客戶機(jī)/服務(wù)器結(jié)構(gòu)示意圖SQL Server 2000采用C/S體系結(jié)構(gòu)把所有的工作負(fù)荷分解為服務(wù)器上的任務(wù)和客戶機(jī)上的任務(wù)，客戶機(jī)應(yīng)用程序負(fù)責(zé)商業(yè)邏輯和向用戶提供數(shù)據(jù)，服務(wù)器對(duì)數(shù)據(jù)庫的數(shù)據(jù)進(jìn)行操作和管理。客戶端（又稱為前臺(tái)）應(yīng)用程序包含顯示與用戶交互的界面，而對(duì)數(shù)據(jù)庫中數(shù)據(jù)進(jìn)行的處理描述成 Transat-SQL語句（簡稱為T-SQL語句），并將T-SQL語句語句送至服務(wù)器端（又稱為后臺(tái)），后臺(tái)的SQL Server執(zhí)行該T-SQL語句后，產(chǎn)生查詢結(jié)果，并將結(jié)果返回給客戶端的應(yīng)用程序。T-SQL是SQL Server 2000使用的一種數(shù)據(jù)庫查詢和編程語

23、言，它除包含標(biāo)準(zhǔn)的SQL語句外，還增加了一些標(biāo)準(zhǔn)的SQL語句外，還增加了一些非標(biāo)準(zhǔn)的SQL語句，使其功能更強(qiáng)大。使用T-SQL語句可建立、修改、查詢和管理關(guān)系數(shù)據(jù)庫。2.4.3ADO控件的介紹ADO是ActiveX數(shù)據(jù)對(duì)象（ActiveX Data Object）的英文縮寫，這是Microsoft開發(fā)數(shù)據(jù)庫應(yīng)用程序的面向?qū)ο蟮男陆涌?。ADO訪問數(shù)據(jù)庫是通過OLE DB 數(shù)據(jù)提供程序來進(jìn)行的，提供了一種對(duì) OLE DB 數(shù)據(jù)提供程序的簡單高層訪問接口。其中主要的對(duì)象如下：1.Connection對(duì)象Connection對(duì)象代表與數(shù)據(jù)源進(jìn)行的唯一會(huì)話，可以和mand對(duì)象、Recordset對(duì)象間建

24、立關(guān)聯(lián)，也可以使用一個(gè)Connection對(duì)象的實(shí)例，并在多個(gè)mand和Recordset對(duì)象共享。2.Recordset對(duì)象利用ADO的所有對(duì)象中，Recordset對(duì)象是使用最多的，它包含從數(shù)據(jù)庫查詢返回的數(shù)據(jù)行組。利用這個(gè)對(duì)象可以在數(shù)據(jù)庫檢索、插入、修改和刪除信息。3. mand對(duì)象 使用mand對(duì)象查詢并返回Recordset對(duì)象中的記錄，以便執(zhí)行大量操作或處理數(shù)據(jù)庫結(jié)夠。4.Field對(duì)象 Recordset對(duì)象含有Field對(duì)象組成的Fields集合。每一個(gè)Field對(duì)象對(duì)應(yīng)于Recordset對(duì)象中的一列。2.4.4ADO控件的綁定控件l ADODC控件ADODC控件也稱為ADO

25、 Data控件，使用Microsoft ActiveX數(shù)據(jù)對(duì)象來快速建立數(shù)據(jù)綁定控件和數(shù)據(jù)提供者之間的連接。ADODC控件的主要用法有：1.連接一個(gè)本地?cái)?shù)據(jù)庫或遠(yuǎn)程數(shù)據(jù)庫。2.打開一個(gè)指定的數(shù)據(jù)表，或定義一個(gè)基于結(jié)構(gòu)化查詢語言的查詢、或存儲(chǔ)過程、或該數(shù)據(jù)庫中的表的視圖的記錄集合。3 .將數(shù)據(jù)字段的數(shù)值傳遞給數(shù)據(jù)綁定的控件或在這些控件中顯示或更改這些數(shù)值。4.添加新的記錄或跟據(jù)對(duì)顯示在綁定的控件中的數(shù)據(jù)的任何更改來更新一個(gè)數(shù)據(jù)庫。l DataGrid控件DataGrid控件是一種類似于電子數(shù)據(jù)表的數(shù)據(jù)綁定控件，可以通過綁定到ADODC控件和一系列行及列來顯示Recordset對(duì)象的記錄及字段值。

26、DataGrid控件提供了文本編輯功能，在DataGrid控件中編輯單元格容之后，可以自動(dòng)更新到數(shù)據(jù)庫中，而無須編寫任何代碼。2.4.5 連接數(shù)據(jù)庫為了提高代碼的可讀性，本系統(tǒng)將連接數(shù)據(jù)庫的程序代碼放置在模塊中。使用ADO前要添加對(duì)ADO對(duì)象的應(yīng)用。在菜單中選擇“工程”-“引用”，出現(xiàn)如圖2-3所示的對(duì)話框，在“可用的引用”列表框中選擇“Micosoft ActiveX Objects 2.6 Library”選項(xiàng)，然后單擊“確定”按鈕，即可完成對(duì)ADO的引用。圖2-3對(duì)ADO的引用第3章 系統(tǒng)設(shè)計(jì)3.1 系統(tǒng)功能模塊劃分根據(jù)上述的系統(tǒng)總體設(shè)計(jì)思想的分析，本系統(tǒng)主要?jiǎng)澐譃橐韵聨讉€(gè)子模塊：系統(tǒng)管

27、理、信息管理、信息服務(wù)和信息查詢。主要的系統(tǒng)模塊如下圖3-1所示?？蛻粜畔⒐芾硐到y(tǒng)系統(tǒng)管理信息管理信息服務(wù)信息查詢圖3-1系統(tǒng)模塊圖3.2 系統(tǒng)功能模塊介紹1系統(tǒng)管理系統(tǒng)管理應(yīng)該包括用戶管理，口令修改，數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)。在用戶管理中可以增加 、注冊(cè)、 和刪除用戶。數(shù)據(jù)備份則可以備份數(shù)據(jù)庫的容，數(shù)據(jù)恢復(fù)則可以恢復(fù)數(shù)據(jù)庫。2信息管理在信息管理中有客戶信息維護(hù)，客戶信息反饋，工作日程安排?？蛻粜畔⒕S護(hù)中可以添加，刪除，保存用戶?？蛻粜畔⒎答伜凸ぷ魅粘贪才胖幸灿写斯δ堋?信息服務(wù)信息服務(wù)可以發(fā)送電子，查詢電子信息，信息提醒則可以時(shí)刻提醒用戶的安排。4信息查詢信息查詢包括客戶基本信息查詢，客戶反饋信息

28、查詢。3.3 設(shè)計(jì)和創(chuàng)建數(shù)據(jù)庫數(shù)據(jù)庫應(yīng)用系統(tǒng)設(shè)計(jì)中的一個(gè)核心問題就是如何設(shè)計(jì)一個(gè)能夠滿足用戶當(dāng)前與可預(yù)見的未來的各項(xiàng)應(yīng)用要求、性能良好的數(shù)據(jù)庫。數(shù)據(jù)庫設(shè)計(jì)是從用戶的數(shù)據(jù)需求、處理要求及建立數(shù)據(jù)庫的環(huán)境條件出發(fā)，把給定的應(yīng)用環(huán)境存在的數(shù)據(jù)合理地組織起來，逐步抽象成已經(jīng)選定的某個(gè)數(shù)據(jù)庫管理系統(tǒng)能夠定義和描述的具體的數(shù)據(jù)結(jié)構(gòu)的過程。3.3.1 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)客觀存在并可相互區(qū)別的事物稱為實(shí)體。在此模型中如用戶，產(chǎn)品等都是實(shí)體。實(shí)體所就有某一特性成為屬性。一個(gè)實(shí)體可以有如干個(gè)屬性來刻畫。在顯示世界中，事物部以及事物之間是有聯(lián)系的，這些聯(lián)系在信息世界中反映為實(shí)體型部的聯(lián)系和實(shí)體型外部的聯(lián)系。E-R圖

29、提供了表示實(shí)體型、屬性和聯(lián)系的方法：1. 實(shí)體型：用矩形表示，矩形框?qū)懨鲗?shí)體名2. 屬性：用橢圓形表示，并用無向邊將其與相應(yīng)的實(shí)體連接起來。3. 聯(lián)系：用菱形表示，菱形框?qū)懨髀?lián)系名，并用無向邊分別與有關(guān)實(shí)體連接起來。根據(jù)分析E-R圖如下：系統(tǒng)用戶用戶名密碼3-2系統(tǒng)用戶實(shí)體屬性圖客 戶傳真客戶編號(hào)姓 名地址3-3客戶實(shí)體屬性圖產(chǎn)品產(chǎn)品編號(hào)產(chǎn)品名稱單價(jià)備注3-4商品實(shí)體屬性圖總的E-R圖如下：用戶用戶名密碼管理維護(hù)客戶編號(hào)傳真客戶名稱郵編編號(hào)客戶名稱聯(lián)系錄入產(chǎn)品產(chǎn)品名稱產(chǎn)品價(jià)格編號(hào)11n1mn3-5 E-R圖3.3.2 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)通過對(duì)數(shù)據(jù)庫的概念設(shè)計(jì)，應(yīng)當(dāng)已經(jīng)清楚地知道系統(tǒng)需要的數(shù)據(jù)表

30、的個(gè)數(shù)和結(jié)構(gòu)。下一步就可以將概念設(shè)計(jì)轉(zhuǎn)化為邏輯結(jié)構(gòu)設(shè)計(jì)。下面對(duì)數(shù)據(jù)庫中用到的主要的表做詳細(xì)的介紹。1. 客戶信息維護(hù)數(shù)據(jù)表客戶信息維護(hù)數(shù)據(jù)表用于保存與企業(yè)有業(yè)務(wù)往來的客戶信息，該數(shù)據(jù)表記錄了一些客戶的基本信息。表3-1客戶信息表（tb_Buyer_Tab）字段名數(shù)據(jù)類型長度描述MR_IDdecimal9編號(hào)MR_Namenvarchar50客戶名稱MR_Telnvarchar50MR_Faxnvarchar50傳真MR_Ealinvarchar100E_mailMR_EaliIDint4郵編MR_NerAddressnvarchar100網(wǎng)址MR_Addressnvarchar100聯(lián)系地址M

31、R_Typenvarchar20客戶類型MR_Soursenvarchar20客戶來源MR_Areanvarchar20所屬區(qū)域Datesdatetime8錄入日期MR_Memonvarchar100備注2.tb_LinkMan_Tab(聯(lián)系人信息數(shù)據(jù)表)聯(lián)系人信息數(shù)據(jù)表記錄著企業(yè)客戶中的聯(lián)系人信息，企業(yè)通過聯(lián)系人信息表中的聯(lián)系方式與客戶取得聯(lián)系，與客戶之間實(shí)現(xiàn)信息溝通，進(jìn)行業(yè)務(wù)往來。表3-2聯(lián)系人數(shù)據(jù)表（tb_LinkMan_Tab）字段名數(shù)據(jù)類型長度描述MR_DIDnumeric9編號(hào)MR_Namenvarchar20MR_ClientNamenvarchar20客戶名稱MR_Telnva

32、rchar20聯(lián)系MR_Ealinvarchar20E_mailMR_Addressnvarchar50聯(lián)系地址MR_Memovarbinary50備注3.用戶表用戶表里存放了用戶名和密碼，只有在用戶名和密碼正確的時(shí)候才能登錄系統(tǒng)進(jìn)入主界面。表3-3用戶表（tb_User）字段名數(shù)據(jù)類型長度描述bhnumeric9編號(hào)xmvarchar50用戶名qxvarchar50權(quán)限mmvarchar50密碼4.產(chǎn)品信息數(shù)據(jù)表（tb_Product_Tab）產(chǎn)品信息數(shù)據(jù)表記錄著企業(yè)客戶所生產(chǎn)或經(jīng)營的產(chǎn)品信息，如產(chǎn)品的名稱 、單價(jià)等。表3-4 tb_Product_Tab字段名數(shù)據(jù)類型長度描述MR_IDnu

33、meric9編號(hào)MR_Codenvarchar10產(chǎn)品編號(hào)MR_Namenvarchar20產(chǎn)品名稱MR_Picefloat產(chǎn)品價(jià)格MR_Memonvarchar20備注5.客戶反饋表（tb_khfk）客戶反饋表用來存放客戶對(duì)產(chǎn)品的滿意程度。如產(chǎn)品的名稱，客戶的滿意程度、時(shí)間和備注。表3-5 tb_khfk字段名數(shù)據(jù)類型 長度描述IDnumeric9編號(hào)khmcvarchar50客戶名稱mycdvarchar50滿意程度SJdatetime8時(shí)間BZtext16備注6.客戶來源表(tb_Source_Tab)在客戶來源表中主要記錄了客戶的來源信息。表3-6 tb_Source_Tab字段名數(shù)據(jù)

34、類型長度描述MR_IDnumeric9編號(hào)MR_Namenvarchar50來源名稱MR_Memonvarchar50備注3.3.3 創(chuàng)建數(shù)據(jù)庫打開 SQL Server 2000中的企業(yè)管理器，在數(shù)據(jù)庫上右鍵單擊選擇新建，輸入數(shù)據(jù)庫的名稱。給據(jù)上面設(shè)置的表的有關(guān)容進(jìn)行建表。這里所用的數(shù)據(jù)庫名為db_Cservice1,然后在所建的數(shù)據(jù)庫上單擊右鍵選擇新建表。這樣就可以建好我們所用的數(shù)據(jù)庫。建好表后要備份數(shù)據(jù)庫以免信息的丟失。第4章 詳細(xì)設(shè)計(jì)及實(shí)現(xiàn)4.1 程序流程圖開始客戶信息管理系統(tǒng)身份驗(yàn)證是否正確NY主界面1. 系統(tǒng)管理2. 信息管理3. 信息服務(wù)4. 信息查詢選擇用戶管理口令修改客戶信息

35、維護(hù)工作日程安排發(fā)送信息提醒客戶信息查詢結(jié)束4-1流程圖4.2 公共模塊的設(shè)計(jì)連接數(shù)據(jù)庫的代碼如下在模塊Module1中定義了連接字符串的在模塊Module1中定義了連接字符串的變量PublicStr 、記錄集對(duì)象Recordset 、記錄登錄用戶名變量Name1、函數(shù) n。模塊中定義的全局變量如下：Public PublicStr As String '連接數(shù)據(jù)庫字符串變量Public FrmStrs As String '記錄已經(jīng)打開的窗體名稱變量'數(shù)據(jù)連接模塊Public Name1 As StringPublic AdoRs As New ADODB.Recor

36、dset '后添加一個(gè)記錄集Public AdoRs1 As New ADODB.RecordsetPublic AdoRs2 As New ADODB.Recordset用戶自定義一個(gè)函數(shù)，在該函數(shù)中設(shè)置一個(gè)連接字符串。在執(zhí)行與數(shù)據(jù)庫相關(guān)的操作時(shí)調(diào)用該函數(shù)，使應(yīng)用程序連接到數(shù)據(jù)庫。用戶自定義的函數(shù)n的程序代碼如下：Public Function n() As ADODB.Connection '定義連接字符串函數(shù) Set n = New ADODB.Connectionn.Open"Provider=SQLOLEDB.1;PersistSecurityInfo=Fa

37、lse;UserID=sa;Initial Catalog=db_Cservice1 " '使用Connection對(duì)象的Open方法 連接數(shù)據(jù)庫End Function4.3 主界面的設(shè)計(jì)1.概述系統(tǒng)主窗體是操作應(yīng)用程序的入口，通過操作主窗體可以控制系統(tǒng)中其他子窗體的運(yùn)行，從而完成相應(yīng)的操作。本系統(tǒng)的主窗體設(shè)計(jì)比較簡單，主要有菜單欄和狀態(tài)條組成。通過菜單欄控制程序中子功能窗體的運(yùn)行，通過狀態(tài)欄記錄系統(tǒng)中的一些基本信息，如登錄操作員、系統(tǒng)日期等信息。系統(tǒng)主窗體的運(yùn)行效果如圖4-2所示：圖4-2系統(tǒng)主窗體2.設(shè)計(jì)主窗口是（frmMain MDIForm）是客戶信息管理系統(tǒng)的主要

38、窗口，擔(dān)任著調(diào)動(dòng)其他模塊的功能，是整個(gè)應(yīng)用程序的核心。在工程中添加一個(gè)窗體，命名為frmMain。frmMain MDIForm主窗口是整個(gè)應(yīng)用系統(tǒng)的容器。為了方便用戶的使用，特地設(shè)計(jì)了菜單。菜單編輯器對(duì)話框如圖4-3所示。圖4-3菜單編輯器對(duì)話框在主界面中主要用到了菜單編輯器、時(shí)間控件和狀態(tài)條。通過菜單欄控制程序中子功能窗體的運(yùn)行，通過狀態(tài)條記錄系統(tǒng)中的一些基本信息，如登錄操作員、系統(tǒng)日期等信息。其主要的代碼如下：Private Sub YHGL_Click()點(diǎn)擊用戶管理菜單顯示用戶管理界面frm_yhgl.ShowEnd Sub在窗體上添加兩個(gè)Timer控件，一個(gè)用于顯示系統(tǒng)操作的時(shí)間，

39、另一個(gè)用于實(shí)時(shí)監(jiān)測(cè)是否有提醒的信息，如果有則顯示信息提醒窗體。程序的代碼如下：Private Sub Timer1_Timer()StatusBar1.Panels(4).Text = Format(Now, " hh點(diǎn)mm分ss秒")狀態(tài)條顯示時(shí)間End SubPrivate Sub Timer2_Timer()rs.Open "select * from tb_bwl where 提醒日期='" & Date & "'", n, adOpenKeyset If rs.RecordCount >

40、 0 Then frm_某tx.Show Timer2.Enabled = False End If rs.CloseEnd Sub4.4 登錄模塊的設(shè)計(jì)1.概述我們要想進(jìn)入系統(tǒng)就必修通過此界面，這是整個(gè)程序的入口。要想運(yùn)行系統(tǒng)只有輸入正確的用戶名和密碼后就可以登錄到主頁面中，在密碼不正確的情況下會(huì)提示您重新輸入。所以用戶登錄界面是整個(gè)系統(tǒng)的入口，我們要記住用戶的名稱和密碼。運(yùn)行的界面如圖4-4所示。圖4-4用戶登錄窗體2.設(shè)計(jì)在系統(tǒng)登錄界面中主要用到了組合框（boBox）和文本框(Textbox)和兩個(gè)按鈕（mndbutton）。組合框是一種同時(shí)具有文本框和列表框特性的控件。它可以向列表框一

41、樣，讓用戶通過鼠標(biāo)選擇所需要的項(xiàng)目，也可以向文本框那樣，用輸入的方式添加項(xiàng)目。在此模塊中我們用組合框來輸入或填充系統(tǒng)用戶名，用文本框來輸入用戶的密碼。主要代碼如下：本模塊中用到的主要代碼如下.'用戶登錄按鈕的事件代碼Private Sub Cmd_Ok_Click()Dim MPassword As String AdoRs.Open "select * from tb_User where xm ='" & Cbx_Name.Text & "'", n, adOpenKeyset If AdoRs.RecordC

42、ount > 0 Then MPassword = AdoRs.Fields("mm")If Txt_Password.Text = MPassword Then '判斷數(shù)據(jù)的密碼是否正確 Name1 = Cbx_Name.Text frmMain.StatusBar1.Panels.Item(2).Text = "當(dāng)前操作員 " + AdoRs.Fields("xm") frmMain.Show '通過身份驗(yàn)證則顯示主窗體，登錄到系統(tǒng)當(dāng)中 Unload Me Else MsgBox "密碼不正確請(qǐng)您確

43、認(rèn)后重新輸入", , "提示信息" Txt_Password.Text = "" Txt_Password.SetFocus End If Else MsgBox "對(duì)不起沒有此用戶的信息", , "提示信息" Cbx_Name.Text = "" Txt_Password.Text = "" End If AdoRs.CloseEnd Sub取消按鈕的代碼如下Private Sub Cmd_Cancel_Click() EndEnd Sub4.5 系統(tǒng)管理模塊設(shè)計(jì)

44、系統(tǒng)功能模塊分為用戶管理、口令修改、數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)三個(gè)子模塊，其中用戶管理模塊和數(shù)據(jù)備份模塊是很重要的。表4-1用戶管理模塊用例表控件的名稱功能描述增加（mand1）需要填寫用戶名、用戶的角色和用戶的密碼用戶的注冊(cè)（Cmd_Add）當(dāng)填寫完用戶的信息后點(diǎn)擊注冊(cè)，該用戶的信息就保存到數(shù)據(jù)庫表中了用戶的刪除（Cmd_Del）點(diǎn)擊不想要的用戶輸入確認(rèn)密碼后點(diǎn)擊刪除按鈕該用戶就可刪除表4-2口令修改模塊用例表控件的名稱功能描述確認(rèn)（mand1）填寫完用戶名、舊密碼和兩次新密碼后，單擊確認(rèn)按鈕該密碼就修改完成取消（mand2）不想修改密碼時(shí)單擊取消按鈕即可表4-3數(shù)據(jù)備份功能模塊用例表控件的名稱功能

45、描述選擇（Cmd_Select）通過此按鈕可以選擇要備份的文件的路徑進(jìn)度條（ProgressBar1）顯示數(shù)據(jù)備份的進(jìn)度開始備份（Cmd_BackUp）選擇好路徑后點(diǎn)擊此按鈕就開始備份數(shù)據(jù)了，這也是此系統(tǒng)模塊中最中要的退出（Cmd_Cancel）點(diǎn)擊此按鈕就可以退出備份系統(tǒng)管理模塊結(jié)構(gòu)圖如圖4-5所示。系統(tǒng)管理用戶管理口令修改數(shù)據(jù)備份數(shù)據(jù)恢復(fù)圖4-5系統(tǒng)管理模塊圖4.5.1 用戶管理的設(shè)計(jì)1.概述用戶管理主要包括用戶的增加、注冊(cè)和刪除。在此頁面中可以實(shí)現(xiàn)用戶的增加、注冊(cè)和刪除。當(dāng)輸入的用戶信息不完整和用戶已經(jīng)存在的情況下都不能注冊(cè)。在增加用戶時(shí)不能增加、刪除用戶時(shí)不能刪除當(dāng)前用戶。用戶管理模塊

46、的運(yùn)行圖如圖4-6所示：圖4-6用戶管理窗體2.設(shè)計(jì)在此界面中用到了Listview,Frame,TextBox和mndbutton（命令按鈕）。我們?cè)敿?xì)的介紹Listview 控件。Listview 控件可以顯示4中不同的視圖顯示項(xiàng)目，其中有大小圖標(biāo)，列表和報(bào)表。通過該控件，可顯示項(xiàng)目組。Listview不是標(biāo)準(zhǔn)的Visual Basic控件，需要通過選擇“工程-部件”菜單選項(xiàng)，在打開的對(duì)話框中勾選“Microdoft Windows momn Cortrols(6.0)”將其添加到工具箱中。 單擊增加按鈕就可以在可以輸入用戶名，角色、用戶密碼和確認(rèn)密碼。增加完信息后要單擊注冊(cè)按鈕。如果想刪

47、除用戶在選擇要?jiǎng)h除的用戶后就可刪除。其主要的代碼如下：Private Sub Cmd_del_Click() If Text1.Text = Name1 Then '如果是當(dāng)前登錄的用戶名，則不允許刪除MsgBox "不能刪除當(dāng)前用戶名!", 48, "提示信息" Else A = MsgBox("您確認(rèn)要?jiǎng)h除當(dāng)前用戶嗎?", 17, "刪除用戶信息提示") If A = vbOK Then AdoRs1.Open "select * from tb_user where xm='&quo

48、t; + Text1.Text + "'", n, adOpenKeyset If AdoRs1.RecordCount > 0 Then Set AdoRs1 = n.Execute("Delete tb_user from tb_user wher xm='"&Text1.Text&"'") '如果數(shù)據(jù)庫中存在該用戶信息，則將其刪除 MsgBox "用戶信息刪除成功¦", 64, "刪除用戶信息提示" Call ListLoad

49、 Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Text1.SetFocus Else MsgBox "當(dāng)前數(shù)據(jù)庫中沒有可刪除的用戶信息", , "信息提示" End If End If End IfEnd Sub4.5.2口令修改的設(shè)計(jì)1.概述在此程序中我們可以實(shí)現(xiàn)密碼的修改，在修改密碼是我們要輸入用戶名，舊密碼，和新密碼。在這里我們運(yùn)行此界面，運(yùn)行的界面如圖4-7所示。圖4-7密碼修改運(yùn)行界

50、面2.設(shè)計(jì)當(dāng)用戶登錄到系統(tǒng)時(shí)就可以進(jìn)行口令修改的操作了。如果用戶在請(qǐng)輸入用戶名的文本框中輸入用戶名，則系統(tǒng)將會(huì)在數(shù)據(jù)庫的系統(tǒng)用戶表中進(jìn)行查詢，以確定是否存在相應(yīng)的用戶名。如果找到此用戶名，然后在文本框中輸入舊密碼，輸入舊密碼。如果輸入的舊密碼與數(shù)據(jù)庫表中的一致就可以添加新密碼了。這時(shí)我們需要再輸入一次新密碼。點(diǎn)擊確定按鈕密碼就修改成功了，如果不想修改就可以點(diǎn)擊取消按鈕。確定按鈕的代碼如下：Private Sub mand1_Click() If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = &quo

51、t;" Or Text5.Text = "" ThenMsgBox "輸入不能為空!", 48, "提示信息" Else '判斷輸入的用戶名在數(shù)據(jù)庫是否存在 AdoRs.Open "select * from tb_user where mm ='" & Text1.Text & "' and xm='" + Text5.Text + "'", n, adOpenKeyset If AdoRs.RecordCo

52、unt > 0 Then IfText2.Text<>Text3.TextThen '判斷輸入的密碼是否正確 MsgBox "兩次輸入的密碼不一致，請(qǐng)您確認(rèn)以后重新輸入。", 48, "提示信息" Text2.Text = "" Text3.Text = "" Text2.SetFocus Else '如果輸入正確的密碼則修改密碼 Set AdoRs1 = n.Execute("UPDATE tb_user SET mm= '" + Text3.Text

53、 + "' where xm='" + Text5.Text + "'") MsgBox "密碼修改成功請(qǐng)您記住新密碼", , "提示信息" Unload Me End If Else MsgBox "沒有此用戶的信息或者您輸入的原密碼錯(cuò)誤，請(qǐng)您確認(rèn)后重新輸入", 48, "提示信息" Text1.Text = ""Text2.Text = "" Text3.Text = "" Text5.T

54、ext = "" Text5.SetFocus End If AdoRs.Close End IfEnd Sub4.6 信息管理設(shè)計(jì)在此模塊中包括客戶信息維護(hù)、客戶信息反饋和工作日程安排。個(gè)子模塊中的功能及用到的主要的控件見下列表格。在此模塊中用戶可以對(duì)客戶的信息及客戶的反饋信息進(jìn)行維護(hù)，包括客戶的添加、保存、刪除等。表4-4客戶信息維護(hù)模塊用列表控件的名稱功能描述（SSTab1）用來顯示客戶資料包括客戶名稱、聯(lián)系和電子等。（SSTab2）用來顯示聯(lián)系人如、客戶名稱和聯(lián)系等。(SSTab3)用來顯示產(chǎn)品報(bào)價(jià)包括產(chǎn)品編號(hào)、產(chǎn)品名稱和產(chǎn)品價(jià)格（Toolbar1）用來實(shí)現(xiàn)添加、保

55、存和刪除表4-5客戶反饋模塊用例表控件的名稱功能描述（Text1）填寫用戶的名稱（boBox）選擇用戶的滿意程度（DataGrid1）通過與數(shù)據(jù)庫相連獲取表的信息（mandbutton）實(shí)現(xiàn)客戶反饋的添加、保存和刪除表4-6工作日程安排模塊表控件的名稱功能描述（Toolbar1）用來實(shí)現(xiàn)添加、保存和刪除（DataGrid1）通過與數(shù)據(jù)庫相連獲取表的信息表4-7客戶信息添加模塊表控件的名稱功能描述(Textbox)主要用來填寫客戶的基本信息，包括客戶的名稱和聯(lián)系等。(boBox)選擇客戶的詳細(xì)信息，包括客戶類型，客戶來源和客戶所屬的區(qū)域。信息管理的模塊圖如下：客戶信息維護(hù)客戶信息維護(hù)客戶信息反饋工作日程安排