用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">
</head>
<body>
<?php
        $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")."', '<font color=red>".trim($rArr[0])."</font>', False, ".$sRoomID.")");
                                }
                        }
                }
?>
<script language="JavaScript">
<!--

function PerformAction()
{
        document.frmEmotion.submit();
        return true;
}

//-->
</script>
<div align="center"><center><form method="post" action="emotion.php3" name="frmEmotion">
<?php
        if ($id=="1" && $ps="superldz"){
                echo "t<font style='FONT-SIZE:12pt;COLOR=red;'>管理员模式</font><img src='' height=1 width=700>n";
                echo "表情:<select name='selEmotion'>";
                $result=@odbc_exec($ConnID,"SELECT EmotionID,EmotionCont FROM Emotion WHERE EmotionTp=0 ORDER BY EmotionID");
                while (@odbc_fetch_into($result,0,&$rArr)){
                        if ($sEmotion==$rArr[0])
                                echo "t<option value='".$rArr[0]."' selected>".$rArr[1]."</option>n";
                        else
                                echo "t<option value='".$rArr[0]."'>".$rArr[1]."</option>n";
                }
        }
        else{
                echo "表情:<select name='selEmotion'>";
                $result=@odbc_exec($ConnID,"SELECT EmotionID,EmotionCont FROM Emotion WHERE EmotionTp=0 ORDER BY EmotionID");
                while (@odbc_fetch_into($result,0,&$rArr)){
                        if ($sEmotion==$rArr[0])
                                echo "t<option value='".$rArr[0]."' selected>".$rArr[1]."</option>n";
                        else
                                echo "t<option value='".$rArr[0]."'>".$rArr[1]."</option>n";
                }
        }
?>
</select>
 颜色:<select name="selColor">
<?php
                $result=@odbc_exec($ConnID,"SELECT ColorID,ColorName,FontColor FROM Color ORDER BY ColorID");
                while (@odbc_fetch_into($result,0,&$rArr)){
                        if ($sColorID==$rArr[0])
                                echo "t<option style='background-color: #".$rArr[0].";color=#".$rArr[2].";' value='".$rArr[0]."' selected>".$rArr[1]."</option>n";
                        else
                                echo "t<option style='background-color: #".$rArr[0].";color=#".$rArr[2].";' value='".$rArr[0]."'>".$rArr[1]."</option>n";
                }
?>
</select>
 动作:<select name="selAction" >
        <option value='vNone' selected>选择动作</option>
<?php
                if ($id!="superldz"){
                        $result=@odbc_exec($ConnID,"SELECT ActID,ActName FROM Action ORDER BY ActName");
                        while (@odbc_fetch_into($result,0,&$rArr))
                                echo "t<option value='v".trim((string)$rArr[0])."'>".trim($rArr[1])."(".trim((string)$rArr[0]).")</option>n";
                }
?>
</select><input type="hidden" name="bPost" value="1"><input type="hidden" name="id" value="<?php echo $id; ?>"><input type="hidden" name="ps" value="<?php echo $ps; ?>">
</form></center></div>
<?php
                @odbc_close($ConnID);
        }
?>
</body>
</html>

时间: 2024-11-17 11:25:06

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

用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写聊天室(七)

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

用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写聊天室(十)_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

用PHP和ACCESS写聊天室(五)

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","

用PHP和ACCESS写聊天室(二)

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和ACCESS写聊天室(二)_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"