【導讀】客戶管理系統(tǒng)實現(xiàn)了與客戶相關(guān)的各種信息的系統(tǒng)化、規(guī)范化和自動化。增、刪、查、改等操作，完成對客戶的信息管理。這些功能基本可以滿足一般中。處理的及時性和準確性。該系統(tǒng)采用VisualFoxpro進行開發(fā)、設(shè)計。系統(tǒng)的實施將為企業(yè)獲得更。一對一市場營銷，從而為企業(yè)帶來更豐厚的利潤和持續(xù)的競爭優(yōu)勢。

　　

【正文】 DELETE FROM tblplain WHERE AllTrim(no) == m_no DELETE FROM tblkeyword WHERE AllTrim(no) == m_no Pack *******清空所有的文本框、編輯框 ***** (39。value39。,39。39。,39。textbox39。) (39。value39。,39。39。,39。editbox39。) ENDIF 日程管理模塊 日程管理模塊可以新建計劃，瀏覽某一日期的計劃，以及了解當天的事務。如圖 4 49 所示為“新建日程安排”對話框和“計劃安排”對話框。 xxxxx 大學本科生畢業(yè)設(shè)計（論文） 29 圖 48 “新建日程安排”對話框 [保存 ]按鈕的 ”click”事件代碼： mday=STR() mmon=STR() myear=STR() mbegindate=CTOD(mmon+39。/39。+mday+39。/39。+myear) mday=STR() mmon=STR() myear=STR() menddate=CTOD(mmon+39。/39。+mday+39。/39。+myear) mcontent= INSERT INTO tbldiary VALUES(mbegindate,menddate,mcontent) =39。39。 MESSAGEBOX(日程安排已經(jīng)保存。 ) 第四章 主要功能模塊的創(chuàng)建 30 49“計劃安排”對話框 [查看 ]按鈕的 ”click”事件代碼： mday=STR() mmon=STR() myear=STR() mdate=CTOD(mmon+39。/39。+mday+39。/39。+myear) SELECT begindate AS 開始時間 , enddate AS 結(jié)束時間 , content AS 計劃內(nèi)容 。 FROM tbldiary WHERE mdate=begindate AND mdateenddate+1 INTO CURSOR tmp =tmp 報表管理模塊 報表管理模塊將對 客戶資料、投訴情況、日程安排三個方面進行統(tǒng)一管理。這個模塊可以很方便地打印需要的客戶資料、投訴情況、以及日程安排報表。 如圖 410 所示為客戶信息報表 xxxxx 大學本科生畢業(yè)設(shè)計（論文） 31 圖 410 客戶信息報表 圖 411 “日程計劃報表打印”表單 [預覽 ]按鈕的 ”click”事件代碼： mday=STR() mmon=STR() myear=STR() date1=CTOD(mmon+39。/39。+mday+39。/39。+myear) 第四章 主要功能模塊的創(chuàng)建 32 mday=STR() mmon=STR() myear=STR() xxxxx 大學本科生畢業(yè)設(shè)計（論文） 33 date2=CTOD(mmon+39。/39。+mday+39。/39。+myear) IF date1date2 MESSAGEBOX(第一日期不能 大于第二日期！ ,16,錯誤 ) RETURN ENDIF REPORT FORM rdiary FOR (begindate=date1 AND begindatedate2+1)。 OR (enddate=date1 AND enddatedate2+1)。 OR (date1=begindate AND date2enddate+1) PREV 主程序的設(shè)計 系統(tǒng)要執(zhí)行，需要有一個主程序。系統(tǒng)主程序的設(shè)計步驟如下：在“項目管理器”中選擇“代碼”中的程序，單 擊“新建”按鈕，為系統(tǒng)新建一個主程序。為主程序編寫代碼，存儲為 main. 完整的主程序清單 —————————————————————————————————— *************** *******進行程序初始化 SET TALK OFF SET DELE ON SET SAFE OFF =.F. amp。amp。隱藏系統(tǒng)窗口 oldpath=SYS(5)+SYS(2020) amp。amp。獲取當前 默認路徑 newpath=SYS(16) amp。amp。獲取程序全路徑名 newpath=getpath(newpath) amp。amp。得到程序所在的路徑 SET DEFAULT TO (newpath) amp。amp。設(shè)置新的默認路徑 OPEN DATA data\dbcustom SELE 0 USE data\tblcustom SELE 0 USE data\tblplain SELE 0 USE data\tbldiary SELE 0 USE data\tblkeyword SELE 0 USE data\tbluser **全局變量，分別為登錄用戶名、登錄時間、擁有的權(quán)限 PUBLIC g_uid,g_time,g_dom(19) g_uid=39。39。 g_time=TTOC(DATETIME()) g_dom=1 ****啟動主菜單，執(zhí)行登錄表單，進入事件循環(huán) 第四章 主要功能模塊的創(chuàng)建 34 DO FORM frmlogin READ EVENT *****獲取去掉文件名的路徑 ******* FUNCTION getpath PARA mpath rm=RAT(39。\39。,mpath) lm=AT(39。\39。,mpath) IF(rm=lm) amp。amp。“ c:\”的情形 result=SUBSTR(mpath,1,lm) ELSE result=SUBSTR(mpath,1,rm1) ENDIF RETURN result ENDFUNC ————————————————————————————————— xxxx 大學本科生畢業(yè)設(shè)計（論文） 35 第五章 系統(tǒng)的編譯和發(fā)行 完成了客戶關(guān)系管理系統(tǒng)的編程工作之后，最后一步就是該系統(tǒng)的編譯和發(fā)行。設(shè)計系統(tǒng)的目的就是要使用者即使不安裝 Visual Foxpro ，也能運行該程序。要想系統(tǒng)脫離 Visual Foxpro 運行環(huán)境，需要對系統(tǒng)進行編譯，制作出可單獨運行的可執(zhí)行程序。系統(tǒng)的編譯過程簡述如下。 （ 1） 在“項目管理器”中檢查好各種文檔，將那些不屬于應用程序的文檔從項目中移出。方法是在“項目管理器”中選中它們，然后單擊 [刪除 ]按鈕即可完成移出操作。 （ 2） 單擊“項目管理器”中的 [連編 ]按鈕，彈出“連編選項”對話框。在“連編選項”對話框中選擇“連編可執(zhí)行文件”單選按鈕。 （ 3） 單擊 [確定 ]按鈕，彈出“另存為”對話框，輸入應用程序文件名：客戶關(guān)系管理系統(tǒng) .exe，單擊 [保存 ]按鈕開 始編譯。 （ 4） 退出 Visual Foxpro，在文件夾中找到文件“ ”，雙擊就可以執(zhí)行這個應用程序了。 結(jié)束語 36 結(jié)束語 Visual Foxpro 是開發(fā)數(shù)據(jù)庫應用程序的強勁、快捷的工具，由于其使用簡單，受到很多開發(fā)者的青瞇。 Visual Foxpro 憑借其極佳的通用性而有著相當大的用戶群。隨著網(wǎng)絡(luò)經(jīng)濟、知識經(jīng)濟的迅猛發(fā)展和全球市場競爭的日益激烈，人們在大量研究和實踐的基礎(chǔ)上對網(wǎng)絡(luò)經(jīng)濟時代的客戶管理賦予了新的內(nèi)涵。為此我使用Visual Foxpro 開發(fā)一個客戶管理系統(tǒng)來介紹客戶管理信息化的一般解決方案。 經(jīng)過幾個月的學習、研究，終于完成了系統(tǒng)的設(shè)計與開發(fā)。雖然自己認真查閱并學習了關(guān)于 Visual Foxpro 開發(fā) 的許多書籍，但在自己進行系統(tǒng)的設(shè)計與開發(fā)的過程中還是一個又一個的問題接踵而來，每一個問題的解決對于自己來說都是一個挑戰(zhàn)。正因為如此，從而讓我學習到了許多新的知識，比如軟件系統(tǒng)的開發(fā)過程大體上包括需求分析、系統(tǒng)分析設(shè)計、編碼實現(xiàn)、系統(tǒng)測試、系統(tǒng)維護等，以及每一步應該完成哪些工作，應該注意些什么。同時對于 Visual Foxpro 的知識也有了 更深刻的了解和掌握，通過這次畢業(yè)設(shè)計，提高了我的實際動手能力以及獨立思考處理問題的能力，讓我受益匪淺。 參考文獻 37 參考文獻 [1] 鄭阿奇， Visual Foxpro實用教程，北京：電子工業(yè)出版社 [2] 知寒工作室，中文 Visual Foxpro 6簡明案例教程，北京：機械工業(yè)出版社 [3] 黃少棠， Visual Foxpro 學習教程，北京：北京大學出版社 [4] 章立民， Visual Foxpro —— 教學指南篇，北京：中國鐵道出版社 [5] 李力， Visual C++實用數(shù)據(jù)庫編 程，合肥：中國科學技術(shù)大學出版社 [6] 王海兵， Visual Foxpro實用數(shù)據(jù)庫編程，合肥：中國科學技術(shù)大學出版社 [7] 導向科技，中文版 Visual Foxpro 基礎(chǔ)培訓教程，北京：人民郵電出版社 [8] 合力工作室，中文 Visual Foxpro 編程基礎(chǔ)，北京：清華大學出版社 [9] 陳明， Visual Foxpro ，北京：科學出版社 [10]許向容、潘清、楊一平， Foxpro項目案例導航，北京：科學出版社 [11]李云莊、鄭剛， Visual Foxpro 與提高，北京：清華大學出版社 [12]肖金秀，中文 Visual Foxpro 實用基礎(chǔ)教程，北京：地震出版社 [13]白永軍， Visual Foxpro 程序開發(fā)項目案例，北京：清華大學出版社 [14]張文松， Visual Foxpro ，北京：清華大學出版社 [15]李淑華、金杰， Visual Foxpro 實用教程，北京：中國電力出版社 [16] 陳林、陳艷華， Visual Foxpro 數(shù)據(jù)庫開發(fā)實例精粹， 北京：電子工業(yè)出版社， [17] 潘清、楊一平， Foxpro項目案例導航，北京：科學出版社， 2020 [18] 鄭剛， Visual Foxpro ，北京：清華大學出版社 [19] 張立科，中文版 Visual Foxpro 基礎(chǔ)培訓教程，北京：人民郵電出版社， 2020 [20]金杰， Visual Foxpro 實用教程，北京：中國電力出版社 致謝 38 致謝 經(jīng)過半年的忙碌和工作，本次畢業(yè)設(shè)計已經(jīng)接近尾聲，作為一個本科生的 畢業(yè)設(shè)計，由于經(jīng)驗的匱乏，難免有許多考慮不周全的地方，如果沒有導師的督促指導，以及一起工作的同學們的支持，想要完成這個 設(shè)計是難以想象的。 在這里首先要感謝我的導師胡盛詳老師，胡老師平日里工作繁多，但在我們組做畢業(yè)設(shè)計的每個階段都吩咐我們每周要按時與老師見面，每周應按時完成一定的任務量，并給予了我們一定的指導。 其次要感謝在這次畢業(yè)設(shè)計中給予我?guī)椭^的同學，如果沒有她們的幫忙，此次設(shè)計的完成也是非常困難的。 然后還要感謝大學四年來所有的老師， 為我們打下計算機科學與技術(shù)專業(yè)的基礎(chǔ)知識。最后感謝技術(shù)學院和我的母校 —— xxxx’大學四年來對我的栽培。