1、客戶關(guān)系管理系統(tǒng)學(xué) 院專 業(yè)班 級(jí)學(xué) 號(hào)姓 名指導(dǎo)教師教師職稱年月日 39 摘要【摘要】隨著市場(chǎng)體系的日益完善，我們已經(jīng)進(jìn)入了一個(gè)買方市場(chǎng)時(shí)代。選擇空間擴(kuò)大、購(gòu)買渠道拓寬、消費(fèi)心態(tài)和購(gòu)買行為越發(fā)成熟，使客戶再不會(huì)對(duì)某一企業(yè)或者產(chǎn)品盲目地保持絕對(duì)忠誠(chéng)，如何不斷改善客戶關(guān)系，掌據(jù)更多的客戶信息，提高客戶滿意度；如何在日益激烈的市場(chǎng)競(jìng)爭(zhēng)中把握機(jī)會(huì)，占有更大的市場(chǎng)份額；如何建立高效業(yè)務(wù)流程，降低運(yùn)營(yíng)成本，獲取更多的利潤(rùn)，這些已成為每個(gè)企業(yè)怕面臨的首要問題。這種情況下，企業(yè)要在激烈的市場(chǎng)競(jìng)爭(zhēng)中立于不敗之地，就必須找一種全新的管理理念和管理手段，對(duì)其內(nèi)部和外部資源進(jìn)行有效的整合。新一代一erp產(chǎn)品正在向客

2、戶端和供應(yīng)端延伸，客戶端的延伸是客戶關(guān)系管理，而供應(yīng)端的延伸則是跨企業(yè)供應(yīng)鏈的同步管理。對(duì)于每個(gè)企業(yè)來(lái)說(shuō)客戶管理的完善程度將直接影響企業(yè)的經(jīng)濟(jì)效益。【關(guān)鍵詞】 客戶關(guān)系管理系統(tǒng)、庫(kù)存管理、報(bào)表管理目錄摘要10 引言11 系統(tǒng)分析21.1 需求分析21.2 可行性分析22 總體設(shè)計(jì)22.1 項(xiàng)目規(guī)劃22.2 系統(tǒng)功能結(jié)構(gòu)圖33 系統(tǒng)設(shè)計(jì)33.1 設(shè)計(jì)目標(biāo)33.2 開發(fā)及運(yùn)行環(huán)境43.3 數(shù)據(jù)庫(kù)設(shè)計(jì)44 客戶管理模塊設(shè)計(jì)44.1 客戶信息管理設(shè)計(jì)44.2 聯(lián)系人信息管理設(shè)計(jì)104.3 合同信息管理135 服務(wù)管理165.1 反饋信息添加165.2 反饋信息修改176 報(bào)表管理196.1 客戶報(bào)表模

3、塊196.2 聯(lián)系人報(bào)表模塊25附錄a 參考文獻(xiàn)附錄b 數(shù)據(jù)表0 引言信息時(shí)代的今天，各企業(yè)商家所關(guān)心的不再局限于自身的產(chǎn)品質(zhì)量、生產(chǎn)設(shè)備、員工的素質(zhì)，更多的是關(guān)心自己的銷售群體（客戶群），關(guān)心他們的想法、需求、購(gòu)賣目的。眾所周知，顧客就是我們的上帝，我們只有滿足了上帝的需求，上帝才能給我們帶來(lái)一切。一個(gè)企業(yè)要生存、要發(fā)展，就是要不斷的滿足客戶的需求，無(wú)論我們做出什么樣的決策，最終都是為了這個(gè)的目。每個(gè)領(lǐng)域都有自身生存法則，但無(wú)論這個(gè)法則如何變化，為客戶服務(wù)的宗旨是不會(huì)變的。作為企業(yè)，我們只有不斷地挖掘新客戶，維護(hù)好和老客戶的關(guān)系，占領(lǐng)市場(chǎng)客戶群體的絕大多數(shù)份額，才能在整個(gè)領(lǐng)域取得一席之地。海

4、爾總裁張瑞敏指出：“客戶資源決定企業(yè)核心競(jìng)爭(zhēng)力”，上個(gè)世紀(jì)80年代是物品短缺的時(shí)代，而現(xiàn)在，信息時(shí)代是客戶短缺的時(shí)代。企業(yè)發(fā)展所需的各種資源（包括人力、物力、生產(chǎn)力）都是可以創(chuàng)造的，但每個(gè)領(lǐng)域中的客戶資源確是有限的，所以通過創(chuàng)新（產(chǎn)品的創(chuàng)新、企業(yè)管理的創(chuàng)新、服務(wù)的創(chuàng)新）來(lái)?yè)屨加邢薜目蛻糍Y源、維護(hù)好企業(yè)和客戶之間的關(guān)系、了解客戶的需求動(dòng)向，成為企業(yè)生存發(fā)展面臨的重大問題。1 系統(tǒng)分析1.1 需求分析通過調(diào)查研究，要求系統(tǒng)滿足有以下功能；q 由于操作人員的計(jì)算機(jī)知識(shí)普遍較差，要求有良好的人機(jī)界面。q 方便的數(shù)據(jù)選擇查詢，支持模糊查詢功能。q 管理客戶的詳細(xì)信息：包括客戶的基本信息、聯(lián)系人信息、和客

5、戶簽寫的合同信息。q 記錄產(chǎn)品出庫(kù)、入庫(kù)的詳細(xì)信息。q 為更多的了解客戶的需求，設(shè)計(jì)了服務(wù)模塊，用以記錄客戶的反饋信息，并對(duì)反饋信息進(jìn)行管理。q 和客戶聯(lián)系人之間通過郵件（e-mail）進(jìn)行聯(lián)系，對(duì)聯(lián)系人郵件地址進(jìn)行管理。q 提供信息數(shù)據(jù)導(dǎo)出excel報(bào)表的功能，提供報(bào)表的打印功能。q 對(duì)用戶信息進(jìn)行管理，并為用戶設(shè)置管理權(quán)限。q 數(shù)據(jù)計(jì)算自動(dòng)完成，盡量減少人工干預(yù)。q 修改當(dāng)前管理員密碼的功能。q 系統(tǒng)退出。1.2 可行性分析q 經(jīng)濟(jì)性通過計(jì)算機(jī)網(wǎng)絡(luò)對(duì)客戶信息進(jìn)行管理，使企業(yè)對(duì)自身?yè)碛械目蛻粲辛艘粋€(gè)更為深該的了解。不僅能全面的統(tǒng)計(jì)客戶的購(gòu)買數(shù)量，及時(shí)的了解客戶的動(dòng)態(tài)信息，還可以根據(jù)計(jì)算機(jī)記錄

6、的數(shù)據(jù)信息，不斷的調(diào)整企業(yè)的生產(chǎn)發(fā)展動(dòng)向。q 技術(shù)性系統(tǒng)中設(shè)置了email管理模塊，此模塊大大的方便了企業(yè)和客戶聯(lián)系人之間的溝通。設(shè)置導(dǎo)入excel功能、web打印功能，方便用戶報(bào)表打印。2 總體設(shè)計(jì)2.1 項(xiàng)目規(guī)劃客戶關(guān)系管理系統(tǒng)是一個(gè)典型的數(shù)據(jù)庫(kù)開發(fā)應(yīng)用程序，由客戶管理模塊、庫(kù)存管理模塊、服務(wù)管理模塊、報(bào)表管理模塊、email管理模塊、用戶管理模塊組成，規(guī)劃系統(tǒng)功能模塊如下：q 客戶管理模塊該模塊主要功能是對(duì)客戶信息、客戶聯(lián)系人信息、合同信息進(jìn)行添加、刪除、查詢等操作。q 庫(kù)存管理模塊該模塊的主要功能是管理入庫(kù)、出庫(kù)信息、產(chǎn)品信息進(jìn)行管理，其中包括對(duì)庫(kù)存信息、產(chǎn)品信息進(jìn)行添加、刪除、查詢等

7、操作。q 服務(wù)管理模塊該模塊主要功能是對(duì)客戶反饋信息進(jìn)行添加、刪除、查詢等操作。q 報(bào)表管理模塊該模塊主要通過查詢條件，對(duì)各種信息進(jìn)行查詢，并將得到的結(jié)果導(dǎo)出excul表、進(jìn)行打印報(bào)表等操作（其中信息包括：客戶信息、聯(lián)系人信息、反饋客戶信息、庫(kù)存信息）。q email管理模塊該模塊主要管理客戶聯(lián)系人email地址信息，對(duì)企業(yè)客戶之間的email文件進(jìn)行管理，向客戶發(fā)送郵件。q 用戶管理該模塊主要管理用戶信息的添加、刪除等操作，并設(shè)置用戶的使用權(quán)限。2.2 系統(tǒng)功能結(jié)構(gòu)圖圖1 數(shù)據(jù)表樹型結(jié)構(gòu)圖3 系統(tǒng)設(shè)計(jì)3.1 設(shè)計(jì)目標(biāo)本系統(tǒng)是針對(duì)中小型企業(yè)通過網(wǎng)絡(luò)實(shí)現(xiàn)對(duì)客戶的管理而設(shè)計(jì)的，主要實(shí)現(xiàn)如下目標(biāo)：q

8、 對(duì)客戶信息（客戶基本信息、聯(lián)系人信息、合同信息）進(jìn)行全面管理。q 及時(shí)查看庫(kù)存信息，并通過網(wǎng)站對(duì)入庫(kù)、出庫(kù)信息進(jìn)行管理。q 強(qiáng)大的客戶信息、聯(lián)系人信息報(bào)表導(dǎo)出、打印功能q 及時(shí)了解客戶的反饋信息，并對(duì)其進(jìn)行管理。q 實(shí)現(xiàn)各種信息的選擇查詢、模糊查詢功能等。q 實(shí)現(xiàn)了和客戶通過網(wǎng)絡(luò)在線溝通的功能，并對(duì)客戶聯(lián)系人的email地址進(jìn)行管理。q 管理員可以添加操作員信息、設(shè)置操作員的權(quán)限。q 對(duì)用戶輸入的數(shù)據(jù)，系統(tǒng)進(jìn)行嚴(yán)格的數(shù)據(jù)檢驗(yàn)，盡可能排除人為的錯(cuò)誤。q 要求系統(tǒng)的數(shù)據(jù)保密性強(qiáng)，通過為每個(gè)用戶設(shè)置使用權(quán)限來(lái)實(shí)現(xiàn)。q 系統(tǒng)運(yùn)行穩(wěn)定、安全可靠。q 鍵盤操作，快速響應(yīng)。3.2 開發(fā)及運(yùn)行環(huán)境硬件平臺(tái)：

9、q cpu：p41。8ghz；q 內(nèi)存：256mb以上。軟件平臺(tái)：q 操作系統(tǒng)：windows xp/ windows 2000/ windows 2003；q 數(shù)據(jù)庫(kù)：sql server 2000；q 瀏覽器：ie5.0，推薦使用ie6.0；q web服務(wù)器：iis5.0；q 分辨率：最佳效果1024*768。3.3 數(shù)據(jù)庫(kù)設(shè)計(jì)本系統(tǒng)數(shù)據(jù)庫(kù)采用sqlserver2000數(shù)據(jù)庫(kù)，系統(tǒng)數(shù)據(jù)庫(kù)名稱為db_system。數(shù)據(jù)庫(kù)db_ system中包含8張表。關(guān)于數(shù)據(jù)庫(kù)中的數(shù)據(jù)表請(qǐng)參見附錄b。4 客戶管理模塊設(shè)計(jì)客戶管理模塊的主要功能是對(duì)客戶信息進(jìn)行管理，主要包括客戶信息管理、聯(lián)系人信息管理和合同

10、信息管理3個(gè)部分。4.1 客戶信息管理設(shè)計(jì)客戶信息管理設(shè)計(jì)主要包括對(duì)客戶信息進(jìn)行顯示/查詢、添加、修改和刪除4個(gè)部分的功能。用戶可以通過功能導(dǎo)航進(jìn)入客戶信息管理頁(yè)面，頁(yè)面設(shè)計(jì)效果如圖3所示。圖3 客戶信息管理頁(yè)面的設(shè)計(jì)效果在客戶信息管理頁(yè)面中，用戶可以在查詢區(qū)域輸入查詢條件，并選擇查詢方式，查找相關(guān)的客戶信息；也可以單擊客戶信息，在展示區(qū)會(huì)顯示此客戶的詳細(xì)信息，也可對(duì)客戶信息進(jìn)行修改；在選中每條信息前面的復(fù)選框，單擊【刪除】按鈕，選中的客戶信息將被刪除。1客戶信息顯示/查詢用戶可以在客戶信息管理頁(yè)面中的查詢部分，輸入一定的查詢條件進(jìn)行客戶信息的查詢。當(dāng)用戶在查詢部分輸入條件后，并單擊【查詢】按

11、鈕，用戶添加的查詢條件將被提交給本頁(yè)，本頁(yè)將根據(jù)用戶提交的表單信息對(duì)數(shù)據(jù)庫(kù)進(jìn)行檢索，并將結(jié)果集通過操作區(qū)輸出到瀏覽器中。客戶信息查詢頁(yè)面涉及的html表單元素如表1所示。表1 客戶信息查詢頁(yè)面涉及的html表單元素名稱類型含義重要屬性form1form表單method=post action=posthidden判斷表單是否提交value=truetiaoselect查詢類型option value=模糊查詢 selected模糊查詢option value=精確查詢 selected精確查詢selselect關(guān)鍵字類別option value=clientname selected客戶名稱o

12、ption value=clienthabitude selected企業(yè)性質(zhì)searchtext關(guān)鍵字input name=search type=text id=search value=submitsubmit查詢按鈕class=input value=查詢?cè)诒韱翁峤恢螅诒卷?yè)將數(shù)據(jù)進(jìn)行處理。程序代碼如下：%if request(post) thenif request(tiao)=模糊查詢 then 條件輸入為模糊查詢時(shí)獲得相應(yīng)的記錄集set rs=server.createobject(adodb.recordset)sql=select * from tb_client wher

13、e &request(sel)& like %&request(search)&% order by id descrs.open sql,conn,1,1else 條件輸入為精確查詢時(shí)獲得相應(yīng)的記錄集set rs=server.createobject(adodb.recordset)sql=select * from tb_client where &request(sel)&=&request(search)& order by id descrs.open sql,conn,1,1end ifelse 默認(rèn)狀態(tài)下獲得相應(yīng)的記錄集set rs=server.createobject(ad

14、odb.recordset)sql=select * from tb_client order by id descrs.open sql,conn,1,1end if實(shí)現(xiàn)分頁(yè)if not rs.eof thentol=rs.recordcount 總記錄數(shù)rs.pagesize=15 獲取每頁(yè)顯示的記錄數(shù)maxpage=rs.pagecount requestpage=clng(request(p) 獲取當(dāng)前頁(yè)if requestpage= or requestpage=0 then 當(dāng)接收頁(yè)碼的值為空或者0時(shí)使其等于1requestpage=1end ifif requestpagemax

15、page then 在接收頁(yè)碼的值大于最大頁(yè)碼時(shí)，使其等于最大頁(yè)碼requestpage=maxpageend ifif requestpage1 then 向上或向下移動(dòng)相應(yīng)的記錄rs.move (requestpage-1)*rs.pagesizeend iffor i=1 to rs.pagesize and not rs.eof 利用循環(huán)輸出數(shù)據(jù)if i mod 2=1 thenbg=#ffffffelsebg=#efefefend if% tr align=center bgcolor= style=cursor: hand onclick=window.parent.frames(

16、bo).window.location = kehu_ed.asp?id=onmouseover=hlitem(this) onmouseout=re(this) %rs.movenextif rs.eof then exit for 如果記錄集為空那么跳出循環(huán)nextelseresponse.write(沒有客戶信息，請(qǐng)?zhí)砑?end if%當(dāng)鼠標(biāo)在某條記錄上懸停時(shí)，其記錄所在行的背景顏色會(huì)發(fā)生改變，此功能用到的js代碼如下：function hlitem(obj)/鼠標(biāo)經(jīng)過obj.oldclassname=obj.classname;obj.classname=list;function r

17、e(obj)/鼠標(biāo)移開 obj.classname=obj.oldclassname其調(diào)用的代碼如下：tr align=center bgcolor= style=cursor:hand onclick=window.parent.frames(bo).window.location = kehu_ed.asp?id= onmouseover=hlitem(this) onmouseout=re(this)客戶信息顯示/查詢頁(yè)面的運(yùn)行結(jié)果如圖4所示：圖4 客戶信息查詢頁(yè)面的運(yùn)行結(jié)果2客戶信息添加客戶信息添加的主要功能是用于用戶添加客戶信息。在查詢頁(yè)面中單擊【添加】按鈕，在展示區(qū)中會(huì)顯示添加頁(yè)面

18、，其設(shè)計(jì)效果如圖5所示。如圖5 客戶信息添加頁(yè)面設(shè)計(jì)效果當(dāng)單擊添加頁(yè)面中的【添加】按鈕時(shí)，調(diào)用js編寫的自定義函數(shù)（checks()），通過函數(shù)驗(yàn)證填寫的數(shù)據(jù)是否正確，該函數(shù)的代碼如下：function checks() if(form1.clientname.value=)alert(公司名稱不能為空);return false;/中間過程不詳細(xì)介紹，因?yàn)閷?shí)現(xiàn)方法類似 else if(form1.clientcyc.value=)alert(需求周期不能為空);return false;表單提交之后，添加的數(shù)據(jù)將被提交到本頁(yè)進(jìn)行處理，本頁(yè)數(shù)據(jù)處理的程序代碼如下：%if request(pos

19、t) thenset rs=server.createobject(adodb.recordset)sql=select * from tb_clientrs.open sql,conn,1,3rs.addnewrs(clientname)=request(clientname) 添加公司名稱rs(clientaddress)=request(clientaddress) 公司地址rs(clienttel)=request(clienttel) 公司電話rs(clientfax)=request(clientfax) 公司傳真rs(clientnumber)=request(clientnum

20、ber) 郵政編碼rs(clientpage)=request(clientpage) 公司網(wǎng)址rs(clientemail)=request(clientemail) 公司emailrs(clientcountry)=request(clientcountry) 所屬國(guó)家/地區(qū)rs(clienthabitude)=request(clienthabitude) 公司性質(zhì)rs(clientsize)=request(clientsize) 公司規(guī)模rs(clientcity)=request(clientcity) 所屬城市rs(clientpay)=request(clientpay) 結(jié)款

21、方式rs(clientcredit)=request(clientcredit) 結(jié)款信用rs(clientlist)=request(clientlist) 最高訂單rs(clientyear)=request(clientyear) 年度訂單rs(clientcyc)=request(clientcyc) 需求周期rs(settime)=now() 創(chuàng)建時(shí)間rs(edittime)=now() 修改時(shí)間rs(setname)=session(admin_name) 創(chuàng)建人rs.updaters.closeconn.closeresponse.write(alert(客戶信息添加成功)彈出成

22、功對(duì)話框end if%3客戶信息修改在顯示客戶詳細(xì)信息頁(yè)面，用戶可以瀏覽、修改其客戶的詳細(xì)信息。進(jìn)行客戶詳細(xì)信息瀏覽和修改的頁(yè)面設(shè)計(jì)效果如圖6所示：圖6 客戶信息修改頁(yè)面設(shè)計(jì)效果在客戶信息修改頁(yè)面，用戶可以瀏覽客戶詳細(xì)的信息，也可以修改客戶的信息（當(dāng)用戶有修改的權(quán)限時(shí)，那么用戶可以進(jìn)行修改，至于用戶權(quán)限的實(shí)現(xiàn)，將在后面的章節(jié)中進(jìn)行講解）。當(dāng)用戶單擊【修改】按鈕后，修改的數(shù)據(jù)將被提交到本頁(yè)進(jìn)行處理。數(shù)據(jù)處理的代碼如下：% if request(post) and (rsr(client)=可寫 or rsr(chaoji)=是) then set rs=server.createobject(a

23、dodb.recordset)sql=select * from tb_client where id=&request(id)rs.open sql,conn,1,3rs(clientname)=request(clientname) 添加公司名稱rs(clientaddress)=request(clientaddress) 公司地址rs(clienttel)=request(clienttel) 公司電話rs(clientfax)=request(clientfax) 公司傳真rs(clientnumber)=request(clientnumber) 郵政編碼rs(clientpage

24、)=request(clientpage) 公司網(wǎng)址rs(clientemail)=request(clientemail) 公司emailrs(clientcountry)=request(clientcountry) 所屬國(guó)家/地區(qū)rs(clienthabitude)=request(clienthabitude) 公司性質(zhì)rs(clientsize)=request(clientsize) 公司規(guī)模rs(clientcity)=request(clientcity) 所屬城市rs(clientpay)=request(clientpay) 結(jié)款方式rs(clientcredit)=req

25、uest(clientcredit) 結(jié)款信用rs(clientlist)=request(clientlist) 最高訂單rs(clientyear)=request(clientyear) 年度訂單rs(clientcyc)=request(clientcyc) 需求周期rs(edittime)=now() 修改時(shí)間rs(setname)=session(admin_name) 創(chuàng)建人rs.updaters.closeresponse.write(alert(客戶信息修改成功)彈出成功對(duì)話框end if%4客戶信息刪除在客戶信息管理頁(yè)面，用戶可以點(diǎn)選任意一條客戶信息前面的復(fù)選框，然后單擊頁(yè)

26、面下方的【刪除】按鈕，被選擇的客戶信息將被刪除。客戶信息刪除主要是根據(jù)傳遞的參數(shù)（本例中的參數(shù)為客戶信息的id），將數(shù)據(jù)庫(kù)中對(duì)應(yīng)id的客戶信息和其他和客戶相關(guān)的信息全部刪除，程序代碼如下：%call client 驗(yàn)證是否有刪除客戶信息的權(quán)限if request(del) thenkid=split(request(del),) 分解字符串成數(shù)組for i=0 to ubound(kid)sqld=delete from tb_client where id=&clng(kid(i)刪除客戶信息conn.execute(sqld)sqll=delete from tb_linkman wher

27、e linkmanclient=&clng(kid(i)刪除客戶的聯(lián)系人信息conn.execute(sqll)sqlp=delete from tb_pact where pactclient=&clng(kid(i)刪除客戶的合同信息conn.execute(sqlp)sqlp=delete from tb_feedback where feedbackclient=&clng(kid(i)刪除客戶反饋信息conn.execute(sqlp)sqlp=delete from tb_product where productprovider=&clng(kid(i)刪除客戶的產(chǎn)品信息conn

28、.execute(sqlp)nextif request(p)= then 返回用戶操作頁(yè)response.redirect(kehu_kehu.asp)elseresponse.redirect(kehu_kehu.asp?p=&request(p)end ifelseresponse.write(alert(請(qǐng)選擇要?jiǎng)h除的信息);location=javascript:history.go(-1)end if%4.2 聯(lián)系人信息管理設(shè)計(jì)聯(lián)系人信息管理的主要功能包括顯示/查詢、添加、修改和刪除聯(lián)系人信息4個(gè)部分。用戶可以通過功能導(dǎo)航進(jìn)入聯(lián)系人信息管理頁(yè)面，頁(yè)面設(shè)計(jì)效果如圖7所示。圖7 聯(lián)系人

29、信息管理頁(yè)面設(shè)計(jì)效果1聯(lián)系人信息顯示/查詢用戶可以在聯(lián)系人信息管理頁(yè)面中的查詢部分，輸入一定的查詢條件進(jìn)行聯(lián)系人信息的查詢。用戶在查詢部分輸入條件后，單擊【查詢】按鈕，用戶添加的查詢條件將被提交給本頁(yè)，本頁(yè)則將根據(jù)用戶提交的表單信息對(duì)數(shù)據(jù)庫(kù)進(jìn)行檢索，并將結(jié)果集通過操作區(qū)輸出到瀏覽器中。查詢代碼如下：%if request(post) thenif request(tiao)=模糊查詢 then 聯(lián)系人模糊查詢set rs=server.createobject(adodb.recordset)sql=select * from tb_linkman where &request(sel)& l

30、ike %&request(search)&% order by id descrs.open sql,conn,1,1else 聯(lián)系人精確查詢set rs=server.createobject(adodb.recordset)sql=select * from tb_linkman where &request(sel)&=&request(search)& order by id desc rs.open sql,conn,1,1end ifelse 默認(rèn)狀態(tài)下顯示聯(lián)系人列表set rs=server.createobject(adodb.recordset)sql=select * f

31、rom tb_linkman order by id descrs.open sql,conn,1,1end if%分頁(yè)代碼請(qǐng)參考4.1節(jié)中介紹的客戶信息顯示/查詢中的相關(guān)代碼。也可在查看客戶的詳細(xì)信息中，單擊“聯(lián)系人信息”，就會(huì)產(chǎn)生此客戶的聯(lián)系人列表，傳參代碼如下：a href=kehu_linkman.asp?post=true&sel=linkmanclient&search=&dd=dd聯(lián)系人信息2聯(lián)系人信息添加聯(lián)系人信息添加的主要功能是添加客戶的聯(lián)系人信息。在查詢頁(yè)面中單擊【添加】按鈕，在展示區(qū)中會(huì)顯示添加頁(yè)面。在添寫表單選擇所屬客戶時(shí)，所屬客戶是在數(shù)據(jù)庫(kù)中直接讀取出來(lái)的。其代碼如下

32、： option value=%elseresponse.write(沒有客戶信息，請(qǐng)?zhí)砑?end if%添加聯(lián)系人頁(yè)面的運(yùn)行結(jié)果如圖8所示。圖8 添加聯(lián)系人的頁(yè)面運(yùn)行結(jié)果也可在客戶的詳細(xì)信息中單擊【新建】按鈕，在此添加用戶不用選擇所屬客戶，直接就會(huì)生成所屬客戶，主要是根據(jù)傳遞的參數(shù)（本例中的參數(shù)為客戶信息的id），傳參代碼如下：a href=kehu_linkman_addy.asp?id=新建其顯示代碼如下：3聯(lián)系人信息修改聯(lián)系人信息修改的主要功能是用戶修改聯(lián)系人信息，方便用戶和客戶之間的聯(lián)系和溝通。在顯示聯(lián)系人詳細(xì)信息頁(yè)面，用戶可以更改其聯(lián)系人的信息。聯(lián)系人信息修改頁(yè)面運(yùn)行結(jié)果如圖9所示

33、。圖9 聯(lián)系人信息修改頁(yè)面運(yùn)行結(jié)果4聯(lián)系人信息刪除聯(lián)系人信息刪除的主要功能是刪除聯(lián)系人的信息。，其程序代碼如下：4.3 合同信息管理合同信息管理設(shè)計(jì)主要包括顯示/查詢、添加、修改和刪除合同信息4個(gè)部分。用戶可以通過功能導(dǎo)航進(jìn)入合同信息管理頁(yè)面，頁(yè)面設(shè)計(jì)效果如圖10所示。圖10 合同信息管理頁(yè)面的運(yùn)行結(jié)果1合同信息顯示/查詢用戶可以在合同信息管理頁(yè)面中的查詢部分，輸入一定的查詢條件，進(jìn)行合同信息的查詢。用戶在查詢部分輸入查詢條件后，單擊【查詢】按鈕，用戶所添加的查詢條件將被提交給本頁(yè)，本頁(yè)將根據(jù)用戶提交的表單信息對(duì)數(shù)據(jù)庫(kù)進(jìn)行檢索，并將結(jié)果集通過操作區(qū)輸出到瀏覽器中。合同信息查詢程序代碼如下：%i

34、f request(post) thenif request(tiao)=模糊查詢 then模糊查詢合同信息set rs=server.createobject(adodb.recordset)sql=select * from tb_pact where &request(sel)& like %&request(search)&% order by id descrs.open sql,conn,1,1else精確查詢合同信息set rs=server.createobject(adodb.recordset)sql=select * from tb_pact where &request

35、(sel)&=&request(search)& order by id descrs.open sql,conn,1,1end ifelse 默認(rèn)狀態(tài)下顯示的合同信息set rs=server.createobject(adodb.recordset)sql=select * from tb_pact order by id descrs.open sql,conn,1,1end if%合同信息顯示/查詢頁(yè)面運(yùn)行結(jié)果如圖11所示。圖11 合同信息顯示/查詢頁(yè)面運(yùn)行結(jié)果也可在查看客戶的詳細(xì)信息中，單擊“合同信息”，就會(huì)產(chǎn)生此客戶的合同列表，傳參代碼如下：a href=kehu_pact.asp

36、?post=true&sel=pactclient&search=&dd=dd 合同信息2合同信息添加合同信息添加的主要功能是用戶添加客戶的合同信息。在查詢頁(yè)面中單擊【添加】按鈕，在展示區(qū)中會(huì)顯示添加頁(yè)面，其運(yùn)行結(jié)果如圖17（上）所示；也可在客戶的詳細(xì)信息頁(yè)面單擊“新建”，在展示區(qū)中會(huì)顯示添加頁(yè)面，然后進(jìn)行合同信息添加。合同信息添加頁(yè)面的運(yùn)行結(jié)果如圖12（下）所示。圖12 合同信息添加頁(yè)面運(yùn)行結(jié)果3合同信息修改合同信息修改的主要功能是用戶修改合同信息。在顯示合同詳細(xì)信息頁(yè)面，用戶可以更改其合同的信息。合同信息修改頁(yè)面運(yùn)行結(jié)果如圖13所示。圖13 合同信息修改頁(yè)面運(yùn)行結(jié)果4合同信息的刪除合同信息

37、刪除的主要功能是刪除合同信息，其代碼如下：5 服務(wù)管理服務(wù)管理設(shè)計(jì)的主要功能包括反饋信息的顯示/查詢、添加、修改和刪除4個(gè)部分。用戶可以通過功能導(dǎo)航進(jìn)入服務(wù)管理頁(yè)面，頁(yè)面設(shè)計(jì)效果如圖20所示。圖20 服務(wù)管理頁(yè)面的設(shè)計(jì)效果5.1 反饋信息添加反饋信息添加的主要功能是用戶添加客戶的反饋信息。在查詢頁(yè)面中單擊【添加】按鈕，在展示區(qū)中會(huì)顯示添加頁(yè)面。反饋信息添加頁(yè)面的設(shè)計(jì)效果如圖21所示。圖21 反饋信息添加頁(yè)面的設(shè)計(jì)效果反饋信息添加頁(yè)面涉及的html表單元素如表3所示。表3 反饋信息信息添加頁(yè)面涉及的html表單元素名稱類型含義重要屬性form1form表單method=post action=p

38、osthidden判斷表單是否提交value=truefeedbacktitletext反饋主題class=in size=30feedbackfulfillradio是否完成 value=未完成 value=已完成yearselect年option value=monthselect月option value=dayselect日option value=feedbackclientselect相關(guān)客戶option value=feedbackcontenttextarea詳細(xì)內(nèi)容cols=88 rows=4 class=tablefeedbackresulttextarea處理結(jié)果cols

39、=88 rows=4 class=tablesubmitselect添加按鈕class=input value=添加 onclick=return checks()表單提交之后，添加的數(shù)據(jù)將被提交到本頁(yè)進(jìn)行處理。數(shù)據(jù)處理的程序代碼如下：%call feedbackif request(post) thenset rs=server.createobject(adodb.recordset)sql=select * from tb_feedbackrs.open sql,conn,1,3rs.addnew 主要用于添加客戶反饋信息的數(shù)據(jù)rs(feedbacktitle)=request(feed

40、backtitle)rs(feedbackdate)=request(year)&-&request(month)&-&request(day)rs(feedbackclient)=request(feedbackclient)rs(feedbackcontent)=request(feedbackcontent)rs(feedbackresult)=request(feedbackresult)rs(feedbackfulfill)=request(feedbackfulfill)rs(settime)=now()rs(setname)=session(admin_name)rs.updat

41、ers.closeresponse.write(alert(反饋信息添加成功)end if%5.2 反饋信息修改因?yàn)榉答佇畔⑹强蛻舻姆答佉庖娝圆坏秒S意修改，用戶只可以修改“處理結(jié)果”和“服務(wù)完成”兩項(xiàng)信息。當(dāng)服務(wù)完成選項(xiàng)，選中“已完成”時(shí)，那么任何信息都不可以修改，也就是說(shuō)只有在服務(wù)“未完成”的情況下才能修改“處理結(jié)果”。反饋信息頁(yè)面設(shè)計(jì)效果如圖22所示。圖22 反饋信息頁(yè)面設(shè)計(jì)效果反饋信息修改頁(yè)面涉及的html表單元素如表4所示。表4 反饋信息信息修改頁(yè)面涉及的html表單元素名稱類型含義重要屬性form1form表單method=post action=posthidden判斷表單是否提

42、交value=truefeedbacktitletext反饋主題value= size=30 readonly=true class=infeedbackfulfillradio是否完成 value=未完成 checked value=已完成 checkedfeedbackdatetext年value= size=30 readonly=true class=infeedbackclientselect相關(guān)客戶value= size=30 readonly=true class=infeedbackcontenttextarea詳細(xì)內(nèi)容cols=88 rows=4 class=table re

43、adonly=truefeedbackresulttextarea處理結(jié)果cols=88 rows=4 class=table readonly=trueonfocus=this.select(); onmouseover=this.focus();submitselect添加按鈕class=input value=修 改 onclick=return checks()在反饋信息修改頁(yè)面，當(dāng)用戶單擊【修改】按鈕后，修改數(shù)據(jù)將被提交到本頁(yè)進(jìn)行處理，數(shù)據(jù)處理程序的代碼如下：%if request(post) thenset rs=server.createobject(adodb.recordset)sql=select * from tb_feedback where id=&request(id)rs.open sql,conn,1,3rs(feedbackfulfill)=request(feedbackfulfill)rs(feedbackresult)=request(feedbackresult)rs