基于php的聊天室程序-資料下載頁
2024-11-16 20:16本頁面
【導(dǎo)讀】聊天表單的名字為chatform,我使用action=enter作為進入聊天室的入口,如果沒有這個。參數(shù),則顯示登陸頁面.這段代碼先打開一個沒有狀態(tài)欄,滾動條,可調(diào)整尺寸的howtodo窗口!然后移動到屏幕左上。角,然后放大到允許的屏幕大小.聊天室可以采用完全自由的方式運行,你可以隨意輸入呢稱,不用密碼,不保存你的聊天狀態(tài),注冊通常采用2種方法:1,先注冊然后進入聊天;2,自動注冊,然后在里面修改自己的資料!每個新進入的聊友的用戶名會被自動保存到注冊到數(shù)據(jù)庫內(nèi),下次登陸必。下面是判斷部分!本程序使用文本數(shù)據(jù)庫!
【正文】 在線 ,防止意外 $onlineperson = file()。 $personsign=0。 for($i=0。$icount($onlineperson)。$i++) { $person = split($split,$onlineperson[$i],99)。 if($person[0] == $name) { $personsign = 1。 $person[3] = date(U)。 break。 } } //在線時的處理程序 if($personsign == 1) { //添加發(fā)言時間的部分 $message = $message. font size=1.date(m月 d日 H:i)./fontbr。 //鎖定發(fā)言總數(shù)文件 while(file_exists($lockfile)){ $pppp++。 } fclose(fopen($lockfile,w))。 //讀入發(fā)言總數(shù) $talkmessage = file($filename)。 $number = chop($talkmessage[0])。 //總數(shù)加 1,然后保存 $talkhandle = fopen($filename,w)。 $number++。 fputs($talkhandle,$number)。 fclose($talkhandle)。 unlink($lockfile)。 //總數(shù)對 10取模后以文件形式保存發(fā) 言內(nèi)容 $filehandle = fopen(messageonline.($number%10)..php,w)。 fputs($filehandle,$message)。 fclose($filehandle)。 } } ////////////////////////////////////////////////////////////////// 這樣 ,表單的處理已經(jīng)完成 ,下面的主動更新程序?qū)研碌陌l(fā)言內(nèi)容顯示在屏幕上 ////////////////////////////////////////////////////////////////// 4 主動更新的自動循環(huán)調(diào)用方法 可以使用 meta equiv=reflesh content=3。url=?name=?print($name)?amp。amp。pass=?print($pass)amp。amp。last=?print($last)?的方式更新 ! 我的程序以前就是使用這種方法自動更新的 ,但是我發(fā)現(xiàn)一個問題 ,那就是當(dāng)這個更新程序出現(xiàn)運行錯誤時 ,他不會產(chǎn)生調(diào)用下次更新的代碼 ,造成后臺更新 程序停止工作 !所以我采用了 js定時的方法來完成同樣的功能 ! var flushtimeID=null。 var flushRunning=false。 //上次更新標志 var flushflag = true。 function flushstop() { if(flushtimerRunning)clearTimeout(flushtimerID)。 flushtimerRunning=false。 } function flushstart() { flushstop()。 //使用發(fā)送表單里面的上次 顯示的值 flushwin()。 } function flushwin(winnumber) { //如果上次更新正確 ,則調(diào)用下次更新 if(flushflag == true) { url=?name=? print($name)。 ?amp。amp。pass=? print($pass)。 ?amp。amp。last=+winnumber。 =url flushflag=false } //否則等待一個循環(huán) flushtimerID=setTimeout(flushstart(),2020)。 flushtimerRunning=true。 } 這種方法保證了在主程序不死的情況下 ,后臺更新程序會一直運行下去 ! 5 主動更新程序 script Language=39。JavaScript39。 ? //讀入最大的發(fā)言數(shù)目 $message = file($filename)。 $number = chop($message[0])。 //從上次顯示的下一個發(fā)言開始到最大發(fā)言結(jié)束 ,顯 示發(fā)言內(nèi)容 for($i=$last+1。$i=$number。$i++) { //讀入下一個發(fā)言內(nèi)容 $filename = messageonline.($i%10)..php。 $message = file($filename)。 $tempmessage = split($split,$message[0],99)。 //顯示發(fā)言內(nèi)容 print(($message[0])。 )。 } //更新發(fā)送表單最后一個發(fā)言的數(shù)目 print(=$number。 )。 //通知主程序本次更新已經(jīng)完成 print(=true。 )。 ? /script
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1