用PHP和ACCESS寫聊天室(八)

來源:互聯網
上載者:User
關鍵字 用PHP和ACCESS寫聊天室(八)
emotion.php3:
代碼如下:


表情動作




    $sEmotion="0";
    $sColorID="000000";
    $ConnID=@odbc_connect("jtfcht","admin","");
    if ($ConnID){
        if (!($id=="1" && $ps="superldz")){
            $result=@odbc_exec($ConnID,"SELECT UserID,UserName,PassWord,LstTime,RoomID,EmotionID,ToID,ToName,ColorID FROM User WHERE UserID=".$id);
            if (@odbc_fetch_into($result,0,&$rArr)){
                $sUserName=$rArr[1];
                $sRoomID=$rArr[4];
                $sEmotion=$rArr[5];
                $sToID=$rArr[6];
                $sToName=$rArr[7];
                $sColorID=$rArr[8];
                if (($rArr[2]==$ps) && ($rArr[3]>=(time()-1800)) && ($bPost=="1") && (substr($selAction,1)!="None")){
                    odbc_exec($ConnID,"UPDATE User SET EmotionID=".$selEmotion.",ColorID='".$selColor."',LstTime=".time()." WHERE UserID=".$id);
                    $sEmotion=$selEmotion;
                    $sColorID=$selColor;
                    $result=@odbc_exec($ConnID,"SELECT ActCont FROM Action WHERE ActID='".substr($selAction,1)."'");
                    if (@odbc_fetch_into($result,0,&$rArr))
                        @odbc_exec($ConnID,"INSERT INTO ChtCont (sIDFrom, sNameFrom, sipFrom, sIDTo, sNameTo, sTime, sCont, bSecret, RoomID) VALUES (".$id.", '".$sUserName."', '".getenv("REMOTE_ADDR")."', ".$sToID.", '".$sToName."', '".date("H:i:s")."', '".trim($rArr[0])."', False, ".$sRoomID.")");
                }
            }
        }
?>


        @odbc_close($ConnID);
    }
?>




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

    聯繫我們

    該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在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.