基于php的聊天室程序-文庫吧
2024-10-27 20:16 本頁面
【正文】 戶登陸成功 $namesign=0。 break。 } } } //如果沒有找到這個用戶名 ,那么就自動注冊 if(!$foundsign) { //保存用戶名和密碼 $handle = fopen($register,a)。 fputs($handle,$name$split$pass$split )。 fclose($handle)。 //新 用戶登陸成功 $namesign=0。 } } } if(!$namesign) { //更新在線人的名單 $useronlinehandle = fopen($useronline,w)。 //判斷是否已經(jīng)在里面 ,只是刷新頁面 $updatesign = 0。 for($i=0。$icount($useronline)。$i++) { $usertemp=split($split,chop($useronline[$i]),99)。 if($name == $usertemp[0]) { //更新標志 $updatesign = 1。 fputs($useronlinehandle,$useronline[$i])。 } else { fputs($useronlinehandle,$useronline[$i])。 } } //如 果沒有在里面 ,則增加到里面 if(!$updatesign) fputs($useronlinehandle,$name$split$level$split$pass$split$timecurrent )。 fclose($useronlinehandle)。 //去掉縮定 unlink($useronlinelock)。 //登陸成 功 } 到這里 ,用戶的驗證已經(jīng)完成 ,聊友已經(jīng)合法的進入了聊天室 ,攜帶者呢稱和密碼 聊天室編程思想 大廳 顯示界面 大廳 顯示界面 2020年 09月 04 現(xiàn)在的 聊天室基本全部采用框架方式 ,可以用 frame也可以用 iframe看個人喜歡了 ,我的采用 frame的傳統(tǒng)方式 print(frameset rows=*,110,0,0,0 border=0 )。 print(frameset cols=660,118 rows=* )。 //主顯示屏幕 ,負責顯示聊天內容 print(frame name=u src=about:blank frameborder=NO noresize )。 //在線人數(shù)屏幕 print(frame name=r src=about:blank frameborder=NO)。 print(/frameset )。 //發(fā)送信息的屏幕 ,信息指揮中心 ,所有指令都要由這里發(fā)出 print(frame name=d src=?name=$nameamp。amp。pass=$pass scrolling=39。no39。 frameborder=NO noresize )。 //被動更新屏幕 ,處理發(fā)送的信息 print(frame src=about:blank name=bl )。 /主動更新屏幕 ,顯示自己和其他聊友的聊天信息 print(frame src=about:blank name=flush )。 //檢測是否在線的屏幕 ,對于異常 離開 ,如死機 ,掉線等的處理 print(frame src=about:blank name=check )。 print(/frameset )。 因為各個頁面之間的程序有 聯(lián)系 ,所以顯示順序很重要 ,可以看到 ,我這里只有發(fā)送頁面不是about:blank,其他頁面的顯示都要先通過發(fā)送頁 面的調用才能開始 . 聊天室編程思想 大廳 在線人數(shù) 大廳 在線人數(shù) 我根據(jù)網(wǎng)易聊天室的在線人數(shù)的方法 ,顯示當前的在 線人數(shù) ,代碼解釋如下 : 1 登陸時建立在線人名單的數(shù)組 ,放在 body后面 ? //鎖定在線 人數(shù)文件 while(file_exists($useronlinelock)){$pppp++。} fclose(fopen($useronlinelock,w))。 //讀入在線人名單 $useronline = file($useronline)。 unlink($useronlinelock)。 //建立數(shù)組 list print((list=new Array()。 $k=count($useronline)。 if($k1) { for($i=0。$i($k1)。$i++) { $usercurrent = split($split,$useronline[$i],99)。 // 姓名 +, print(39。$usercurrent[0]39。,)。 } $i=$k1。 // 處理最后一個姓名 $usercurrent = split($split,$useronline[$i],99)。 print(39。$usercur
醫(yī)療健康相關推薦
鄂ICP備17016276號-1