【正文】 end if sql=SELECT , , , FROM INNER JOIN ON = where amp。amp。 用戶可以在報表管理頁面 中的聯(lián)系人報表查詢部分，輸入一定的查詢條件，進行聯(lián)系人信息的查詢。打印 /a/td /form /tr /table 打印預(yù)覽頁面代碼如下： % sql=request(sql) if request(sql)= then sql=session(sql) end if session(sql)=sql show=request(show) set rs=() sql=session(sql) sql,conn,1,1 % % if not then tol= =show maxpage= requestpage=clng(request(p)) if requestpage= or requestpage=0 then requestpage=1 end if if requestpagemaxpage then requestpage=maxpage end if if requestpage1 then (requestpage1)* end if for i=1 to and not % tr align=center td height=30%=rs(ClientName)%/td td%=rs(ClientCountry)%/td td%=rs(ClientCity)%/td – 25 – td%=rs(ClientTel)%/td td%=rs(ClientFax)%/td td%=rs(ClientEmail)%/td /tr % if then exit for next else (span class=39。獲取 sql語句 if sql= then sql=session(sql) end if session(sql)=sql show=request(show) set rs=() sql=sql sql,conn,1,1 if not then tol= =show maxpage= requestpage=clng(request(p)) else maxpage=0 tol=0 show=0 end if % table width=649 border=0 align=center tr valign=middle form name=form1 td width=14% valign=middle select name=menu1 onChange=MM_jumpMenu(39。sql (?sql=amp。當(dāng)關(guān)鍵字不為空時 sql=sqlamp。39。amp。當(dāng)為聯(lián)系人報表查詢時產(chǎn)生相應(yīng)字段 a=array(姓名 ,客戶名稱 ,部門 ,職務(wù) ,電話 ,手機 ,Email) elseif request(tt)=excul_k then 39。 end if sql=select ClientName,ClientCountry,ClientCity,ClientTel,ClientFax,ClientEmail from tb_Client where amp。 end if if trim(request(search)) then 39。request(ClientCity)amp。 and ClientCountry=39。 表 5 客戶報表查詢頁面涉及的 HTML表單元素 名稱 類型 含義 重要屬性 form1 Form 表單 method=post action= eeeet Hidden 判斷表單如何處理 ClientCountry Select 國家 /地區(qū) option value=%=rsg(ClientCountry)% %=rsg(ClientCountry)%/option ClientCity Select 城市 option value=%=rsc(ClientCity)% %=rsc(ClientCity)%/option SetName Select 創(chuàng)建者 option value=%=rss(SetName)% %=rss(SetName)%/option – 20 – searchtype 類別 option value=ClientName公司名稱/option ?? option value=ClientAddress公司地址 /option Submit submit 導(dǎo)入 Execul class=input value= 導(dǎo)入 Excul onClick==39。)。當(dāng)服務(wù)完成選項，選中“已完成”時，那么任何信息都不可以修改，也就是說只有在服務(wù)“未完成”的情況下才能修改“處理結(jié)果”。 圖 21 反饋信息添加頁面的設(shè)計效果 反饋信息添加頁面涉及的 HTML 表單元素如表 3 所示。 在顯示合同詳細信息頁面，用戶可以更改其合同的信息。 order by id desc sql,conn,1,1 end if else’ 默認狀態(tài)下顯示的合同信息 set rs=() sql=select * from tb_Pact order by id desc sql,conn,1,1 end if % 合同信息顯示 /查詢頁面運行結(jié)果如圖 11 所示。request(search)amp。clng(kid(i)) ‘刪除指定的記錄 (sqld) next % 合同信息管理 合同信息管理設(shè)計主要包括顯示 /查詢、添加、修改和刪除合同信息 4個部分。添加 /a) end if% 添加聯(lián)系人頁面的運行結(jié)果如圖 8 所示。search=%=rsx(id)%amp。request(sel)amp。 用戶在查詢部分輸入條件后，單擊【查詢】按鈕，用戶添加的查詢條件將被提交給本頁，本頁則將根據(jù)用戶提交的表單信息對數(shù)據(jù)庫進行檢索，并將結(jié)果集通過操作區(qū)輸出到瀏覽器中。request(p)) end if else (script language=javascriptalert(39。刪除客戶的聯(lián)系人信息 (sqll) sqlp=delete from tb_Pact where PactClient=amp。當(dāng)用戶單擊【修改】按鈕后，修改的數(shù)據(jù)將被提交到本頁進行處理。 onMouseOver=HLItem(this) onMouseOut=Re(this) 客戶信息顯示 /查詢頁面的運行結(jié)果如圖 4 所示： 圖 4 客戶信息查詢頁面的運行結(jié)果 2．客戶信息添加 客戶信息添加的主要功能是用于用戶添加客戶信息。 target=39。在接收頁碼的值大于最大頁碼時，使其等于最大頁碼 requestpage=maxpage end if if requestpage1 then 39。request(search)amp。 like 39。用戶可以通過功能導(dǎo)航進入客戶信息管理頁面，頁面設(shè)計效果如圖 3 所示。 – 4 – 開發(fā)及運行環(huán)境 硬件平臺： ? CPU： P41。 ? 強大的客戶信息、聯(lián)系人信息報表導(dǎo)出、打印功能 ? 及時了解客 戶的反饋信息，并對其進行管理。 2 總體設(shè)計 項目規(guī)劃 客戶關(guān)系管理系統(tǒng)是一個典型的數(shù)據(jù)庫開發(fā)應(yīng)用程序，由客戶管理模塊、庫存管理模塊、服務(wù)管理模塊、報表管理模塊、 管理模塊、用戶管理模塊組成，規(guī)劃系統(tǒng)功能模 塊如下： ? 客戶管理模塊 該模塊主要功能是對客戶信息、客戶聯(lián)系人信息、合同信息進行添加、刪除、查詢等操作。 ? 對用戶信息進行管理，并為用戶設(shè)置管理權(quán)限。企業(yè)發(fā)展所需的各種資源（包括人力、物力、生產(chǎn)力）都是可以創(chuàng)造的，但每個領(lǐng)域中的客戶資源確是有限的，所以通過創(chuàng)新（產(chǎn)品的創(chuàng)新、企業(yè)管理的創(chuàng)新、服務(wù)的創(chuàng)新）來搶占有限的客戶資源、維護好企業(yè)和客戶之間的關(guān)系、了解客戶的需求動向，成為企業(yè)生存發(fā)展面臨的重大問題。新一代一 ERP 產(chǎn)品正在向客戶端和供應(yīng)端延伸，客戶端的延伸是客戶關(guān)系管理，而供應(yīng)端的延伸則是跨企業(yè)供應(yīng)鏈的同步管理。對于每個企業(yè)來說客戶管理的完善程度將直接影響企業(yè)的經(jīng)濟效益。 – 2 – 1 系統(tǒng)分析 需求分析 通過調(diào)查研究，要求系統(tǒng)滿足有以下功能； ? 由于操作人員的計算機知識普遍較差，要求有良好的人機界面。 ? 數(shù)據(jù)計算自動完成，盡量減少人工干預(yù)。 ? 庫存管理模塊 該模塊的主要功能是管理入庫、出庫信息、產(chǎn)品信息進行管理，其中包括對庫存信息、產(chǎn)品信息進行添加、刪除、查詢等操作。 ? 實現(xiàn)各種信息的選擇查詢、模糊查詢功能等。 8GHz； ? 內(nèi)存： 256MB 以上。 圖 3 客戶信息管理頁面的設(shè)計效果 在客戶信息管理頁面中，用戶可以在查詢區(qū)域輸入查詢條件，并選擇查詢方式，查找相關(guān)的客戶信息；也可以單擊客戶信息，在展示區(qū)會顯示此客戶的詳細信息，也可對客戶信息進行修改；在選中每條信息前面的復(fù)選框，單擊【刪除】按鈕，選中的客戶信息將被刪除。%amp。39。向上或向下移動相應(yīng)的記錄 (requestpage1)* end if for i=1 to and not 39。bo39。在查詢頁面中單擊【添加】按鈕，在展示區(qū)中會顯示添加頁面，其設(shè)計效果如圖 5 所示。數(shù)據(jù)處理的代碼如下： % if request(post) and (rsr(Client)=可寫 or rsr(chaoji)=是 ) then set rs=() sql=select * from tb_Client where id=amp。clng(kid(i))39。請選擇要刪除的信息39。 查詢代碼如下： % if request(post) then if request(tiao)=模糊查詢 then’ 聯(lián)系人模糊查詢 set rs=() sql=select * from tb_Linkman where amp。=39。dd=dd聯(lián)系人信息 /a 2．聯(lián)系人信息添加 聯(lián)系人信息添加的主要功能是添加客戶的聯(lián)系人信息。 圖 8 添加聯(lián)系人的頁面運行結(jié)果 也可在客戶的詳細信息中單擊【新建】按鈕，在此添加用戶不用選擇所屬客戶，直接就會生成所屬客戶，主要是根據(jù)傳遞的參數(shù)（本例中的參數(shù)為客戶信息的 id），傳參代碼如下： a href=?id=%=rsx(id)%span class=style2新建 /span/a 其顯示代碼如下： % set rsc=() sqlc=select * from tb_Client where id=amp。用戶 可以通過功能導(dǎo)航進入合同信息管理頁面，頁面設(shè)計效果如圖 10 所示。%39。 圖 11 合同信息顯示 /查詢頁面運行結(jié)果 也可在查看客戶的詳細信息中，單擊“合同信息”，就會產(chǎn)生此客戶的合同列表，傳參代碼如下： a href=?post=trueamp。合同信息修改頁面運行結(jié)果如圖 13所示。 表 3 反饋信息信息添加頁面涉及的 HTML表單元素 名稱 類型 含義 重要屬性 form1 Form 表單 method=post action= post hidden 判斷表單是否提交 value=true FeedbackTitle text 反饋主題 class=in size=30 FeedbackFulfill radio 是否完成 value=未完成 value=已完成 year select 年 option value=%=i%%=i%/option month select 月 option value=%=i%%=i%/option day select 日 option value=%=i%%=i%/optio