快捷導(dǎo)航

用PHP和ACCESS寫聊天室(七)

更新時間：2006年10月09日 00:00:00 作者：

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="你已經(jīng)超時了按<a href='.' target='_top'>這里</a>重新登錄</body></html>";
 }
 else $sCont="口令不對！按<a href='.' target='_top'>這里</a>重新登錄</body></html>";
 }
 else $sCont="該用戶不存在！按<a href='.' target='_top'>這里</a>重新登錄</body></html>";
 }
 @odbc_close($ConnID);
 }
 else $sCont="系統(tǒng)故障，無法登錄！</body></html>";
?>
<html>
<head>
<title>聊天內(nèi)容</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

</head>
<body>
<?php echo $sCont; ?>

【本文版權(quán)歸作者與奧索網(wǎng)共同擁有，如需轉(zhuǎn)載，請注明作者及出處】

您可能感興趣的文章: