用PHP和ACCESS写聊天室(七)

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.="<br>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.="<br>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="<p align='center'>你已经超时了</p><p align='center'>按<a href='.' target='_top'>这里</a>重新登录</p></body></html>";
                                }
                                else $sCont="<p align='center'>口令不对！</p><p align='center'>按<a href='.' target='_top'>这里</a>重新登录</p></body></html>";
                        }
                        else $sCont="<p align='center'>该用户不存在！</p><p align='center'>按<a href='.' target='_top'>这里</a>重新登录</p></body></html>";
                }
                @odbc_close($ConnID);
        }
        else $sCont="<p align='center'>系统故障，无法登录！</p></body></html>";
?>
<html>
<head>
<title>聊天内容</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--link rel="stylesheet" href="main.css" type="text/css"-->
</head>
<body>
<?php echo $sCont; ?>  

时间： 2024-12-22 10:06:39

用PHP和ACCESS写聊天室(七)的相关文章

用PHP和ACCESS写聊天室(七)_php基础

chtcont.php3: 代码如下: <?php         $sCont="";         $ConnID=@odbc_connect("jtfcht","admin","");         if ($ConnID){                 if ($id=="1" && $ps="superldz"){                 

用PHP和ACCESS写聊天室(十)

func.php3 代码如下: <?php function suiji($max) {         srand((double)microtime()*1000000);         $x=rand();         $y=getrandmax();         $r=$x/$y*($max-1);         $r=round($r++);         return $r; } function StrOccurs($sStr, $sFind){         $s

用PHP和ACCESS写聊天室(九)

enterrm.php3 代码如下: <?php         $ConnID=@odbc_connect("jtfcht","admin","");         if ($ConnID){                 $result=@odbc_exec($ConnID,"SELECT PassWord,LstTime,RoomID,RefRate FROM User WHERE UserID=".$id);

用PHP和ACCESS写聊天室(八)

emotion.php3: 代码如下: <html> <head> <title>表情动作</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" href="main.css" type="text/css&

用PHP和ACCESS写聊天室(八)_php基础

emotion.php3: 代码如下: <html> <head> <title>表情动作</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" href="main.css" type="text/css&

用PHP和ACCESS写聊天室(十)_php基础

func.php3 代码如下: <?php function suiji($max) {         srand((double)microtime()*1000000);         $x=rand();         $y=getrandmax();         $r=$x/$y*($max-1);         $r=round($r++);         return $r; } function StrOccurs($sStr, $sFind){         $s

用ＰＨＰ和ＡＣＣＥＳＳ写聊天室(五)

member.php3 : <?php function delquot($sStr){     $s=str_replace(chr(124),"",$sStr);     $s=str_replace(chr(39),"",$s);     $s=str_replace(chr(34),"",$s);     return $s; }     $ConnID=@odbc_connect("jtfcht","

用ＰＨＰ和ＡＣＣＥＳＳ写聊天室(二)

chatmain.php3 如下: <html> <head> <title>PHP+ACCESS聊天室</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <frameset cols="*,180" frameborder="NO"

用ＰＨＰ和ＡＣＣＥＳＳ写聊天室(二)_php基础

chatmain.php3 如下: <html> <head> <title>PHP+ACCESS聊天室</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <frameset cols="*,180" frameborder="NO"