【正文】 。 + PublicChatMessages + 39。 return (PublicChatMessages)。如果 數(shù)初始值 數(shù)組 為空 說明沒有新信息更新 var PrivateChat,SpliteScreen,ScrollSreen,FrontColor,BackColor,selfname。獲取用戶在 聊天室里的個性化設(shè)置狀態(tài) PrivateChat = 。 ScrollSreen = 。 BackColor = 。 39。 基于 ASP 聊天室設(shè)計與實現(xiàn) 16 var TalkToArray = new Array()。 var SaytimeArray = new Array()。公聊私聊信息內(nèi)容變量 var PublicChatMessages = 39。 var PrivateChatMessages= 39。 FormatMsg()。在公聊信息顯示區(qū) 追加新信息 If(PublicChatMessages!=39。) (BeforeEnd , + PublicChatMessages)。在私聊信息顯示區(qū) 追加新信息 if (PrivateChatMessages!=39。) { (BeforeEnd , PrivateChatMessages)。分屏功能是否打開 if (!SpliteScreen)//如果沒有打開分屏 { = true。 } } 39。 (0,65000)。每隔 5 秒刷新一次當(dāng)前頁面 登陸聊天室模塊 功能說明 : 此模塊用于 為用戶進入聊天 室時 ,初始化客戶端瀏覽器 和 在服務(wù)器端分屏該用戶的資源 登陸流程 : 代碼設(shè)計 : 1. 接收登陸信息 roomid = request(roomid) 基于 ASP 聊天室設(shè)計與實現(xiàn) 17 chatUsername = request(chatUsername) UserSex = request(UserSex) 變量說明請參考 2. 驗證表單信息正確性 判斷條件 : 聊天室的 id 是數(shù)值型變量 , 不是數(shù)字或為空即失敗 . 聊天室正確性判斷 if not IsNumeric(roomid) or isnull(roomid) or isempty(roomid) or roomid = then call CloseThewindow(請先選擇聊天室 !,1) () end if 用戶昵稱正確性判斷 判斷條件 : 昵稱是字符串 ,空值和 NULL 值都是失敗條件 if isnull(chatUsername) or isempty(chatUsername) or chatUsername = then call CloseThewindow(請?zhí)顚懸粋€你自己的昵稱 !,1) () end if 3. 昵稱重名判斷 判斷邏輯 : 只要在線用戶列表中不出現(xiàn)的即可 具體代碼參考附錄 ,昵稱重復(fù)檢查段程序 4. 聊天室客戶端初始化 主要利用 cookie 技術(shù) 把一些 系統(tǒng)所需變量保存到客戶端 ,以實現(xiàn)多用戶的不同狀態(tài) . (RoomAppName)(ChatNickName) = chatUsername (RoomAppName)(ChatRoomTrueName) = rs_room(Roomname) (RoomAppName)(ChatRoomAppName) = RoomAppName (RoomAppName)(MsgLastLinePointer) = 0 5. 加用戶進聊天室 其實就是 把用信息加入在線用戶表 ,然后打開聊天界面即可 sql=insert into ChatRoomUser (User_Id,NickName,Sex,LoginTime,RoomAppName,TrueRoomName,JoinIP,SessionID) values (0,39。chatUsernameamp。,39。UserSexamp。,getdate(),39。RoomAppNameamp。,39。rs_room(Roomname)amp。,39。(REMOTE_ADDR)amp。,39。amp。) (sql) ( RoomName=amp。打開聊天室 功能說明 : 用于釋放用戶的服務(wù)器斷資源和客戶端資源 基于 ASP 聊天室設(shè)計與實現(xiàn) 18 代碼設(shè)計 : 當(dāng)用戶關(guān)閉瀏覽器時執(zhí)行 : 清空 客戶端變量值 (RoomAppName)(ChatNickName) = (RoomAppName)(ChatRoomTrueName) = (RoomAppName)(ChatRoomAppName) = (RoomAppName)(MsgLastLinePointer) = (RoomAppName).Expires=Date1 從在線用戶表中刪除該用戶 sql = delete from ChatRoomUser where NickName=39。ChatNickNameamp。 and RoomAppName=39。RoomAppNameamp。 and sessionid=39。amp。 (sql) 聊天服務(wù)器 消息分發(fā)引擎 用戶 1 (聊天客戶端 IE) 用戶 2 (聊天客戶端 IE) 用戶 3 (聊天客戶端 IE) 用戶 4 (聊天客戶端 IE) 發(fā)送聊天消息 發(fā)送聊天消息 發(fā)送聊天消息 發(fā)送聊天消息 接收全局聊天消息 接收全局聊天消息 接收全局聊天消息 接收全局聊天消息 服務(wù)器端 聊天信息接收分發(fā)引擎 客戶端 聊天信息輸入與發(fā)送模塊 全局聊天消息緩沖 實例聊天室列表 表情圖釋索引表 聊天用戶個人信息保存模塊 聊天室顯示屬性個性化設(shè)置模塊 聊天室在線用戶列表 全局聊天信息接收與顯示模塊息保存模塊 全局模塊 局部模塊 退出模塊 基于 ASP 聊天室設(shè)計與實現(xiàn) 19 登陸模塊 全局消息高速緩沖 信息 1 信息 2 信息 3 . 用戶 用戶 數(shù)據(jù)接收接 口 數(shù)據(jù)發(fā)送接 口 用戶 用戶 用戶輸入聊天內(nèi)容 按回車鍵 或者 發(fā)送按鈕 客戶端發(fā)送程序 驗證內(nèi)容并提交到服務(wù)器端程序 服務(wù)器端 接收提交信息并處理 完成 1次信息顯示 客戶端顯示程序 整理信息內(nèi)容并顯示到瀏覽器頁面的信息顯示端 客戶端瀏覽器接收 從服務(wù)器端發(fā)送過來的更新信息 服務(wù)器端程序 從信息高速緩沖中獲取更新信息 完成 1次信息提交 用戶單擊控制面板上的表情圖釋超鏈接 由室登陸程序負責(zé)分配用戶資源 ,讓用戶在聊天室 中進行交互 用戶輸入 昵稱 并點擊 想進聊天室 服務(wù)器端程序 羅列出所有聊天室 彈出圖釋表情選擇對話框 信息接收模塊分析格式化圖釋符號 ,并用 Html的 img圖片標(biāo)簽替換到聊天內(nèi)容中 ,使發(fā)送到瀏覽器時可以顯示圖釋 用戶選擇所要的圖釋表情 , 對話框把選擇的表情符合信息插入 ,聊天內(nèi)容輸入框 用戶聊天室客戶端狀態(tài)初始化 分配服務(wù)器端資源 驗證表單信息正確性 ,和昵稱重名 接收用登陸表單 把用戶加進聊天室 結(jié)束語 文字聊天系統(tǒng)主要用到三方面的工作：使用 ASP提供的 Application和session兩個對象， 構(gòu)造一個基本的聊天室系統(tǒng)，其中 Application對象和 Session對象分別用來存儲聊天用戶的聊天內(nèi)容和用戶名，而聊天室的定時刷新用 meta基于 ASP 聊天室設(shè)計與實現(xiàn) 20 標(biāo)記實現(xiàn)。讓我對聊天系統(tǒng)有了更進一步的了解。未來社會是知識的社會，作為新一代軍人熟練的掌握網(wǎng)絡(luò)知識不僅是對自己的要求，也是新時代信息化戰(zhàn)爭賦予我們的使命。 通過本次設(shè)計的親身實踐，體驗到作軟件的樂趣和好處，只要一步一不做下去，最終就會有結(jié)果的。 通過本課題的設(shè)計和實現(xiàn)，以后需要在以下幾方面多下功夫： （ 1） 對編程的進一步理解和運用； （ 2） 對軟件工程編程思想進一步提高。 致 謝 在這里首先要感謝我的導(dǎo)師 401 教研室的張暢 老師。他的治學(xué)嚴(yán)謹(jǐn)和科學(xué)研究的精神 也是我永遠學(xué)習(xí)的榜樣，并將積極影響我今后的學(xué)習(xí)和工作 ！然后還 要感謝和我一起作畢業(yè)設(shè)計 的同學(xué) ， 他們 在本次設(shè)計中勤奮工作，克服了許多困難來完成此次畢業(yè)設(shè)計，并承擔(dān)了大部分的工作量。 最后 感謝大學(xué)四年來所有的老師，為我們打下 堅實的專業(yè)知識 基礎(chǔ)；同時還要感謝所有的同學(xué)們，正是因為有了你們的支持和鼓勵。 基于 ASP 聊天室設(shè)計與實現(xiàn) 21 參考文獻 1】石志國．動態(tài)網(wǎng)站編程． 北京清華大學(xué)出版社 2】 譚浩強． 網(wǎng)頁編程技術(shù)與實例．人民郵電出版社 3】丁貴廣 ． AsP 編程基礎(chǔ)與實例（ M）。