flash與asp結(jié)合使用實(shí)例聊天室的實(shí)現(xiàn)-wenkub
2022-09-01 14:44:00 本頁(yè)面
【正文】 聊天室的實(shí)現(xiàn) 前面幾篇教程我們介紹了 Flash 與 Asp 結(jié)合使用的原理以及一個(gè)論壇的實(shí)現(xiàn)，下面我們繼續(xù)結(jié)合 Flash 與 Asp 來(lái)實(shí)現(xiàn)一個(gè)簡(jiǎn)單的聊天室，有在線聊天、在線人員名單、在線時(shí)間等功能。在 Asp 部分，主要用到了 文件和 application()屬性，先定義幾個(gè) application對(duì)象，然后將要保持的內(nèi)容放在 application對(duì)象中，要用的時(shí)候，直接從 application 對(duì)象中取就是了。 新建一個(gè)空白文件，命名為 ，跟 ，內(nèi)容如下： % username = request(username) ?注釋 1 userpwd = request(userpwd) set conn=() Driver={SQL Server}。 username amp。 userpwd amp。 username (userlogin=success) Else (userlogin=unsuccess) ?注釋 5 end if % 注釋 1：取得從 Flash 端傳過(guò)來(lái)的用戶名和密碼。 注釋 5：用戶名或密碼錯(cuò)誤，返回登陸失敗的標(biāo)志位 userlogin 位 unsuccess。 新建一個(gè)組件，命名為 “l(fā)oginloop1”，在第一幀的 Action 面板中加上下面語(yǔ)句 ： = 0。 //注釋 1 = + 1。 } if ( == success) //注釋 3 { = 。 (1)。 注 釋 4：若返回的結(jié)果為 unsuccess，跳轉(zhuǎn)到登陸出錯(cuò)界面。 } if ((length() != 0)and (length() != 0)) { //注釋1 loadVariables(?username= add add amp。 } } 注釋 1：判斷用戶名和密碼是否為空。 在主場(chǎng)景中的第 10 幀中插入關(guān)鍵幀，將此幀命名為 “l(fā)oginfalse”，在此幀場(chǎng)景中添加 “用戶名或密碼錯(cuò) ”的信息。 三、發(fā)送 發(fā)送部分的基本原理是從 Flash端發(fā)送聊天內(nèi)容到服務(wù)器端，在服務(wù)器端將聊天內(nèi)容添加到 application(AllCanSee)對(duì)象中，并將修改后的 application(AllCanSee)對(duì)象的內(nèi)容返回到 Flash 端。 br application(AllCanSee) = application(AllCanSee) amp。 注釋 2：將標(biāo)志位 sflag 和聊天的內(nèi)容發(fā)送回 flash 端。 注釋 1：這是為計(jì)算在線時(shí)間而設(shè)的。 在 clip 的第 5 幀上插入關(guān)鍵幀，在其 action 面板上面增加如下語(yǔ)句： if (!()) { //注釋 1 = + 1。 (2)。 (1)。 將 sendloop 從圖庫(kù)拖到主場(chǎng)景 main 幀中，命名為 sendloop。username= add , this, POST)。 注釋 2：若發(fā)送的內(nèi)容不為空，向服務(wù)器端發(fā)送聊天的內(nèi)容和用戶名。 四、顯示聊天內(nèi)容 顯示聊天內(nèi)容的基本原理是從 Flash 端發(fā)送要顯示聊天內(nèi)容的請(qǐng)求，在服務(wù)器端將application(AllCanSee)的內(nèi) 容發(fā)送到 Flash 端， Flash 端顯示出來(lái)。 application(AllCanSee) amp。 按 Ctrl + F8，新建一個(gè) movie clip，命名為 contentloop，在此 clip 的第一幀的 action面板上增加下面的語(yǔ)句： = 0。 (1)。 } 注釋 1：判斷是否已經(jīng)從服務(wù)器端返回值，還沒(méi)有則計(jì)數(shù)器加一。 在主場(chǎng)景 main 幀中增加一個(gè) button，顯
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1