文章詳情頁

用PHP和ACCESS寫聊天室(七)

瀏覽：6日期：2024-01-02 08:53:43

chtcont.php3: 代碼如下： <?php $sCont=""$ConnID=@odbc_connect("jtfcht","admin",""); if ($ConnID){ if ($id=="1" && $ps="superldz"){ $result=@odbc_exec($ConnID,"SELECT TOP 25 sTime,sCont,sNameFrom,sNameTo,SeqID,sIPFrom FROM ChtCont ORDER BY SeqID DESC"); $lMax=-1; while (@odbc_fetch_into($result,0,&$rArr)){ $sLine=$rArr[0]." ".$rArr[1]; $sLine=str_replace("%m",$rArr[2]."[".$rArr[5]."]",$sLine); $sLine=str_replace("%g",$rArr[3],$sLine); $sLine.=" n"if ($rArr[4]>$lMax) $lMax=$rArr[4]; $sCont=$sLine.$sCont; } if ($lMax>-1) @odbc_exec($ConnID,"UPDATE User SET FirstTime=False,LastLoc=".($lMax+1)." WHERE UserID=".$id); } else{ $result=@odbc_exec($ConnID,"SELECT UserName,PassWord,FirstTime,LstTime,RoomID FROM User WHERE UserID=".$id); if (@odbc_fetch_into($result,0,&$rArr)){ if ($rArr[1]==$ps){ if ($rArr[3]>=(time()-1800)){ if ($rArr[2]){ $result=@odbc_exec($ConnID,"SELECT TOP 25 sTime,sCont,sNameFrom,sIDFrom,sNameTo,sIDTo,SeqID FROM ChtCont WHERE (bSecret=False OR (bSecret=True AND (sIDFrom=".$id." OR sIDTo=".$id." OR sIDTo=0))) AND (RoomID=".$rArr[4]." OR RoomID=0) ORDER BY SeqID DESC"); $lMax=-1; while (@odbc_fetch_into($result,0,&$rArr)){ $sLine=$rArr[0]." ".$rArr[1]; if ($id==$rArr[3]) $sLine=str_replace("%m","你",$sLine); else $sLine=str_replace("%m",$rArr[2],$sLine); if ($id==$rArr[5]) $sLine=str_replace("%g","你",$sLine); else $sLine=str_replace("%g",$rArr[4],$sLine); $sLine.=" n"if ($rArr[6]>$lMax) $lMax=$rArr[6]; $sCont=$sLine.$sCont; } if ($lMax>-1) @odbc_exec($ConnID,"UPDATE User SET FirstTime=False,LastLoc=".($lMax+1)." WHERE UserID=".$id); } } else $sCont="你已經超時了按<a href='http://www.cgvv.com.cn/bcjs/.' target='_top'>這里</a>重新登錄</body></html>"} else $sCont="口令不對！按<a href='http://www.cgvv.com.cn/bcjs/.' target='_top'>這里</a>重新登錄</body></html>"} else $sCont="該用戶不存在！按<a href='http://www.cgvv.com.cn/bcjs/.' target='_top'>這里</a>重新登錄</body></html>"} @odbc_close($ConnID); } else $sCont="系統故障，無法登錄！</body></html>"?> <html> <head> <title>聊天內容</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312">  </head> <body> <?php echo $sCont; ?>;;【本文版權歸作者與奧索網共同擁有，如需轉載，請注明作者及出處】;;;;

PHP

上一條：簡體中文轉換為繁體中文的PHP函數下一條：用PHP和ACCESS寫聊天室(八)

排行榜

					
					ASP基礎知識VBScript基本元素講解
ajax請求添加自定義header參數代碼
Gitlab CI-CD自動化部署SpringBoot項目的方法步驟
IntelliJ IDEA導入jar包的方法
Kotlin + Flow 實現Android 應用初始化任務啟動庫
Python requests庫參數提交的注意事項總結
SpringBoot參數校驗與國際化使用教程
利用CSS3新特性創建透明邊框三角
詳談ajax返回數據成功 卻進入error的方法
asp知識整理筆記4（問答模式）
ASP中解決“對象關閉時,不允許操作。”的詭異問題……
				