課程設計實驗報告

1、目錄一、 系統(tǒng)概述1二、 系統(tǒng)分析1三、 系統(tǒng)設計1四、 系統(tǒng)測試實施26五、 設計總結30客戶管理系統(tǒng)一、 系統(tǒng)概述客戶管理系統(tǒng)主要是對公司的客戶進行管理的系統(tǒng)。對客戶的管理是一個非常復雜的過程。既要滿足公司員工對客戶信息管理的要求，又要瞞足客戶進行查詢、瀏覽信息的需求?？蛻舻姆N類繁多，管理起來就越復雜?？头芾硐到y(tǒng)主要利用計算機實現(xiàn)對客戶信息的管理，可以提高對客戶管理的效率，提高服務質量。在本系統(tǒng)中，主要包括用戶登錄、數(shù)據(jù)錄入、信息查詢以及系統(tǒng)維護等功能。二、 系統(tǒng)分析（一） 系統(tǒng)的使用對象公司管理人員和需要查詢信息的客戶。（二） 系統(tǒng)開發(fā)目的工作人員對客戶信息進行高效的管理，對客戶信息錄

2、入和實現(xiàn)快速查詢?？蛻艨梢圆樵兊焦镜南嚓P信息，如公司的部門、電話、所在地的編號以及郵編。（三） 數(shù)據(jù)結構分析要了解客戶的基本情況信息要了解部門和聯(lián)系人的信息所以需要的數(shù)據(jù)表有客戶表、聯(lián)系人表、部門配置表、部門電話表、區(qū)號郵編表、服務表以及操作員表。三、 系統(tǒng)設計（一）、系統(tǒng)結構設計開發(fā)客戶管理系統(tǒng)，需要設計若干數(shù)據(jù)表、表單、程序、以及主菜單。這些都由項目管理器統(tǒng)一管理，由主程序進入系統(tǒng)，由主程序調出用戶登入程序。登入成功后，調用系統(tǒng)的主菜單，由主菜單調用表單界面，從而進行系統(tǒng)的運行?？蛻艄芾硐到y(tǒng)的總體功能流程圖如下： 系統(tǒng)首頁輸入密碼退出主菜單信息查詢系統(tǒng)維護退出系統(tǒng)數(shù) 據(jù) 錄入增加操作員密

3、碼修改查詢聯(lián)系人信息錄入服務信息錄入聯(lián)系人信息錄入客人信息查詢部門信息查詢客戶信息查詢區(qū)號信息 （二）、數(shù)據(jù)庫結構設計與實現(xiàn)在數(shù)據(jù)庫中建立名為khgl的數(shù)據(jù)庫。根據(jù)對客戶的管理與所需信息，管理系統(tǒng)數(shù)據(jù)庫中各表的結構設計結果如下：聯(lián)系人表（lxr）字段名字段類型字段寬度索引否聯(lián)系人編號(lxrbh)字符型10主索引姓名(xm)字符型10性別(xb)字符型2單位名稱(dwmc)字符型20出生日期(csrq)字符型10愛好(ah)字符型10電話(dh)字符型12在表設計器中實現(xiàn)如下：部門配置表（bmpz）字段名字段類型字段寬度索引否部門代碼(bmdm)字符型10主索引部門名稱（bmmc）字符型20在

4、表設計器中實現(xiàn)如下：部門電話表（bmdh）:字段名字段類型字段寬度索引否部門代碼(bmdm)字符型10普通索引處室名稱(csmc)字符型10房間號(fjh)字符型4分機號(fjih)字符型4直播電話(zbdh)字符型8在表設計器中實現(xiàn)如下：客戶表（khb）:字段名字段類型字段寬度索引否客戶編號（khbh）字符型10主索引電話（kdh）字符型12單位名稱(kdwmc)字符型20傳真(cz)字符型12郵政編碼(yzbm)字符型6Email字符型20單位地址(dwdz)字符型20區(qū)號（qh）字符型4普通索引聯(lián)系人編號(lxrbh)字符型10普通索引在表設計器中實現(xiàn)如下：區(qū)號郵編（qhyb）字段名字段

5、類型字段寬度索引否區(qū)號（qh）字符型4主索引地區(qū)名稱(dqmc)字符型10郵政編號(qyzbm)字符型6在表設計器中實現(xiàn)如下：服務表（fwb）字段名稱字段類型字段寬度索引否服務項目編號（fwxmbh）字符型10主索引客戶編號(khbh)字符型10普通索引部門代碼（fbmdm）字符型10普通索引服務評價(fwpj)字符型20金額（je）數(shù)值型10在表設計器中實現(xiàn)如下：操作員表（czy）字段名稱字段類型字段寬度索引否證件號（zjh）字符型8主索引密碼(mm)字符型10在表設計器中實現(xiàn)如下：建立表之間的聯(lián)系如下：建立表之間的參照完整如下：至此，所有的數(shù)據(jù)表就建好了，如下圖所示：（三）、各個（表單）模

6、塊功能的創(chuàng)建1、登入表單設計（drbd） 登入表單的作用是操作者只有輸入了證件號和密碼才能登入進入客戶管理系統(tǒng)。 建立一個表單，caption屬性為登入表單，name屬性為：login。 建立一個確定和退出的命令按鈕，添加的數(shù)據(jù)環(huán)境為操作員表（czy）.布局完成如下：表單的方法程序和事件代碼如下：（1）、load事件代碼：set talk offset safety offclose allopen database f:jjx103khgl.dbc exclusiveselect ause f:jjx103czy.dbf（2）、unlond事件代碼：caozuoyuan=''

7、return caozuoyuanclose all（3）、確定的click代碼：if zjh=alltrim(thisform.no.value) do zhumenu.mpr release thisformelse wait window "您輸入的密碼有誤，請重新輸入！" timeout 2 thisform.no.value="" thisform.no.setfocus thisform.refreshendif(4)、退出的click代碼：tuichu=messagebox('您確定要退出客戶管理系統(tǒng)嗎?',4+32+0,&

8、#39;客戶管理系統(tǒng)')if tuichu=6caozuoyuan=''thisform.releaseendifclear events運行后的表單如下：2 、修改密碼表單設計（mmxg）修改密碼表單主要用來完成修改密碼的功能。在該表單中，點擊確定進行密碼修改，點擊取消，則取消密碼修改的操作。在建立的表單界面中設置caption屬性為密碼修改，name屬性為cipher，添加的數(shù)據(jù)環(huán)境為操作員表（czy）。各控件在表單中的位置大小如下圖：確定按鈕的click事件如下：public xselect ause f:jjx103czy.dbfx=alltrim(thisfo

9、rm.txtmm.value)replace czy.mm with alltrim(thisform.password2.value)messagebox("密碼已修改",0+48,"提示")thisform.refresh取消按鈕的click事件如下：replace czy.mm with xmessagebox ("放棄密碼修改",0+48,"提示")thisform.refresh退出按鈕的click事件如下：thisform.refreshthisform.release3 、增加操作員表單設計（zjcz

10、y）該表單的作用主要是增加操作員。表單界顯示面如下：（1）、添加的click事件代碼如下：if this.caption="添 加" thisform.text1.enabled=.t. thisform.text2.enabled=.t. this.caption="保 存"else sele users insert into czy(zjh,mm) values(alltrim(thisform.text1.value),alltrim(thisform.text2.value) thisform.text1.enabled=.f. thisfor

11、m.text2.enabled=.f. this.caption="添 加" wait window "資料已保存！" timeout 1 thisform.refreshendif（2）、退出的click事件代碼如下：release thisform4、客戶查詢結果表單設計(khcxjg)改表單顯示按一定條件查詢出的客戶的基本情況信息，由后面的客戶查詢表單調用。設計的表單界面如下：（1）、該表單的init事件代碼如下：thisform.refreshlocate for khbh=alltrim(khb.khbh)thisform.txtkhbh.en

12、abled=.f.thisform.txtkdh.enabled=.f.thisform.txtkdwmc.enabled=.f.thisform.txtcz.enabled=.f.thisform.txtyzbm.enabled=.f.thisform.txtemail.enabled=.f.thisform.txtdwdz.enabled=.f.thisform.txtqh.enabled=.f.thisform.txtlxrbh.enabled=.f.（2）、第一個按鈕的click事件代碼如下：go top this.enabled=.t.mand2.enabled=.f.mand3.e

13、nabled=.t.mand4.enabled=.t.mand5.enabled=.t.thisform.refresh（3）、上一個按鈕的click事件代碼如下：skip -1mand1.enabled=.t.mand3.enabled=.t.mand4.enabled=.t.mand5.enabled=.t.if bof()this.enabled=.f.elsethis.enabled=.f.endifthisform.refresh（4）、下一個按鈕的click事件代碼如下：skipmand1.enabled=.t.if eof()this.enabled=.f.mand1.enabl

14、ed=.t.mand2.enabled=.t.mand3.enabled=.f.mand5.enabled=.t.thisform.refreshelsethis.enabled=.t.mand1.enabled=.t.mand2.enabled=.t.mand3.enabled=.t.mand5.enabled=.t.endifthisform.refresh（5）、最后一個按鈕的click事件代碼如下：go bottomthis.enabled=.t.mand1.enabled=.t.mand2.enabled=.t.mand3.enabled=.f.mand5.enabled=.t.th

15、isform.refresh（6）、退出按鈕的click事件代碼如下：thisform.refreshthisform.release5、客戶查詢結果1（khcxjg1）該表單是按聯(lián)系人查詢結果表單。因為該表單顯示的是查詢后的結果，所以記錄只可以查看不可以修改。該表單要調用前面的khcxjg表單。表單運行顯示界面如下：（1）、該表單的Init事件代碼如下：thisform.refreshlocate for lxrbh=alltrim(khb.lxrbh)thisform.txtkhbh.enabled=.f.thisform.txtkdh.enabled=.f.thisform.txtkdw

16、mc.enabled=.f.thisform.txtcz.enabled=.f.thisform.txtyzbm.enabled=.f.thisform.txtemail.enabled=.f.thisform.txtdwdz.enabled=.f.thisform.txtqh.enabled=.f.thisform.txtlxrbh.enabled=.f.其中第一個、上一個、下一個、最后一個、退出的代碼與khcxjg中的一樣。6、客戶查詢結果2（khcxjg2）該表單是按電話查詢結果表單。因為該表單顯示的是查詢后的結果，所以記錄只可以查看不可以修改。該表單要調用前面的khcxjg表單。表單運

17、行顯示界面如下：7、聯(lián)系人查詢結果表單設計（lxrcxjg）聯(lián)系人查詢結果顯示按一定條件查詢出聯(lián)系人的信息，該界面可以查看記錄。界面顯示如下：（1）、Init事件代碼如下：thisform.refreshlocate for lxrbh=alltrim(lxr.lxrbh)thisform.txtlxrbh.enabled=.f.thisform.txtxm.enabled=.f.thisform.txtxb.enabled=.f.thisform.txtldwmc.enabled=.f.thisform.txtldh.enabled=.f.thisform.txtcsrq.enabled=.

18、f.thisform.txtah.enabled=.f.第一個，上一個，下一個，最后一個，退出的代碼與前面一樣。8、聯(lián)系人查詢結果1該表單是按姓名查詢結果表單，要調用前面的lxrcxjg表單，該界面只可查看不可修改。界面顯示如下：lint事件代碼如下：thisform.refreshlocate for xm=alltrim(lxr.xm)thisform.txtlxrbh.enabled=.f.thisform.txtxm.enabled=.f.thisform.txtxb.enabled=.f.thisform.txtldwmc.enabled=.f.thisform.txtldh.ena

19、bled=.f.thisform.txtcsrq.enabled=.f.thisform.txtah.enabled=.f.第一個，上一個，下一個，最后一個，退出的代碼與前面一樣。9、聯(lián)系人查詢結果2該表單是按生日查詢結果表單，要調用前面的lxrcxjg表單，該界面只可查看不可修改。界面顯示如下：（1）、lint事件代碼如下：thisform.refreshlocate for csrq=alltrim(lxr.csrq)thisform.txtlxrbh.enabled=.f.thisform.txtxm.enabled=.f.thisform.txtxb.enabled=.f.thisfo

20、rm.txtldwmc.enabled=.f.thisform.txtldh.enabled=.f.thisform.txtcsrq.enabled=.f.thisform.txtah.enabled=.f.第一個，上一個，下一個，最后一個，退出的代碼與前面一樣。10、按客戶編號查詢表單設計 該表單可以通過選擇客戶的客戶編號，調用客戶查詢結果表單，查詢出客戶的信息。界面顯示如下：（1）、Init事件代碼如下：public khuse f:jjx103khb.dbfthisform.refreshgo topbo1.value=khb.khbh（2）、查詢的click事件代碼如下：kh=allt

21、rim(bo1.value)thisform.releasedo form f:jjx103khcxjg.scx（3）、退出的click事件代碼如下：thisform.release11、按聯(lián)系人編號查詢表單設計（alxrbhcx） 通過選擇客戶的聯(lián)系人編號，調用”客戶查詢結果1”表單，查詢出客戶的信息。顯示界面如下：（1）、Iint事件代碼如下：public lxuse f:jjx103khb.dbfthisform.refreshgo topbo1.value=khb.lxrbh（2）、查詢的click事件代碼如下：kh=alltrim(bo1.value)thisform.release

22、do form f:jjx103khcxjg1.scx（3）、退出的click事件代碼如下：thisform.release12、按電話查詢表單設計（adhcx）通過選擇客戶的電話，調用“客戶查詢結果2”（1）、Iint事件代碼如下：public dhuse f:jjx103khb.dbfthisform.refreshgo topbo1.value=khb.khbh（2）、查詢的click事件代碼如下：kh=alltrim(bo1.value)thisform.releasedo form f:jjx103khcxjg2.scx（3）、退出的click事件代碼如下：thisform.rele

23、ase13、部門電話查詢結果表單設計（bmdhcxjg）該表單是根據(jù)部門代碼查詢出的部門電話信息表單，可以查看相關記錄。 界面顯示如下： （1）、Init事件代碼如下：thisform.refreshlocate for bmdm=alltrim(bmdh.bmdm)thisform.txtbmdm.enabled=.f.thisform.txtcsmc.enabled=.f.thisform.txtfjh.enabled=.f.thisform.txtfjih.enabled=.f.thisform.txtzbdh.enabled=.f.第一個，上一個，下一個，最后一個，退出的代碼與前面一樣

24、。14、查詢部門電話表單設計（cxbmdh） 該表單根據(jù)選擇的部門代碼查詢出部門電話信息，單擊“查詢”按鈕，調用前面的“bmdhcxjg”表單。界面顯示如下:（1）、Init事件代碼如下：public dmuse f:jjx103bmdh.dbfthisform.refreshgo topbo1.value=bmdh.bmdm(2)、查詢的click事件代碼如下：kh=alltrim(bo1.value)thisform.releasedo form f:jjx103bmdhcxjg.scx（3）、退出的click事件代碼如下：thisform.release15、錄入客戶信息表單設計（lrk

25、hxx） 該表單是完成客戶信息的錄入，可增加或者刪除客戶記錄，界面顯示如下：（1）、Init事件代碼如下：select khbuse f:jjx103khb.dbf exclusive（2）、添加的click事件代碼如下：append blankthisform.refresh（3）、刪除的click事件代碼如下：if messagebox('你確定要刪除記錄嗎?',4+64+266,'提示')=6deletepackrelease thisformendif第一個、下一個，上一個，最后一個，退出的代碼與前面一樣。16、錄入聯(lián)系人信息表單設計（lrlxrxx）該

26、表單是完成聯(lián)系人信息的錄入，可增加或刪除聯(lián)系人信息。界面顯示結果如下：Init事件代碼如下：select lxruse f:jjx103lxr.dbf exclusive第一個，上一個，下一個，最后一個，增加，刪除，退出與前面的lrkhxx的代碼一樣。17、錄入服務信息表單設計（lrfwxx）該表單是完成服務信息的錄入，可增加或刪除服務信息。界面顯示結果如下：（1）、Init事件代碼如下：select fwbuse f:jjx103fwb.dbf exclusive第一個，上一個，下一個，最后一個，增加，刪除，退出與前面的lrkhxx的代碼一樣。18、區(qū)號郵編查詢結果表單設計（qhybcxjg

27、）該表單是根據(jù)地區(qū)區(qū)號查詢出的地區(qū)郵編信息的表單。界面顯示結果如下：（1）、Init事件代碼如下：thisform.refreshlocate for qh=alltrim(qhyb.qh)thisform.txtqh.enabled=.f.thisform.txtdqmc.enabled=.f.thisform.txtqyzbm.enabled=.f.第一個，上一個，下一個，最后一個，退出的代碼與前面一樣。19、查詢區(qū)號郵編表單設計（cxqhyb）該表單根據(jù)選擇的區(qū)號查詢出地區(qū)的郵政編碼信息，單擊“查詢”，調用上面的qhybcxjg表單。（1）、Init事件代碼如下：public qhuse

28、 f:jjx103qhyb.dbfthisform.refreshgo topbo1.value=qhyb.qh（2）、查詢的click事件代碼如下：qh=alltrim(bo1.value)thisform.releasedo form f:jjx103qhybcxjg.scx（3）、退出的click事件代碼如下：thisform.release到此，客戶管理系統(tǒng)中所用到的表單就設計完了，如下圖所示：（四）、系統(tǒng)的主菜單與主程序的編譯與連編1、菜單設計在應用程序中,用戶登錄系統(tǒng)首先看到的是菜單系統(tǒng)，下面菜單的布局：文件：新建、打開、保存、另存為、關閉、頁面設置、退出。編輯：撤銷、重做、剪切、

29、復制、粘貼。數(shù)據(jù)錄入：錄入客戶信息、錄入服務信息、錄入聯(lián)系人信息。信息查詢：查詢部門電話、查詢聯(lián)系人、查詢客戶、查詢區(qū)號郵編。系統(tǒng)維護：修改密碼、增加操作員。退出系統(tǒng)。（1）、新建菜單，在菜單設計器中設置菜單項如下：（2）、在文件中建立子菜單，界面如下：（3）、在編輯中建立子菜單，結果如下：（4）、在數(shù)據(jù)錄入中建立主菜單，界面顯示如下：（5）、在信息查詢中建立子菜單，界面顯示如下：（6）、在子菜單查詢客戶中建立二級子菜單，顯示界面結果如下：（7）、在系統(tǒng)維護中建立子菜單，界面顯示結果如下：（8）、在退出系統(tǒng)中建立過程，代碼如下：set sysmenu to defaultclear evenquit這樣名為zhumenu的菜單就建立好了如下如：2、建立主程序新建程序，在程序窗口中編寫程序代碼如下：set talk offset safe offset exac onset dele onset defa to f:jjx103do form drbdread even把主程序設置成主菜單，名為cx的主程序就建立好了，如下圖：3、系統(tǒng)的連編在項目管理器中，點擊主菜單cx，再點擊“連編”，在出現(xiàn)的窗口中選擇“確定”，則可保存名為jjx103的可執(zhí)行程序。四、 系統(tǒng)測試與實施在所建立的jjx103文件夾中，可找到名為j