用PHP和ACCESS寫聊天室(七)

來源:互聯網
上載者:User
關鍵字 用PHP和ACCESS寫聊天室(七)
chtcont.php3:
代碼如下:
    $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="

你已經逾時了

按這裡重新登入

";
                }
                else $sCont="

口令不對!

按這裡重新登入

";
            }
            else $sCont="

該使用者不存在!

按這裡重新登入

";
        }
        @odbc_close($ConnID);
    }
    else $sCont="

系統故障,無法登入!

";
?>


聊天內容




 

【本文著作權歸作者與奧索網共同擁有,如需轉載,請註明作者及出處】  
  • 相關文章

    聯繫我們

    該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

    如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

    A Free Trial That Lets You Build Big!

    Start building with 50+ products and up to 12 months usage for Elastic Compute Service

    • Sales Support

      1 on 1 presale consultation

    • After-Sales Support

      24/7 Technical Support 6 Free Tickets per Quarter Faster Response

    • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.