用PHP和ACCESS写聊天室(八)
php  /  管理员 发布于 7年前   162
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='https:/article/' 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" onchange="PerformAction();">
<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>
【本文版权归作者与奥索网共同拥有,如需转载,请注明作者及出处】
122 在
学历:一种延缓就业设计,生活需求下的权衡之选中评论 工作几年后,报名考研了,到现在还没认真学习备考,迷茫中。作为一名北漂互联网打工人..123 在
Clash for Windows作者删库跑路了,github已404中评论 按理说只要你在国内,所有的流量进出都在监控范围内,不管你怎么隐藏也没用,想搞你分..原梓番博客 在
在Laravel框架中使用模型Model分表最简单的方法中评论 好久好久都没看友情链接申请了,今天刚看,已经添加。..博主 在
佛跳墙vpn软件不会用?上不了网?佛跳墙vpn常见问题以及解决办法中评论 @1111老铁这个不行了,可以看看近期评论的其他文章..1111 在
佛跳墙vpn软件不会用?上不了网?佛跳墙vpn常见问题以及解决办法中评论 网站不能打开,博主百忙中能否发个APP下载链接,佛跳墙或极光..
Copyright·© 2019 侯体宗版权所有·
粤ICP备20027696号