【正文】 管理模塊 該模塊主要 管理客戶聯(lián)系人 地址信息，對企業(yè)客戶之間的 文件進行管理，向客戶發(fā)送郵件。 ? 用戶管理 該模塊主要管理用戶信息的添加、刪除等操作，并設(shè)置用戶的使用權(quán)限。 系統(tǒng)功能結(jié)構(gòu)圖 報表管理聯(lián)系人報表模塊客戶報表模塊客戶管理聯(lián)系人信息管理合同信息管理客戶信息管理庫存管理庫存管理產(chǎn)品管理服務(wù)管理反饋信息添加反饋信息修改反饋信息查詢em ai l管 理管理發(fā)件人管理客戶關(guān)系管理系統(tǒng)用戶管理用戶權(quán)限用戶管理反饋報表打印庫存報表打印 圖 1 數(shù)據(jù)表樹型結(jié)構(gòu)圖 3 系統(tǒng)設(shè)計 設(shè)計目標 本系統(tǒng)是針對中小型企業(yè)通過網(wǎng)絡(luò)實現(xiàn)對客戶的管理而設(shè)計的，主要實現(xiàn)如下目標： ? 對客戶信息（客戶基本信息、聯(lián)系人信息、合同信息）進行全面管理。 ? 及時查看庫存信息，并通過網(wǎng)站對入庫、出庫信息進行管理。 ? 強大的客戶信息、聯(lián)系人信息報表導出、打印功能 ? 及時了解客 戶的反饋信息，并對其進行管理。 ? 實現(xiàn)各種信息的選擇查詢、模糊查詢功能等。 ? 實現(xiàn)了和客戶通過網(wǎng)絡(luò)在線溝通的功能，并對客戶聯(lián)系人的 地址進行管理。 ? 管理員可以添加操作員信息、設(shè)置操作員的權(quán)限。 ? 對用戶輸入的數(shù)據(jù)，系統(tǒng)進行嚴格的數(shù)據(jù)檢驗，盡可能排除人為的錯誤。 ? 要求系統(tǒng)的數(shù)據(jù)保密性強，通過為每個用戶設(shè)置使用權(quán)限來實現(xiàn) 。 ? 系統(tǒng) 運行穩(wěn)定、安全可靠。 ? 鍵盤操作，快速響應(yīng)。 – 4 – 開發(fā)及運行環(huán)境 硬件平臺： ? CPU： P41。 8GHz； ? 內(nèi)存： 256MB 以上。 軟件平臺： ? 操作系統(tǒng)： Windows xp/ Windows 2020/ Windows 2020； ? 數(shù)據(jù)庫： SQL Server 2020； ? 瀏覽器： ，推薦使用 ； ? Web 服務(wù)器： ； ? 分辨率：最佳效果 1024*768。 數(shù)據(jù)庫設(shè)計 本系統(tǒng)數(shù)據(jù)庫采用 SQLServer2020數(shù)據(jù)庫，系統(tǒng)數(shù)據(jù)庫名稱為 db_System。數(shù)據(jù)庫 db_ System中包含 8張表。關(guān)于數(shù)據(jù)庫中的數(shù)據(jù)表請參見附錄 B。 4 客戶管理模塊設(shè)計 客戶管理模塊的主要功能是對客戶信息進行管理，主要包括客戶信息管理、聯(lián)系人信息管理和合同信息管理 3 個部分 。 客戶信息管理設(shè)計 客戶信息管理設(shè)計主要包括對客戶信息進行顯示 /查詢、添加、修改和刪除 4 個部分的功能。用戶可以通過功能導航進入客戶信息管理頁面，頁面設(shè)計效果如圖 3 所示。 圖 3 客戶信息管理頁面的設(shè)計效果 在客戶信息管理頁面中，用戶可以在查詢區(qū)域輸入查詢條件，并選擇查詢方式，查找相關(guān)的客戶信息；也可以單擊客戶信息，在展示區(qū)會顯示此客戶的詳細信息，也可對客戶信息進行修改；在選中每條信息前面的復選框，單擊【刪除】按鈕，選中的客戶信息將被刪除。 1．客戶信息顯示 /查詢 用戶可以在客戶信息管理頁面中 的查詢部分，輸入一定的查詢條件進行客戶信息的查詢。 當用戶在查詢部分輸入條件后，并單擊【查詢】按鈕，用戶添加的查詢條件將被提交給本頁，本頁將根據(jù)用戶提交的表單信息對數(shù)據(jù)庫進行檢索，并將結(jié)果集通過操作區(qū)輸出到瀏覽器中。 客戶信息查詢頁面涉及的 HTML 表單元素如表 1 所示。 – 5 – 表 1 客戶信息查詢頁面涉及的 HTML表單元素 名稱 類型 含義 重要屬性 form1 Form 表單 method=post action= post hidden 判斷表單是否提交 value=true tiao select 查詢類型 option value= 模 糊 查 詢 %if request(tiao)= 模 糊 查 詢 then%selected%end if% 模 糊 查 詢/option option value= 精 確 查 詢 %if request(tiao)= 精 確 查 詢 then%selected%end if% 精 確 查 詢/option sel select 關(guān)鍵字類別 option value=ClientName %if request(sel)=ClientName then%selected%end if% 客 戶 名 稱/option ?? option value=ClientHabitude %if request(sel)=ClientHabitude then%selected%end if% 企 業(yè) 性 質(zhì)/option search text 關(guān)鍵字 input name=search type=text id=search value=%=request(search)% Submit submit 查詢按鈕 class=input value= 查 詢 在表單提交之后，在本頁將數(shù)據(jù)進行處理。程序代碼如下： % if request(post) then if request(tiao)=模糊查詢 then ‘條件輸入為模糊查詢時獲得相應(yīng)的記錄集 set rs=() sql=select * from tb_Client where amp。request(sel)amp。 like 39。%amp。request(search)amp。%39。 order by id desc sql,conn,1,1 else ‘條件輸入為精確查詢時獲得相應(yīng)的記錄集 set rs=() sql=select * from tb_Client where amp。request(sel)amp。=39。amp。request(search)amp。39。 order by id desc sql,conn,1,1 end if else ‘默認狀態(tài)下獲得相應(yīng)的記錄集 set rs=() sql=select * from tb_Client order by id desc sql,conn,1,1 – 6 – end if 39。實現(xiàn)分頁 if not then tol= 39?？傆涗洈?shù) =15 39。獲取每頁顯示的記錄數(shù) maxpage= requestpage=clng(request(p)) 39。獲取當前頁 if requestpage= or requestpage=0 then 39。當接收頁碼的值為空或者 0時使其等于 1 requestpage=1 end if if requestpagemaxpage then 39。在接收頁碼的值大于最大頁碼時，使其等于最大頁碼 requestpage=maxpage end if if requestpage1 then 39。向上或向下移動相應(yīng)的記錄 (requestpage1)* end if for i=1 to and not 39。利用循環(huán)輸出數(shù)據(jù) if i mod 2=1 then bg=FFFFFF else bg=efefef end if % tr align=center bgcolor=%=bg% style=cursor: hand onClick=(39。bo39。). = 39。?id=%=rs(id)%39。onMouseOver=HLItem(this) onMouseOut=Re(this) td height=22%=rs(ClientName)%/td td%=rs(ClientCountry)%/td td%=rs(ClientCity)%/td td%=rs(ClientTel)%/td td%=rs(ClientEmail)%/td /tr % if then exit for ’ 如果記錄集為空那么跳出循環(huán) next else (沒有客戶信息，請 a href=39。39。 target=39。bo39。添加 /a) end if% 當鼠標在某條記錄上懸停時，其記錄所在行的背景顏色會發(fā)生改變，此功能用到的 js 代碼如下： – 7 – script language=javascript function HLItem(obj)//鼠標經(jīng)過 { =。 =List。 } function Re(obj)//鼠標移開 { = } /script 其調(diào)用的代碼如下： tr align=center bgcolor=%=bg% style=cursor:hand onClick=(39。bo39。). = 39。?id=%=rs(id)%39。 onMouseOver=HLItem(this) onMouseOut=Re(this) 客戶信息顯示 /查詢頁面的運行結(jié)果如圖 4 所示： 圖 4 客戶信息查詢頁面的運行結(jié)果 2．客戶信息添加 客戶信息添加的主要功能是用于用戶添加客戶信息。在查詢頁面中單擊【添加】按鈕，在展示區(qū)中會顯示添加頁面，其設(shè)計效果如圖 5 所示。 如圖 5 客戶信息添加頁面設(shè)計效果 當單擊添加頁面中的【添加】按鈕時，調(diào)用 js編寫的自定義函數(shù)（ checks()），通過函數(shù)驗證填寫的數(shù)據(jù)是否正確，該函數(shù)的代碼如下： script language=javascript – 8 – function checks() { if(==) { alert(公司名稱不能為空 )。 return false。 } ?? //中間過程不詳細介紹，因為實現(xiàn)方法類似 else if(==) { alert(需求周期不能為空 )。 return false。 } } /script 表單提交之后，添加的數(shù)據(jù)將被提交到本頁進行處理，本頁數(shù)據(jù)處理的程序代碼如下： % if request(post) then set rs=() sql=select * from tb_Client sql,conn,1,3 rs(ClientName)=request(ClientName) ‘添加公司名稱 rs(ClientAddress)=request(ClientAddress) ‘公司地址 rs(ClientTel)=request(ClientTel) ‘公司電話 rs(ClientFax)=request(ClientFax) ‘公司傳真 rs(ClientNumber)=request(ClientNumber) ‘郵政編碼 rs(ClientPage)=request(ClientPage) ‘公司網(wǎng)址 rs(ClientEmail)=request(ClientEmail) ‘公司 rs(ClientCountry)=request(ClientCountry) ‘所屬國家 /地區(qū) rs(ClientHabitude)=request(ClientHabitude) ‘公司性質(zhì) rs(ClientSize)=request(ClientSize) ‘公司規(guī)模 rs(ClientCity)=request(ClientCity) ‘所屬城市 rs(C