家政服務(wù)信息管理系統(tǒng)

基于VB的家政服務(wù)信息管理系統(tǒng)摘要家政服務(wù)管理系統(tǒng)是典型的信息管理系統(tǒng)(MIS),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個方面.對于前者要求建立數(shù)據(jù)一致性和完整性強(qiáng),數(shù)據(jù)安全性好的數(shù)據(jù)庫.而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。隨著計(jì)算機(jī)技術(shù)的高速發(fā)展，人們對計(jì)算機(jī)的依賴性越來越強(qiáng)，特別是用計(jì)算機(jī)開發(fā)的數(shù)據(jù)庫以及數(shù)據(jù)管理系統(tǒng)在生活應(yīng)用中表現(xiàn)得更為突出，為此開發(fā)此系統(tǒng)。通過使用家政服務(wù)管理系統(tǒng)，使家政服務(wù)店的管理工作系統(tǒng)化、規(guī)范化、自動化、簡易化、智能化，從而達(dá)到提高家政服務(wù)管理效率的目的。系統(tǒng)開發(fā)采用Microsoft公司的VisualFoxpro6.0，利用其強(qiáng)大的可視化界面功能及對數(shù)據(jù)庫的支持，先構(gòu)造一個原型，逐步增加功能，最終滿足需求。關(guān)鍵詞：家政服務(wù)VB管理系統(tǒng)目錄1緒論………………52系統(tǒng)分析…………72.1開發(fā)背景…………72.2MIS概述…………72.21MIS的概念及解釋…………72.22MIS的結(jié)構(gòu)特征……………82.23MIS的開發(fā)…………………92.3系統(tǒng)功能設(shè)計(jì)…………………112.4數(shù)據(jù)庫設(shè)計(jì)……………………122.41SQL2000數(shù)據(jù)庫簡介……………………122.42創(chuàng)建數(shù)據(jù)庫………………122.5開發(fā)平臺……………………172.51系統(tǒng)的實(shí)現(xiàn)平臺…………172.52開發(fā)工具的選擇…………172.53VB概述……………………173系統(tǒng)實(shí)現(xiàn)…………213.1登陸界面………………………213.2首頁頁面介紹…………………223.3菜單功能說明…………………233.3.1基本信息管理……………233.3.2客戶信息管理……………233.3.3客戶信息查詢……………3.3.4系統(tǒng)設(shè)置…………………293.3.5數(shù)據(jù)管理…………………334結(jié)論……………36致謝……………37參考文獻(xiàn)………………………381緒論

當(dāng)今企事業(yè)單位面對電子商務(wù)大潮和日益激烈的市場競爭環(huán)境，要想獲得持久的市場競爭力，就必須發(fā)展電子商務(wù)，企事業(yè)單位迫切希望通過進(jìn)一步強(qiáng)化企事業(yè)單位信息基礎(chǔ)建設(shè)，實(shí)現(xiàn)企事業(yè)單位經(jīng)營管理效率的有效提高。無論是電子商務(wù)還是知識經(jīng)濟(jì)，對企事業(yè)單位的競爭實(shí)力都提出了越來越高的要求。作為提高企事業(yè)單位機(jī)構(gòu)辦公管理效率的基礎(chǔ)平臺，近年來，家政服務(wù)信息系統(tǒng)得到廣大企事業(yè)單位機(jī)構(gòu)的高度重視，紛紛構(gòu)建起適合于自身應(yīng)用特色的家政服務(wù)信息系統(tǒng)（OA），通過家政服務(wù)信息系統(tǒng)的成功推廣，逐步提高中小企事業(yè)單位的工作效率，提升管理質(zhì)量，更好地向國際接軌。據(jù)此我們定制了本套智能化信息管理系統(tǒng)上家政服務(wù)信息系統(tǒng)。管理信息系統(tǒng)（ManagementInformationSystems簡稱MIS）在現(xiàn)代社會已深入到各行各業(yè)，由于計(jì)算機(jī)技術(shù)的迅速發(fā)展和普及，MIS事實(shí)上已成為計(jì)算機(jī)MIS。目前，由于開發(fā)高質(zhì)量MIS的能力大大落后計(jì)算機(jī)硬件日新月異的進(jìn)展，加上社會對MIS發(fā)展和完善需求的增加以及對MIS開發(fā)過程中出現(xiàn)的錯誤認(rèn)識和行為而導(dǎo)致MIS開發(fā)的失敗,這些情況已嚴(yán)重妨礙了計(jì)算機(jī)技術(shù)的進(jìn)步。因此對MIS有關(guān)的內(nèi)容進(jìn)行深入研究，提高工作效率，提高M(jìn)IS開發(fā)成功率已變得十分重要。我國企業(yè)MIS建設(shè)隨著國民經(jīng)濟(jì)信息化的進(jìn)展，進(jìn)入了一個新的階段。一些中大型企業(yè)搞MIS已有五到十年的經(jīng)驗(yàn)，不少新建企業(yè)正打算高起點(diǎn)地建立高水平的MIS。實(shí)際上，企業(yè)的信息系統(tǒng)集成化建設(shè)，也是國民經(jīng)濟(jì)信息化的有機(jī)組成部分。國際上，信息設(shè)備不斷降價，信息技術(shù)更加成熟，一大批企業(yè)在搞信息系統(tǒng)集成或重建；研究開發(fā)機(jī)構(gòu)適應(yīng)這種需要投入了很大力量，致力于解決信息系統(tǒng)集成的策略、方法和工具等問題；一些大的信息服務(wù)公司紛紛成立或加快發(fā)展，正在由設(shè)備供應(yīng)商變?yōu)樾畔⒓夹g(shù)和企業(yè)信息系統(tǒng)建設(shè)整體方案的咨詢服務(wù)者。這些都是我們可以借鑒、引進(jìn)和運(yùn)用的。實(shí)現(xiàn)"兩個根本轉(zhuǎn)變"為企業(yè)MIS建設(shè)帶來了新的壓力、新的動力和真正的機(jī)會。站在新一輪起飛點(diǎn)上的企業(yè)，要想用好新的機(jī)遇和新的環(huán)境條件搞好MIS建設(shè)，就要求業(yè)務(wù)領(lǐng)導(dǎo)和信息負(fù)責(zé)人、管理人員和開發(fā)人員進(jìn)一步提高信息化的認(rèn)識，轉(zhuǎn)變傳統(tǒng)的信息系統(tǒng)建設(shè)的思維，總結(jié)經(jīng)驗(yàn)與學(xué)習(xí)先進(jìn)理論相結(jié)合，發(fā)揮自身主動性與運(yùn)用技術(shù)市場相結(jié)合，明確提出企業(yè)信息化的概念和任務(wù)，搞好高層的構(gòu)思和總體規(guī)劃，并把它作為"九五"企業(yè)發(fā)展規(guī)劃的重要組成部分，組織有計(jì)劃、有步驟的開發(fā)實(shí)現(xiàn)。系統(tǒng)分析2.1開發(fā)背景隨著我國市場經(jīng)濟(jì)的快速發(fā)展和信息化水平的不斷提高，如何利用先進(jìn)的管理手段，提高企業(yè)員工信息管理的水平，是當(dāng)今社會所面臨的一個課題。提高企業(yè)管理水平，必須全方位地提高企業(yè)管理意識。只有高標(biāo)準(zhǔn)、高質(zhì)量的管理才能滿足企業(yè)的發(fā)展需求。面對信息時代的挑戰(zhàn)，利用高科技手段來提高企業(yè)員工信息管理無疑是一條行之有效的途徑。在某種意義上，信息與科技在企業(yè)管理與現(xiàn)代化建設(shè)中顯現(xiàn)出越來越重要的地位。員工管理方面的信息化與科學(xué)化，已成為現(xiàn)代化生活水平步入高臺階的重要標(biāo)志。2.2MIS概述2.21MIS的概念及解釋MIS是一個不斷發(fā)展的新型學(xué)科，MIS的定義隨著計(jì)算機(jī)技術(shù)和通訊技術(shù)的進(jìn)步也在不斷更新，在現(xiàn)階段普遍認(rèn)為MIS是由人和計(jì)算機(jī)設(shè)備或其他信息處理手段組成并用于管理信息的系統(tǒng)。MIS的對象就是信息。信息是經(jīng)過加工的數(shù)據(jù)，信息是對決策者有價值的數(shù)據(jù)。信息的主要特征是來源分散，數(shù)量龐大。信息來源于生產(chǎn)第一線，來源于社會環(huán)境，來源于市場，來源于行政管理等部門。信息具有時間性。信息的加工方式有多種形式。管理過程是信息流的過程，且具有信息反饋的特征。系統(tǒng)的組成：系統(tǒng)是由相互聯(lián)系、相互作用的若干要素按一定的法則組成并具有一定功能的整體。系統(tǒng)有兩個以上要素，各要素和整體之間，整體和環(huán)境之間存在一定的有機(jī)聯(lián)系。系統(tǒng)由輸入、處理、輸出、反饋、控制五個基本要素組成。信息系統(tǒng)是輸入的數(shù)據(jù)，經(jīng)過處理，輸出的是信息的系統(tǒng)。圖1MIS系統(tǒng)平臺管理信息的要素：管理信息由信息的采集、信息的傳遞、信息的儲存、信息的加工、信息的維護(hù)和信息的使用五個方面組成。任何地方只要有管理就必然有信息，如果形成系統(tǒng)就形成MIS。計(jì)算機(jī)設(shè)備使MIS更有效，尤其是現(xiàn)代社會，MIS已和計(jì)算機(jī)設(shè)備不可分離，因此一般來說MIS就是計(jì)算機(jī)MIS。MIS包括計(jì)算機(jī)、網(wǎng)絡(luò)通訊設(shè)備等硬件成份，包括操作系統(tǒng)、應(yīng)用軟件包等軟件成份。并隨著計(jì)算機(jī)技術(shù)和通訊技術(shù)的迅速發(fā)展還會出現(xiàn)更多的內(nèi)容。計(jì)算機(jī)設(shè)備并不是MIS的必要條件。2.22MIS的結(jié)構(gòu)特征MIS的結(jié)構(gòu)：MIS由信源、信宿、信息處理、信息用戶和信息管理者五個組成部分。MIS的特性：完善的MIS具有以下四個標(biāo)準(zhǔn)：確定的信息需求、信息的可采集與可加工、可以通過程序?yàn)楣芾砣藛T提供信息、可以對信息進(jìn)行管理。具有統(tǒng)一規(guī)劃的數(shù)據(jù)庫是MIS成熟的重要標(biāo)志，它象征著MIS是軟件工程的產(chǎn)物。通過MIS實(shí)現(xiàn)信息增值，用數(shù)學(xué)模型統(tǒng)計(jì)分析數(shù)據(jù)，實(shí)現(xiàn)輔助決策。MIS是發(fā)展變化的，MIS有生命周期。MIS的開發(fā)必須具有一定的科學(xué)管理工作基礎(chǔ)。只有在合理的管理體制、完善的規(guī)章制度、穩(wěn)定的生產(chǎn)秩序、科學(xué)的管理方法和準(zhǔn)確的原始數(shù)據(jù)的基礎(chǔ)上，才能進(jìn)行MIS的開發(fā)。因此，為適應(yīng)MIS的開發(fā)需求，企業(yè)管理工作必須逐步完善以下工作：管理工作的程序化，各部門都有相應(yīng)的作業(yè)流程。管理業(yè)務(wù)的標(biāo)準(zhǔn)化，各部門都有相應(yīng)的作業(yè)規(guī)范。報表文件的統(tǒng)一化，固定的內(nèi)容、周期、格式。數(shù)據(jù)資料的完善化和代碼化。MIS是一個交叉性綜合性學(xué)科，組成部分有：計(jì)算機(jī)學(xué)科（網(wǎng)絡(luò)通訊、數(shù)據(jù)庫、計(jì)算機(jī)語言等）、數(shù)學(xué)（統(tǒng)計(jì)學(xué)、運(yùn)籌學(xué)、線性規(guī)劃等）、管理學(xué)、仿真等多學(xué)科。隨著科學(xué)技術(shù)的高速發(fā)展，MIS涉及的范圍還要擴(kuò)大。MIS按組織職能可以劃分為辦公系統(tǒng)、決策系統(tǒng)、生產(chǎn)系統(tǒng)和信息系統(tǒng)。MIS基于信息處理層次進(jìn)行劃分為面向數(shù)量的執(zhí)行系統(tǒng)、面向價值的核算系統(tǒng)、報告監(jiān)控系統(tǒng)，分析信息系統(tǒng)、規(guī)劃決策系統(tǒng)，自底向上形成信息金字塔。第一代MIS是由手工操作，使用工具是文件柜、筆記本等。第二代MIS增加了機(jī)械輔助辦公設(shè)備，如打字機(jī)、收款機(jī)、自動記賬機(jī)等。第三代MIS使用計(jì)算機(jī)、電傳、電話、打印機(jī)等電子設(shè)備。隨著電信技術(shù)和計(jì)算機(jī)技術(shù)的飛速發(fā)展，現(xiàn)代MIS從地域上劃分已逐漸由局域范圍走向廣域范圍。MIS可以劃分為橫向綜合結(jié)構(gòu)和縱向綜合結(jié)構(gòu)，橫向綜合結(jié)構(gòu)指同一管理層次各種職能部門的綜合，如勞資、人事部門?？v向綜合結(jié)構(gòu)指具有某種職能的各管理層的業(yè)務(wù)組織在一起，如上下級的對口部門。2.23MIS的開發(fā)創(chuàng)新原則，體現(xiàn)先進(jìn)性。計(jì)算機(jī)技術(shù)的發(fā)展十分迅速，要及時了解新技術(shù)，使用新技術(shù)，使目標(biāo)系統(tǒng)較原系統(tǒng)有質(zhì)的飛躍。整體原則，體現(xiàn)完整性。企業(yè)管理可以理解為一個合理的‘閉環(huán)’系統(tǒng)。目標(biāo)系統(tǒng)應(yīng)當(dāng)是這個‘閉環(huán)’系統(tǒng)的完善。企業(yè)完整的實(shí)現(xiàn)計(jì)算機(jī)管理不一定必須在企業(yè)的各個方面同時實(shí)現(xiàn)，但必須完整的設(shè)計(jì)系統(tǒng)的各個方面。不斷發(fā)展原則，體現(xiàn)超前性。為了提高使用率，有效的發(fā)揮MIS的作用，應(yīng)當(dāng)注意技術(shù)的發(fā)展和環(huán)境的變化。MIS在開發(fā)過程中應(yīng)注重不斷發(fā)展和超前意識。經(jīng)濟(jì)原則，體現(xiàn)實(shí)用性。大而全和高精尖并不是成功MIS的衡量標(biāo)準(zhǔn)。事實(shí)上許多失敗的MIS正是由于盲目追求高新技術(shù)而忽視了其實(shí)用性。盲目追求完善的MIS而忽視了本單位的技術(shù)水平、管理水平和人員素質(zhì)。MIS的開發(fā)方式有自行開發(fā)、委托開發(fā)、聯(lián)合開發(fā)、購買現(xiàn)成軟件包進(jìn)行二次開發(fā)幾種形式。一般來說根據(jù)企業(yè)的技術(shù)力量、資源及外部環(huán)境而定。MIS的開發(fā)策略不可行的開發(fā)方法：組織結(jié)構(gòu)法，機(jī)械的按照現(xiàn)有組織機(jī)構(gòu)劃分系統(tǒng)，不考慮MIS的開發(fā)原則。數(shù)據(jù)庫法，開發(fā)人員從數(shù)據(jù)庫設(shè)計(jì)開始對現(xiàn)有系統(tǒng)進(jìn)行開發(fā)。想象系統(tǒng)發(fā)，開發(fā)人員基于對現(xiàn)有系統(tǒng)進(jìn)行想象為基礎(chǔ)進(jìn)行開發(fā)?？尚械拈_發(fā)方法：自上而下（Top—Down）,從企業(yè)管理的整體進(jìn)行設(shè)計(jì),逐漸從抽象到具體,從概要設(shè)計(jì)到詳細(xì)設(shè)計(jì),體現(xiàn)結(jié)構(gòu)化的設(shè)計(jì)思想。自下而上（Bottom—Up）,設(shè)計(jì)系統(tǒng)的構(gòu)件,采用搭積木的方式組成整個系統(tǒng),缺點(diǎn)在于忽視系統(tǒng)部件的有機(jī)聯(lián)系。兩者結(jié)合是實(shí)際開發(fā)過程中常用的方法。通過對系統(tǒng)進(jìn)行分析得到系統(tǒng)的邏輯模型,進(jìn)而從邏輯模型求得最優(yōu)的物理模型。邏輯模型和物理模型的這種螺旋式循環(huán)優(yōu)化的設(shè)計(jì)模式體現(xiàn)了自上而下、自下而上結(jié)合的設(shè)計(jì)思想。MIS的開發(fā)方法：完整實(shí)用的文檔資料是成功MIS的標(biāo)致?？茖W(xué)的開發(fā)過程從可行性研究開始，經(jīng)過系統(tǒng)分析、系統(tǒng)設(shè)計(jì)、系統(tǒng)實(shí)施等主要階段。每一個階段都應(yīng)有文檔資料，并且在開發(fā)過程中不斷完善和充實(shí)。目前使用的開發(fā)方法有以下兩種：瀑布模型（生命周期方法學(xué)）結(jié)構(gòu)分析、結(jié)構(gòu)設(shè)計(jì)，結(jié)構(gòu)程序設(shè)計(jì)（簡稱SA—SD—SP方法）用瀑布模型來模擬。各階段的工作自頂向下從抽象到具體順序進(jìn)行。瀑布模型意味著在生命周期各階段間存在著嚴(yán)格的順序且相互依存。瀑布模型是早期MIS設(shè)計(jì)的主要手段。快速原型法（面向?qū)ο蠓椒ǎ┛焖僭头ㄒ卜Q為面向?qū)ο蠓椒ㄊ墙陙磲槍Γ⊿A—SD—SP）的缺陷提出的設(shè)計(jì)新途徑，是適應(yīng)當(dāng)前計(jì)算機(jī)技術(shù)的進(jìn)步及對軟件需求的極大增長而出現(xiàn)的。是一種快速、靈活、交互式的軟件開發(fā)方法學(xué)。其核心是用交互的、快速建立起來的原型取代了形式的、僵硬的（不易修改的）大快的規(guī)格說明，用戶通過在計(jì)算機(jī)上實(shí)際運(yùn)行和試用原型而向開發(fā)者提供真實(shí)的反饋意見?？焖僭头ǖ膶?shí)現(xiàn)基礎(chǔ)之一是可視化的第四代語言的出現(xiàn)。兩種方法的結(jié)合。使用面向?qū)ο蠓椒ㄩ_發(fā)MIS時，工作重點(diǎn)在生命周期中的分析階段。分析階段得到的各種對象模型也適用于設(shè)計(jì)階段和實(shí)現(xiàn)階段。實(shí)踐證明兩種方法的結(jié)合是一種切實(shí)可行的有效方法。2.3系統(tǒng)功能設(shè)計(jì)系統(tǒng)流程信息錄入信息修改信息刪除公司內(nèi)部辦公信息管理系統(tǒng)主界面客戶信息管理基本信息管理系統(tǒng)登陸界面系統(tǒng)設(shè)置信息錄入信息修改信息刪除公司內(nèi)部辦公信息管理系統(tǒng)主界面客戶信息管理基本信息管理系統(tǒng)登陸界面系統(tǒng)設(shè)置信息查詢系統(tǒng)編號查詢名稱查詢信息查詢系統(tǒng)編號查詢名稱查詢地址查詢操作員設(shè)置操作員設(shè)置口令設(shè)置權(quán)限設(shè)置數(shù)據(jù)備份數(shù)據(jù)恢復(fù)數(shù)據(jù)備份數(shù)據(jù)恢復(fù)注銷退出數(shù)據(jù)管理圖2系統(tǒng)流程圖2.4數(shù)據(jù)庫設(shè)計(jì)2.41SQL2000數(shù)據(jù)庫簡介數(shù)據(jù)庫管理系統(tǒng)（DBMS）是指數(shù)據(jù)庫系統(tǒng)中管理數(shù)據(jù)的軟件系統(tǒng)。DBMS是數(shù)據(jù)庫系統(tǒng)的核心組成部分。對數(shù)據(jù)庫的一切操作，包括定義、更新及各種控制,都是通過DBMS進(jìn)行的。DBMS總是基于某種數(shù)據(jù)模型，可以把DBMS看成是某種數(shù)據(jù)模型在計(jì)算機(jī)系統(tǒng)上的具體實(shí)現(xiàn)。根據(jù)數(shù)據(jù)模型的不同，DBMS可以分成層次型、網(wǎng)狀型、關(guān)系型、面向?qū)ο笮偷?。MSSQLServer2000就是一種關(guān)系型數(shù)據(jù)庫管理系統(tǒng)。關(guān)系模型。關(guān)系模型主要是用二維表格結(jié)構(gòu)表達(dá)實(shí)體集，用外鍵表示實(shí)體間聯(lián)系。關(guān)系模型是由若干個關(guān)系模式組成的集合。關(guān)系模式相當(dāng)于前面提到的記錄類型，它的實(shí)例稱為關(guān)系，每個關(guān)系實(shí)際上是一張二維表格。關(guān)系模型和層次、網(wǎng)狀模型的最大判別是用關(guān)鍵碼而不是用指針導(dǎo)航數(shù)據(jù)，表格簡單用戶易懂，編程時并不涉及存儲結(jié)構(gòu)，訪問技術(shù)等細(xì)節(jié)。關(guān)系模型是數(shù)學(xué)化模型。SQL語言是關(guān)系數(shù)據(jù)庫的標(biāo)準(zhǔn)化語言，已得到了廣泛的應(yīng)用。DBMS的特點(diǎn)和功能可以分為三個子系統(tǒng)：設(shè)計(jì)工具子系統(tǒng)、運(yùn)行子系統(tǒng)和DBMS引擎。設(shè)計(jì)子系統(tǒng)有一個方便數(shù)據(jù)庫及其應(yīng)用創(chuàng)建的工具集。它典型地包含產(chǎn)生表、窗體、查詢和的工具。DBMS產(chǎn)品還提供編程語言和對編程語言的接口。運(yùn)行子系統(tǒng)處理用設(shè)計(jì)子系統(tǒng)開發(fā)的應(yīng)用組件。它所包含的運(yùn)行處理器用來處理窗體和數(shù)據(jù)庫的數(shù)據(jù)交互，以及回答查詢和打印等。DBMS引擎從其他兩個組件接受請求，并把它們翻譯成對操作系統(tǒng)的命令，以便讀寫物理介質(zhì)上的數(shù)據(jù)。DBMS引擎還涉及事務(wù)管理、鎖、備份和恢復(fù)。2.42創(chuàng)建數(shù)據(jù)庫數(shù)據(jù)庫模式定義了數(shù)據(jù)庫的結(jié)構(gòu)、表、關(guān)系、域和問題規(guī)則。數(shù)據(jù)庫模式是一種設(shè)計(jì)，數(shù)據(jù)庫和應(yīng)用正是建立在此基礎(chǔ)上的。域是一列可能擁有的值的集合。必須為每一個表的每一列確定域。除了數(shù)據(jù)的物理格式外，還需要確定是否有些域?qū)Ρ韥碚f是唯一的。數(shù)據(jù)庫模式的最后一個要素是問題規(guī)則，它是對需要反映在數(shù)據(jù)庫和數(shù)據(jù)庫應(yīng)用程序中的問題活動的約束。問題規(guī)則是模式的一個重要部分，因?yàn)樗麄冎付藷o論什么數(shù)據(jù)變化到達(dá)DBMS引擎，允許的數(shù)據(jù)值必須滿足的約束。不管無效的數(shù)據(jù)變化請求是來自窗體的用戶、查詢/修改請求還是應(yīng)用程序，DBMS都應(yīng)該拒絕。遺憾的是，不同的DBMS產(chǎn)品用不同的方法實(shí)施問題規(guī)則。在某些情況下，DBMS產(chǎn)品不具備實(shí)施必要問題規(guī)則的能力，必須以代碼形式把它們編入應(yīng)用程序。1．?dāng)?shù)據(jù)精確度由于采用數(shù)據(jù)庫技術(shù)并且用戶的應(yīng)用領(lǐng)域?qū)?shù)據(jù)精確度的要求不是太高，所以這點(diǎn)在系統(tǒng)中表現(xiàn)得比較少，但是用戶數(shù)據(jù)的安全性與正確性是完全保證的，所以對用戶的使用沒有多大的障礙。2．時間特性本產(chǎn)品用SQLServer2000網(wǎng)絡(luò)數(shù)據(jù)庫技術(shù)作為程序開發(fā)的底層數(shù)據(jù)庫，采用C/S數(shù)據(jù)庫結(jié)構(gòu)，對數(shù)據(jù)進(jìn)行合理有效的處理，所以程序在響應(yīng)時間，數(shù)據(jù)更新處理時間上性能是比較突出的3．適應(yīng)性該軟件是使用SQLserver和VB在windowsxp系統(tǒng)下完成的所以只要是兼容windows的軟件或是操作系統(tǒng)，該軟件都可以正確地運(yùn)行，有較好的適應(yīng)能力與兼容性。而且應(yīng)用戶的特殊需求軟件在完成后的維護(hù)階段可以保持一個與其他類軟件接口，隨時滿足用戶的使用要求。4．?dāng)?shù)據(jù)庫設(shè)計(jì)介紹如何設(shè)計(jì)本系統(tǒng)的數(shù)據(jù)庫，以及如何在計(jì)算機(jī)中實(shí)現(xiàn)。根據(jù)需求說明書，分析數(shù)據(jù)的特征，綜合考慮系統(tǒng)各個方面的功能需求，確定數(shù)據(jù)庫的概念結(jié)構(gòu)，邏輯結(jié)構(gòu)和物理結(jié)構(gòu)。數(shù)據(jù)流程圖如下：家政服務(wù)管理人員家政服務(wù)管理系統(tǒng)家政服務(wù)管理人員家政服務(wù)管理系統(tǒng)家政服務(wù)管理人員基本信息家政服務(wù)管理人員客戶信息信息報表服務(wù)信息圖3數(shù)據(jù)流程圖（2）數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)在數(shù)據(jù)庫設(shè)計(jì)中，先要對系統(tǒng)分析所得的數(shù)據(jù)字典中的數(shù)據(jù)存儲進(jìn)行分析，然后得出系統(tǒng)的關(guān)系模式，可以采用實(shí)體——聯(lián)系圖（簡稱E——R圖）的方法進(jìn)行數(shù)據(jù)結(jié)構(gòu)的描述。E——R圖由實(shí)體、屬性、聯(lián)系三部分組成。E——R圖的有關(guān)符號說明如下：實(shí)體屬性根據(jù)數(shù)據(jù)字典的內(nèi)容，得到本系統(tǒng)的實(shí)體——聯(lián)系圖如下：客戶客戶合同編號合同編號編號編號住宅電話住宅電話服務(wù)項(xiàng)目姓名服務(wù)項(xiàng)目姓名付款方式地址付款方式地址圖4實(shí)體聯(lián)系圖用戶用戶用戶名密碼用戶名密碼圖5用戶信息實(shí)體客戶客戶服務(wù)日期服務(wù)日期開始時間開始時間服務(wù)記錄

服務(wù)安排服務(wù)記錄

服務(wù)安排結(jié)束時間結(jié)束時間員工員工圖6系統(tǒng)內(nèi)主要實(shí)體間聯(lián)系根據(jù)系統(tǒng)需求分析和系統(tǒng)功能模塊結(jié)構(gòu)圖來看，該系統(tǒng)應(yīng)具備如下基本功能：客戶信息添加、修改和刪除功能服務(wù)反饋信息添加、修改和刪除功能客戶信息的查詢功能系統(tǒng)設(shè)置功能本系統(tǒng)涉及到的信息主要有5類：客戶信息、服務(wù)信息、系統(tǒng)使用信息。按以上分析，將系統(tǒng)的數(shù)據(jù)庫設(shè)計(jì)為三個：表1客戶信息：表1客戶信息表結(jié)構(gòu):編號字段名字段類型字段寬度是否為空1客戶編號Character12No2客戶姓名Character8No3證件名稱Character12No4證件編號Character18No5客戶地址Character30No6郵政編碼Character6No7客戶電話Character12No8傳真Character15No9業(yè)務(wù)聯(lián)系人Character8No10聯(lián)系人電話Character12No表2服務(wù)信息表2服務(wù)信息表結(jié)構(gòu)編號字段名字段類型字段寬度是否為空1服務(wù)項(xiàng)目Character30No2合同編號Character15No3生效日期Date8No4終止日期Date8No5服務(wù)地點(diǎn)Character30No6服務(wù)次數(shù)Character4No7記錄日期Character8No表3用戶使用信息表3用戶表結(jié)構(gòu)：字段編號字段名字段類型字段寬度是否為空1操作員Character12No2密碼Character8No3基本信息管理Character12No4客戶信息管理Character18No5系統(tǒng)設(shè)置Character30No6數(shù)據(jù)維護(hù)Character6No7客戶信息查詢Character12No2.5開發(fā)平臺2.51系統(tǒng)的實(shí)現(xiàn)平臺計(jì)算機(jī)的硬件建議最低配置如下：CPU300MHZ內(nèi)存32M硬盤8G操作系統(tǒng)win9x操作系統(tǒng)或更高2.52開發(fā)工具的選擇MicrosoftVisualBasic6.0作為前臺的開發(fā)工具，用SQL2000作為后臺支持?jǐn)?shù)據(jù)庫，通過VB6.0的數(shù)據(jù)庫控件來連接SQL2000中并對其編程來實(shí)現(xiàn)各種功能。，因?yàn)镾QL與VisualBasic用的同為MicrosoftJet數(shù)據(jù)庫引擎，有著最好的兼容性。2.53VB概述VisualBasic（以下簡稱VB）的前身是QBASIC，語言基礎(chǔ)是BASIC。自從微軟推出VB后，便成為了程序開發(fā)人員的首選工具。據(jù)統(tǒng)計(jì)，僅在數(shù)據(jù)庫系統(tǒng)開發(fā)領(lǐng)域，VB就占了90％的份額。VB是基于對象的可視化程序開發(fā)工具，它的優(yōu)點(diǎn)在于能夠快捷、簡易地建立Windows應(yīng)用程序。1998年8月，微軟推出了VB6.0的版本，進(jìn)一步加強(qiáng)了部件開發(fā)的功能。以適用人員來分，可有以下三個版本：1.標(biāo)準(zhǔn)版針對一般程序設(shè)計(jì)人員,適合普通應(yīng)用系統(tǒng)的開發(fā)。2.專業(yè)版針對專業(yè)程序開發(fā)人員，它在標(biāo)準(zhǔn)版的基礎(chǔ)上提供了對數(shù)據(jù)庫和Internet的支持。3.開發(fā)者版適用于專為開發(fā)者設(shè)計(jì)應(yīng)用軟件的程序開發(fā)人員。VisualBasic系統(tǒng)除了一般高級語言所具有的一些名詞術(shù)語外，還有幾個系統(tǒng)常用的名詞。其基本含義如下：視窗（Form）：視窗是進(jìn)行人機(jī)交互的界面或接口，也叫窗體。VB系統(tǒng)的人機(jī)交互界面或接口，無論是在設(shè)計(jì)時或是在運(yùn)行時，都是Windows系統(tǒng)的標(biāo)準(zhǔn)視窗。對象(Object)：對象是VB系統(tǒng)內(nèi)部提供給設(shè)計(jì)者可以直接使用的處理輸出的控制工具。本程序所應(yīng)用到的對象類型有標(biāo)簽框(LabelBox)，文本框(TextBox)，命令按扭(CommandButton)，網(wǎng)格(DataGrid)，ADO控件(Adodc1)等。當(dāng)把這些工具放置到用戶界面對應(yīng)的窗體上時，被稱為對象或控件。用戶可以通過設(shè)置對象的“屬性”和“方法”，便于對象適應(yīng)自己所設(shè)計(jì)應(yīng)用程序的輸入輸出內(nèi)容，對象的生成過程及結(jié)構(gòu)都被封裝起來。正確使用對象可以減少程序和開發(fā)時間，提高程序設(shè)計(jì)者的工作效率。屬性(Properties)：屬性是VB系統(tǒng)提供的有關(guān)對象的參數(shù)或數(shù)據(jù)接口。用戶通過適當(dāng)?shù)卦O(shè)置或改變對象的屬性來確定對象的外觀及性能特征，從而有效地使用系統(tǒng)提供的對象。比如，對象的名稱、在屏幕上顯示的位置、大小、顏色、接收或容納的數(shù)據(jù)內(nèi)容及數(shù)據(jù)的表現(xiàn)格式等。事件(Events)：事件是指用戶或操作者對計(jì)算機(jī)進(jìn)行的某一操作（如擊鍵、單擊或移動鼠標(biāo)等）的行為或系統(tǒng)狀態(tài)發(fā)生的變化。VB系統(tǒng)常用事件來引導(dǎo)計(jì)算機(jī)執(zhí)行一段程序。程序所用的鍵盤事件有KeyPress（按鍵）事件，KeyDown事件和KeyUp事件；鼠標(biāo)事件有Click（單擊鼠標(biāo)）事件，DbDlicd（雙擊鼠標(biāo)）。方法(Method)：方法主要是指對一個對象使用某種作用的過程。它是在程序執(zhí)行的過程中要計(jì)算機(jī)執(zhí)行的某種操作。其程序的方法有Show（顯示）方法，Hide（隱藏）方法，Refresh（刷新）方法。過程(Procedure)：過程是指經(jīng)過定義或說明的，或基于某一對象對應(yīng)的事件所引發(fā)的程序段。模塊(Module)：模塊是指一些運(yùn)算量或過程進(jìn)行聲明或定義的一個集合。系統(tǒng)程序大體可分成四個模塊：數(shù)據(jù)輸入、根據(jù)查詢、數(shù)據(jù)打印和通訊。使用VB不需要追求完美的算法和精密的邏輯，而只要充分發(fā)揮你的想象力和創(chuàng)造力，就能利用VB開發(fā)出各種實(shí)用的軟件了，不論是小游戲還是大型的游戲端/服務(wù)器端應(yīng)用程序，都變得非常簡單?？梢暬幊痰囊粋€突出特點(diǎn)就是其開發(fā)環(huán)境就像一個百寶箱，很多功能都集成在其之中，這就是IDE（IntegratedDevelopmentEnvironment），即集成開發(fā)環(huán)境。IDE是指在相應(yīng)的開發(fā)平臺中集成了編輯器、編譯連接工具、控件器箱輔助工具。例如在VB的集成開發(fā)環(huán)境中就包括了以下一些主要元素：工具欄、工具箱、工程管理器窗口、屬性窗口、窗體設(shè)計(jì)器、代碼編輯器窗口等；和VB類似，Delphi的IDE中具有主控制窗體、對象查看窗口和窗體設(shè)計(jì)器。同時IDE的設(shè)置是很靈活的，開發(fā)人員可以按照自己的編程習(xí)慣來配置IDE。從簡單的文本文件到各種復(fù)雜的關(guān)系型數(shù)據(jù)庫，數(shù)據(jù)庫應(yīng)用程序需要面對各種各樣的數(shù)據(jù)源。Visualbasic6.0提供ADO(ActiveDataObjects)作為應(yīng)用程序和OLE-DB連接的橋梁ADO,即Active數(shù)據(jù)對象（ActiveDataObjects）：實(shí)際是一種提供訪問各種數(shù)據(jù)類型的連接機(jī)制。ADO設(shè)計(jì)為一種極簡單的格式，通過ODBC的方法同數(shù)據(jù)庫接口相連。用戶可以使用任何一種ODBC數(shù)據(jù)源，即不僅適合于SQLServer、Oracle、SQL等數(shù)據(jù)庫應(yīng)用程序，也適合于Excel表格、文本文件、圖形文件和無格式的數(shù)據(jù)文件。ADO是基于OLE-DB之上的技術(shù)，因此ADO通過其內(nèi)部的屬性和方法提供統(tǒng)一的數(shù)據(jù)訪問接口方法。Microsoft在VisualBasic6.0以后的版本都集成了ADO。它與以前VisualBasic的DAO、RDO相比有了很大的提高。DAO(DataSQLObjects)即數(shù)據(jù)訪問對象，是一種面向?qū)ο蟮慕缑娼涌?。通過DAO/Jet功能可以訪問ISAM數(shù)據(jù)庫，使用DAO/ODBCDirect功能可以實(shí)現(xiàn)遠(yuǎn)程RDO功能。RDO(RemoteDataObjects)即遠(yuǎn)程數(shù)據(jù)對象，為使用代碼來創(chuàng)建和操作一個遠(yuǎn)程ODBC數(shù)據(jù)庫系統(tǒng)的各個部件提供了一個框架。RDO是ODBCAPI的一個淺層界面接口，是專為訪問遠(yuǎn)程ODBC關(guān)系數(shù)據(jù)源而設(shè)計(jì)的。ADO集中了DAO和RDO的優(yōu)點(diǎn)，可以通過簡單的編程實(shí)現(xiàn)和各種數(shù)據(jù)結(jié)構(gòu)進(jìn)行連接。使用ADO的目的是進(jìn)入數(shù)據(jù)源，使得修改、更新數(shù)據(jù)成為可能。ADO提供一系列的類和對象來完成各種操作。系統(tǒng)實(shí)現(xiàn)3.1登陸界面登陸本系統(tǒng)的方法是打開client應(yīng)用程序文件，系統(tǒng)便會自動打開登錄頁面。在頁面中間部分的區(qū)域是供用戶進(jìn)入系統(tǒng)的窗口，當(dāng)用戶在輸入框擊活的狀態(tài)下輸入用戶名及密碼，點(diǎn)擊"確定"按扭后，您便可以進(jìn)入信息管理系統(tǒng)上家政服務(wù)信息系統(tǒng)了，我們使用的是初始的管理員帳號、密碼。圖7系統(tǒng)登陸界面確定按鈕代碼如下：PrivateSubcmd1_Click()DimMESSAGEAsStringAdodc1.RecordSource="select*frommawhere(ma.操作員like"+Chr(34)+Combo1.Text+Chr(34)+")"Adodc1.RefreshAdodc1.RecordSource="select*frommawhere操作員='"+Combo1.Text+"'"Adodc1.RefreshIfAdodc1.Recordset.RecordCount>0ThenIfCombo1.Text<>""AndTrim(Text2.Text)=Trim(Text1.Text)Thenfrm_main.StatusBar1.Panels(2).Text="當(dāng)前系統(tǒng)用戶："&Trim(Combo1.Text)Name1=Trim(Combo1.Text)frm_main.Check1.Value=Adodc1.Recordset.Fields("基本信息管理")frm_main.Check2.Value=Adodc1.Recordset.Fields("客戶信息管理")frm_main.Check3.Value=Adodc1.Recordset.Fields("客戶信息查詢")frm_main.Check5.Value=Adodc1.Recordset.Fields("系統(tǒng)設(shè)置")Loadfrm_mainfrm_main.ShowUnloadMeElseMsgBox"沒有此操作員的信息或者輸入的密碼錯誤,請您確認(rèn)后重新輸入"Text2.Text=""Text2.SetFocusEndIfElseMsgBox"沒有此操作員的信息或者輸入的密碼錯誤,請您確認(rèn)后重新輸入"Combo1.Text=""Text2.Text="'"Combo1.SetFocusEndIfEndSub3.2首頁頁面介紹用戶在進(jìn)入首頁后會看到整個頁面分成了五個區(qū)域，分別是：基本信息管理、客戶信息管理、信息查詢、系統(tǒng)設(shè)置、數(shù)據(jù)管理。圖8家政服務(wù)信息系統(tǒng)主界面基本信息管理——省份、城市信息的錄入、存儲。客戶信息管理——客戶信息的錄入、修改、刪除。客戶基本信息分為：客戶名稱、地址、證件名稱、編號、電話、郵編、傳真、業(yè)務(wù)員、業(yè)務(wù)員電話；客戶服務(wù)信息為：服務(wù)項(xiàng)目、合同編號、付款方式、生效日期、終止日期、服務(wù)地址、服務(wù)次數(shù)。信息查詢——分為地址、編號、名稱查詢。系統(tǒng)設(shè)置——分為操作員設(shè)置、口令設(shè)置、權(quán)限設(shè)置。數(shù)據(jù)管理——數(shù)據(jù)恢復(fù)、數(shù)據(jù)備份、注銷、退出。3.3菜單功能說明3.3.1基本信息管理（1）省份信息設(shè)置：對省份信息的錄入，將信息加入到數(shù)據(jù)庫中。（2）城市信息設(shè)置：對城市信息的錄入，將信息加入到數(shù)據(jù)庫中。3.3.2客戶信息管理（1）客戶數(shù)據(jù)錄入該菜單主要為用戶提供單位和個人常用的電話號碼，用戶可以隨時增加新號碼或撤除原有號碼，可以分類查詢各所屬單位人員電話號碼，還可以編輯自己的號碼簿加快工作效率。該項(xiàng)菜單可以實(shí)現(xiàn)常用電話號碼的添加，還可以實(shí)現(xiàn)顯示已成功添加的電話號碼。（如下圖所示）圖9客戶信息錄入增加按鈕代碼如下：PrivateSubComAdd_Click()Fori=0To16kh(i).Enabled=Truekh(i).Text=""Adodc1.RecordSource="select*fromkhorderby客戶編號"Adodc1.RefreshIfAdodc1.Recordset.RecordCount=0Thenkh(0).Text="00001"ElseIfAdodc1.Recordset.RecordCount>0ThenAdodc1.Recordset.MoveLastkh(0).Text=Format(Adodc1.Recordset.Fields("客戶編號")+1,"00000")ElseEndIfEndIfNextiComSave.Visible=TrueComCancel.Enabled=TrueComAdd.Enabled=FalseComSave.Enabled=TrueSSTab1.Tab=0kh(1).SetFocusEndSub保存按鈕代碼如下：PrivateSubComSave_Click()OnErrorResumeNextkh(4).Text=Combo1.Text&Combo2.TextIfkh(0).Text<>""Andkh(1).Text<>""ThenCallMainDimDWMC,YZBMAsStringAdodc4.RecordSource="select*frombdwxx"Adodc4.RefreshIfAdodc4.Recordset.RecordCount>0ThenDWMC=Adodc4.Recordset.Fields("單位名稱")YZBM=Adodc4.Recordset.Fields("郵政編碼")ElseEndIfSetadoRs=adoCon.Execute("insertintokhvalues("&kh(0)&",'"&kh(1)&"','"&kh(2)&"','"&kh(3)&"','"&kh(4)&"','"&kh(5)&"','"&kh(6)&"','"&kh(7)&"','"&kh(8)&"','"&kh(9)&"','"&kh(10)&"','"&kh(11)&"','"&kh(12)&"','"&kh(13)&"','"&kh(14)&"','"&kh(15)&"','"&kh(16)&"','"&Str(DTPicker1)&"','"&DWMC&"','"&YZBM&"')")adoCon.CloseMsgBox"數(shù)據(jù)保存成功!",,"保存信息提示"ComSave.Enabled=FalseComCancel.Enabled=FalseComAdd.Enabled=TrueElseMsgBox("必須輸入客戶全稱")SSTab1.Tab=0kh(1).SetFocusEndIfEndSub（2）客戶數(shù)據(jù)修改該菜單主要為個人提供用戶經(jīng)常使用的信息管理系統(tǒng)址，便于用戶及時修改使用。用戶可以隨時增加新號碼或撤除原有信息管理系統(tǒng)址，還可以編輯自己的信息管理系統(tǒng)址簿加快工作效率。該項(xiàng)菜單可以實(shí)現(xiàn)常用信息管理系統(tǒng)址的添加，還可以實(shí)現(xiàn)顯示已成功添加的信息管理系統(tǒng)址。（3）客戶數(shù)據(jù)刪除該菜單主要是對客戶信息的查找、刪除，加快了工作效率。功能是：輸入編號、全稱，可以直接對該客戶信息的刪除。加快了工作效率（如下圖所示）。圖10數(shù)據(jù)刪除刪除按鈕代碼如下：PrivateSubCommand2_Click()DimmyvalAsStringIfAdodc1.Recordset.RecordCount<>0Thenmyval=MsgBox("確實(shí)要刪除該客戶嗎？",vbYesNo)Ifmyval=vbYesThenAdodc1.Recordset.DeleteCombo1.Text=""Text1.Text=""Text2.Text=""EndIfElseMsgBox"查無此數(shù)據(jù)！"EndIfEndSub3.3.3（1）地址查詢：直接輸入客戶地址，可以查詢到客戶的信息數(shù)據(jù)。（2）編號查詢：直接輸入客戶編號，可以查詢到客戶的信息數(shù)據(jù)。（3）全稱查詢：直接輸入客戶編號，可以查詢到客戶的信息數(shù)據(jù)。功能是：輸入客戶地址、編號、全稱，可以直接對該客戶信息的查詢。加快了工作效率（如下圖所示）。圖11編號查詢查詢按鈕代碼如下：PrivateSubCommand1_Click()DimiAsIntegerIfText1.Text<>""Thenmain_khcxjg.Adodc1.RecordSource="select*fromkhwhere(kh.客戶全稱LIKE'%"+Text1.Text+"%')"main_khcxjg.Adodc1.RefreshIfmain_khcxjg.Adodc1.Recordset.RecordCount>0ThenFori=0To16Ifmain_khcxjg.Adodc1.Recordset.Fields(i)<>""Thenmain_khcxjg.kh(i).Text=main_khcxjg.Adodc1.Recordset.Fields(i)NextiUnloadMeLoadmain_khcxjgmain_khcxjg.Show1ElseMsgBox"無記錄！"EndIfElseMsgBox"請輸入相應(yīng)信息！"EndIfEndSub3.3.4系統(tǒng)設(shè)置（1）操作員設(shè)置：添加、刪除操作此系統(tǒng)的操作員，更快的瀏覽到客戶信息。圖12操作員設(shè)置保存按鈕代碼：PrivateSubComSave_Click()OnErrorResumeNextData1.RecordSource="select*frommawhere操作員='"+Combo1.Text+"'"Data1.RefreshIfData1.Recordset.RecordCount>0ThenMsgBox"用戶名已經(jīng)存在,注冊不成功!",,"信息提示"Combo1.Text=""Combo1.SetFocusElseSetmydb=Workspaces(0).OpenDatabase(App.Path&"\khgl.mdb")Setmyrs1=mydb.OpenRecordset("ma",dbOpenTable)myrs1.AddNewIfCombo1.Text<>""Thenmyrs1.Fields(0)=Combo1.TextIfText1(1).Text<>""Thenmyrs1.Fields(1)=Text1(1).Textmyrs1.Fields(2)="0"myrs1.Fields(3)="0"myrs1.Fields(4)="0"myrs1.Fields(5)="0"myrs1.Fields(6)="0"ElseEndIfmyrs1.Updatemyrs1.Closemydb.CloseData1.RefreshComSave.Enabled=FalseComAdd.Enabled=TrueEndIfEndSub（2）口令設(shè)置：對操作人員的密碼的修改，提高系統(tǒng)的安全性、保密性。圖13密碼設(shè)置確定按鈕代碼：PrivateSubCommand1_Click()CallMainDimMESSAGEAsStringData1.RecordSource="select*frommawhere(ma.操作員='"+Text1.Text+"'andma.密碼='"+Text2.Text+"')"Data1.RefreshIfData1.Recordset.RecordCount>0ThenSetadoRs=adoCon.Execute("updatemaset密碼='"+Text3.Text+"'where操作員='"+Text1.Text+"'")MsgBox"密碼修改成功!",,"信息提示"ElseMsgBox"沒有要修改的相關(guān)信息!",,"信息提示"EndIfadoCon.CloseEndSub（3）權(quán)限設(shè)置：對操作人員的權(quán)限的管理，各個操作人員設(shè)置系統(tǒng)的各自權(quán)限，權(quán)限由系統(tǒng)管理員來設(shè)定。圖14操作員設(shè)置代碼如下：PrivateSubForm_Load()OnErrorResumeNextfrm_main.StatusBar1.Panels(1)=Me.CaptionMe.Left=(Screen.Width-Me.Width)/2Me.Top=(Screen.Height-Me.Height)/2rs.Open"select*fromma",cnn,adOpenStatic,adLockOptimisticAdodc1.RecordSource="select*fromma"Adodc1.RefreshIfAdodc1.Recordset.RecordCount>0ThenListView1.Enabled=TrueListView1.ListItems.ClearAdodc1.Recordset.MoveFirstDoWhileAdodc1.Recordset.EOF=Falsekey=Text1.TextSetitmX=ListView1.ListItems.Add(,,key,1)Adodc1.Recordset.MoveNextLooprs.Open"select*frommawhere操作員='"+ListView1.SelectedItem+"'",cnn,adOpenStatic,adLockOptimisticAdodc1.RecordSource="select*frommawhere操作員='"+ListView1.SelectedItem+"'"Adodc1.RefreshIfAdodc1.Recordset.RecordCount>0ThenCheck1.Value=Adodc1.Recordset.Fields("基本信息管理")Check2.Value=Adodc1.Recordset.Fields("客戶信息管理")Check3.Value=Adodc1.Recordset.Fields("系統(tǒng)設(shè)置")Check5.Value=Adodc1.Recordset.Fields("客戶信息查詢")ElseEndIfElseListView1.Enabled=FalseEndIfEndSub3.3.5數(shù)據(jù)管理（1）數(shù)據(jù)備份 數(shù)據(jù)備份這一功能是將系統(tǒng)的數(shù)據(jù)進(jìn)行一個必要的備份，防止計(jì)算機(jī)因其他原因產(chǎn)生數(shù)據(jù)丟失。該項(xiàng)菜單為用戶提供在該系統(tǒng)的數(shù)據(jù)備份，包括服務(wù)器名，管理員，密碼，數(shù)據(jù)庫名，備份至（備份名）。代碼如下：PrivateSubCommand1_Click()'確認(rèn)數(shù)據(jù)備份YesNo=MsgBox("準(zhǔn)備好了嗎？",vbNo+vbQuestion)IfYesNo=vbNoThenExitSubEndIfOnErrorGoToerrpromptMe.MousePointer=11MkDir(Text1.Text&":\客戶管理系統(tǒng)數(shù)據(jù)備份")FileCopyApp.Path&"\khgl.mdb",Text1.Text&":\客戶管理系統(tǒng)數(shù)據(jù)備份\khgl_back.mdb"Me.MousePointer=0MsgBox"數(shù)據(jù)已備份完畢。"errprompt:Me.MousePointer=0SelectCaseErr.NumberCase57MsgBox"磁盤已滿！",vbCriticalCase70MsgBox"磁盤寫保護(hù)！",vbCriticalEndSelectEndSub（2）數(shù)據(jù)恢復(fù)當(dāng)發(fā)生數(shù)據(jù)丟失或數(shù)據(jù)錯誤時，我們使用此功能對數(shù)據(jù)進(jìn)行恢復(fù)。該項(xiàng)菜單為用戶提供該系統(tǒng)的數(shù)據(jù)恢復(fù)，包括服務(wù)器名，管理員，密碼，數(shù)據(jù)庫名，備份至（服務(wù)器路徑）。代碼如下：PrivateSubCommand1_Click()'確認(rèn)數(shù)據(jù)恢復(fù)YesNo=MsgBox("準(zhǔn)備好了嗎？",vbNo+vbQuestion)IfYesNo=vbNoThenExitSubEndIfOnErrorGoToerrpromptMe.MousePointer=11FileCopyText1.Text&":\客戶管理系統(tǒng)數(shù)據(jù)備份\khgl_back.mdb"