用PHP和ACCESS写聊天室(八)

emotion.php3:
代码如下
%26lt;html%26gt;
%26lt;head%26gt;
%26lt;title%26gt;表情动作%26lt;/title%26gt;
%26lt;meta http-equiv=%26quot;Content-Type%26quot; content=%26quot;text/html; charset=gb2312%26quot;%26gt;
%26lt;link rel=%26quot;stylesheet%26quot; href=%26quot;main.css%26quot; type=%26quot;text/css%26quot;%26gt;
%26lt;/head%26gt;
%26lt;body%26gt;
%26lt;?php
$sEmotion=%26quot;0%26quot;;
$sColorID=%26quot;000000%26quot;;
$ConnID=@odbc_connect(%26quot;jtfcht%26quot;,%26quot;admin%26quot;,%26quot;%26quot;);
if ($ConnID){
if (!($id==%26quot;1%26quot; %26amp;%26amp; $ps=%26quot;superldz%26quot;)){
$result=@odbc_exec($ConnID,%26quot;SELECT UserID,UserName,PassWord,LstTime,RoomID,EmotionID,ToID,ToName,ColorID FROM User WHERE UserID=%26quot;.$id);
if (@odbc_fetch_into($result,0,%26amp;$rArr)){
$sUserName=$rArr[1];
$sRoomID=$rArr[4];
$sEmotion=$rArr[5];
$sToID=$rArr[6];
$sToName=$rArr[7];
$sColorID=$rArr[8];
if (($rArr[2]==$ps) %26amp;%26amp; ($rArr[3]%26gt;=(time()-1800)) %26amp;%26amp; ($bPost==%26quot;1%26quot;) %26amp;%26amp; (substr($selAction,1)!=%26quot;None%26quot;)){
odbc_exec($ConnID,%26quot;UPDATE User SET EmotionID=%26quot;.$selEmotion.%26quot;,ColorID='%26quot;.$selColor.%26quot;',LstTime=%26quot;.time().%26quot; WHERE UserID=%26quot;.$id);
$sEmotion=$selEmotion;
$sColorID=$selColor;
$result=@odbc_exec($ConnID,%26quot;SELECT ActCont FROM Action WHERE ActID='%26quot;.substr($selAction,1).%26quot;'%26quot;);
if (@odbc_fetch_into($result,0,%26amp;$rArr))
@odbc_exec($ConnID,%26quot;INSERT INTO ChtCont (sIDFrom, sNameFrom, sIPFrom, sIDTo, sNameTo, sTime, sCont, bSecret, RoomID) VALUES (%26quot;.$id.%26quot;, '%26quot;.$sUserName.%26quot;', '%26quot;.getenv(%26quot;REMOTE_ADDR%26quot;).%26quot;', %26quot;.$sToID.%26quot;, '%26quot;.$sToName.%26quot;', '%26quot;.date(%26quot;H:i:s%26quot;).%26quot;', '%26lt;font color=red%26gt;%26quot;.trim($rArr[0]).%26quot;%26lt;/font%26gt;', False, %26quot;.$sRoomID.%26quot;)%26quot;);
}
}
}
?%26gt;
%26lt;script language=%26quot;JavaScript%26quot;%26gt;
%26lt;!--

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

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