用PHP和ACCESS写聊天室(三)

func.php3 代码如下: ?php function suiji($maxState of Qatar {
srand((double卡塔尔(قطر‎microtime(卡塔尔*1000000); $x=rand(); $y=getrandmax();
$r=$x/$y*($max-1); $r=round($r++); return $r; } function
StrOccurs($sStr, $sFind){ $sTemp=$sStr; $iLen=strlen($sFind); $iCount=0;
while (true){ if (strstr($sTemp, $sFind)) break; else $sTemp =
instr($sTemp,strpos($sTemp,$sFind)+$iLen); $iCount++; } } return
$iCount; } function StrDupl($sStr, $iCnt){ $ret=;
for($i=1;$i=$iCnt;$i++) $ret.=$sStr; return $ret; } function
DelQuot($sStr){ $s=str_replace(chr(124),,$sStr);
$s=str_replace(chr(39),,$s); $s=str_replace(chr(34),,$s); return s; }
function DelTag($sStr){ $bNeed=False; $sOther=strtoupper($sStr); if
($bNeed!=True || !strstr($sOther,TABLE)) $bNeed=True; if ($bNeed!=True
|| !strstr($sOther,/TABLE)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,SCRIPT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/SCRIPT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,BODY)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/BODY)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,HTML)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/HTML)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,HEAD)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/HEAD)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,FORM)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/FORM)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,INPUT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/INPUT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,OPTION)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/OPTION)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,SELECT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/SELECT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,APPLET)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/APPLET)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,OBJECT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/OBJECT)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,MENU)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/MENU)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,FRAMESET)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/FRAMESET)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,FRAME)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/FRAME)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,IFRAME)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/IFRAME)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,STYLE)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,/STYLE)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,BASE)) $bNeed=True; if ($bNeed!=True ||
!strstr($sOther,FONT-SIZE:)) $bNeed=True; if ($bNeed==True) return
str_replace(,,str_replace(,,$sStr)); else return $sStr; } function
AddLost($sStr){ $ret=$sStr; $ret.=StrDupl(, (StrOccurs(strtoupper($ret),
) – StrOccurs(strtoupper($ret), ))); $ret.=StrDupl(/FONT,
(StrOccurs(strtoupper($ret), FONT) – StrOccurs(strtoupper($ret),
/FONT))); $ret.=StrDupl(/B, (StrOccurs(strtoupper($ret), B) –
StrOccurs(strtoupper($ret), /B))); $ret.=StrDupl(/I,
(StrOccurs(strtoupper($ret), I) – StrOccurs(strtoupper($ret), /I)));
$ret.=StrDupl(/U, (StrOccurs(strtoupper($ret), U) –
StrOccurs(strtoupper($ret), /U))); $ret.=StrDupl(/S,
(StrOccurs(strtoupper($ret), S) – StrOccurs(strtoupper($ret), /S)));
$ret.=StrDupl(/STRIKE, (StrOccurs(strtoupper($ret), STRIKE) –
StrOccurs(strtoupper($ret), /STRIKE))); $ret.=StrDupl(/STRONG,
(StrOccurs(strtoupper($ret), STRONG) – StrOccurs(strtoupper($ret),
/STRONG))); $ret.=StrDupl(/SMALL, (StrOccurs(strtoupper($ret), SMALL) –
StrOccurs(strtoupper($ret), /SMALL))); $ret.=StrDupl(/CITE,
(StrOccurs(strtoupper($ret), CITE) – StrOccurs(strtoupper($ret),
/CITE))); $ret.=StrDupl(/EM, (StrOccurs(strtoupper($ret), EM) –
StrOccurs(strtoupper($ret), /EM))); $ret.=StrDupl(/CODE,
(StrOccurs(strtoupper($ret), CODE) – StrOccurs(strtoupper($ret),
/CODE))); $ret.=StrDupl(/SAMP, (StrOccurs(strtoupper($ret), SAMP) –
StrOccurs(strtoupper($ret), /SAMP))); $ret.=StrDupl(/KBD,
(StrOccurs(strtoupper($ret), KBD) – StrOccurs(strtoupper($ret), /KBD)));
$ret.=StrDupl(/VAR, (StrOccurs(strtoupper($ret), VAR) –
StrOccurs(strtoupper($ret), /VAR))); $ret.=StrDupl(/DFN,
(StrOccurs(strtoupper($ret), DFN) – StrOccurs(strtoupper($ret), /DFN)));
$ret.=StrDupl(/BIG, (StrOccurs(strtoupper($ret), BIG) –
StrOccurs(strtoupper($ret), /BIG))); $ret.=StrDupl(/SUP,
(StrOccurs(strtoupper($ret), SUP) – StrOccurs(strtoupper($ret), /SUP)));
$ret.=StrDupl(/SUB, (StrOccurs(strtoupper($ret), SUB) –
StrOccurs(strtoupper($ret), /SUB))); $ret.=StrDupl(/H1,
(StrOccurs(strtoupper($ret), H1) – StrOccurs(strtoupper($ret), /H1)));
$ret.=StrDupl(/H2, (StrOccurs(strtoupper($ret), H2) –
StrOccurs(strtoupper($ret), /H2))); $ret.=StrDupl(/H3,
(StrOccurs(strtoupper($ret), H3) – StrOccurs(strtoupper($ret), /H3)));
$ret.=StrDupl(/H4, (StrOccurs(strtoupper($ret), H4) –
StrOccurs(strtoupper($ret), /H4))); $ret.=StrDupl(/H5,
(StrOccurs(strtoupper($ret), H5) – StrOccurs(strtoupper($ret), /H5)));
$ret.=StrDupl(/H6, (StrOccurs(strtoupper($ret), H6) –
StrOccurs(strtoupper($ret), /H6))); $ret.=StrDupl(/H7,
(StrOccurs(strtoupper($ret), H7) – StrOccurs(strtoupper($ret), /H7)));
return $ret; } ?

cinput.php3
如下:
<html>
<head>
<title>输入</title>
<meta http-equiv=”Content-Type” content=”text/html;
charset=gb2312″>
<link rel=”stylesheet” href=”main.css” type=”text/css”>
<script language=”JavaScript”>
<!–
function NameGotFocus( ) {
        document.frmInput.txtSend.focus();
}

function CheckValid() {
    document.frmInput.sEmotion.value=top.emotion.frmEmotion.selEmotion.value;
    document.frmInput.sColor.value=top.emotion.frmEmotion.selColor.value;
    if (document.frmInput.txtSend.value == “”) {
        document.frmInput.txtSend.focus();
        return false;
    }
    return true;
}

//–>
</script>
<link rel=”stylesheet” href=”main.css” type=”text/css”>
</head>
<body onload=”NameGotFocus()”>
<?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){
    $sTemp=$sStr;
    $iLen=strlen($sFind);
    $iCount=0;
    while (true){
        if (strstr($sTemp, $sFind))
            break;
        else{
            $sTemp = substr($sTemp,strpos($sTemp,$sFind)+$iLen);
            $iCount++;
        }
    }
    return $iCount;
}

function StrDupl($sStr, $iCnt){
    $ret=””;
    for($i=1;$i<=$iCnt;$i++)
        $ret.=$sStr;
    return $ret;
}

function DelQuot($sStr){
    $s=str_replace(chr(124),”¦”,$sStr);
    $s=str_replace(chr(39),”´”,$s);
澳门新浦京8455com,    $s=str_replace(chr(34),”””,$s);
    return $s;
}

function DelTag($sStr){
    $bNeed=”False”;
    $sOther=strtoupper($sStr);
    if ($bNeed!=”True” || !strstr($sOther,”<TABLE”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</TABLE”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<SCRIPT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</SCRIPT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<BODY”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</BODY”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<HTML”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</HTML”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<HEAD”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</HEAD”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<FORM”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</FORM”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<INPUT”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</INPUT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<OPTION”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</OPTION”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<SELECT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</SELECT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<APPLET”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</APPLET”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<OBJECT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</OBJECT”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<MENU”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</MENU”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<FRAMESET”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</FRAMESET”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<FRAME”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</FRAME”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<IFRAME”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</IFRAME”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<STYLE”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”</STYLE”))
$bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”<BASE”)) $bNeed=”True”;
    if ($bNeed!=”True” || !strstr($sOther,”FONT-SIZE:”))
$bNeed=”True”;
    if ($bNeed==”True”)
        return
str_replace(“>”,”>”,str_replace(“<“,”<“,$sStr));
    else
        return $sStr;
}

function AddLost($sStr){
    $ret=$sStr;
    $ret.=StrDupl(“>”, (StrOccurs(strtoupper($ret), “<“) –
StrOccurs(strtoupper($ret), “>”)));
    $ret.=StrDupl(“</FONT>”, (StrOccurs(strtoupper($ret),
“<FONT”) – StrOccurs(strtoupper($ret), “</FONT>”)));
    $ret.=StrDupl(“</B>”, (StrOccurs(strtoupper($ret), “<B”) –
StrOccurs(strtoupper($ret), “</B>”)));
    $ret.=StrDupl(“</I>”, (StrOccurs(strtoupper($ret), “<I”) –
StrOccurs(strtoupper($ret), “</I>”)));
    $ret.=StrDupl(“</U>”, (StrOccurs(strtoupper($ret), “<U”) –
StrOccurs(strtoupper($ret), “</U>”)));
    $ret.=StrDupl(“</S>”, (StrOccurs(strtoupper($ret), “<S”) –
StrOccurs(strtoupper($ret), “</S>”)));
    $ret.=StrDupl(“</STRIKE>”, (StrOccurs(strtoupper($ret),
“<STRIKE”) – StrOccurs(strtoupper($ret), “</STRIKE>”)));
    $ret.=StrDupl(“</STRONG>”, (StrOccurs(strtoupper($ret),
“<STRONG”) – StrOccurs(strtoupper($ret), “</STRONG>”)));
    $ret.=StrDupl(“</SMALL>”, (StrOccurs(strtoupper($ret),
“<SMALL”) – StrOccurs(strtoupper($ret), “</SMALL>”)));
    $ret.=StrDupl(“</CITE>”, (StrOccurs(strtoupper($ret),
“<CITE”) – StrOccurs(strtoupper($ret), “</CITE>”)));
    $ret.=StrDupl(“</EM>”, (StrOccurs(strtoupper($ret), “<EM”)

  • StrOccurs(strtoupper($ret), “</EM>”)));
        $ret.=StrDupl(“</CODE>”, (StrOccurs(strtoupper($ret),
    “<CODE”) – StrOccurs(strtoupper($ret), “</CODE>”)));
        $ret.=StrDupl(“</SAMP>”, (StrOccurs(strtoupper($ret),
    “<SAMP”) – StrOccurs(strtoupper($ret), “</SAMP>”)));
        $ret.=StrDupl(“</KBD>”, (StrOccurs(strtoupper($ret),
    “<KBD”) – StrOccurs(strtoupper($ret), “</KBD>”)));
        $ret.=StrDupl(“</VAR>”, (StrOccurs(strtoupper($ret),
    “<VAR”) – StrOccurs(strtoupper($ret), “</VAR>”)));
        $ret.=StrDupl(“</DFN>”, (StrOccurs(strtoupper($ret),
    “<DFN”) – StrOccurs(strtoupper($ret), “</DFN>”)));
        $ret.=StrDupl(“</BIG>”, (StrOccurs(strtoupper($ret),
    “<BIG”) – StrOccurs(strtoupper($ret), “</BIG>”)));
        $ret.=StrDupl(“</SUP>”, (StrOccurs(strtoupper($ret),
    “<SUP”) – StrOccurs(strtoupper($ret), “</SUP>”)));
        $ret.=StrDupl(“</SUB>”, (StrOccurs(strtoupper($ret),
    “<SUB”) – StrOccurs(strtoupper($ret), “</SUB>”)));
        $ret.=StrDupl(“</H1>”, (StrOccurs(strtoupper($ret), “<H1”)
  • StrOccurs(strtoupper($ret), “</H1>”)));
        $ret.=StrDupl(“</H2>”, (StrOccurs(strtoupper($ret), “<H2”)
  • StrOccurs(strtoupper($ret), “</H2>”)));
        $ret.=StrDupl(“</H3>”, (StrOccurs(strtoupper($ret), “<H3”)
  • StrOccurs(strtoupper($ret), “</H3>”)));
        $ret.=StrDupl(“</H4>”, (StrOccurs(strtoupper($ret), “<H4”)
  • StrOccurs(strtoupper($ret), “</H4>”)));
        $ret.=StrDupl(“</H5>”, (StrOccurs(strtoupper($ret), “<H5”)
  • StrOccurs(strtoupper($ret), “</H5>”)));
        $ret.=StrDupl(“</H6>”, (StrOccurs(strtoupper($ret), “<H6”)
  • StrOccurs(strtoupper($ret), “</H6>”)));
        $ret.=StrDupl(“</H7>”, (StrOccurs(strtoupper($ret), “<H7”)
  • StrOccurs(strtoupper($ret), “</H7>”)));
        return $ret;
    }

$sSecret=”False”;
$sRefRate=5;
$ConnID=@odbc_connect(“jtfcht”,”admin”,””);
if ($ConnID){
    if ($id==”1″ && $ps=”superldz”){
        $result=@odbc_exec($ConnID,”SELECT RefRate FROM User WHERE
UserID=”.$id);
        if (@odbc_fetch_into($result,0,&$rArr)){
            $sRefRate=$rArr[0];
            if ($cmdSend==”送出”){
                $sRefRate=(int)($txtRefRate);
                if ($sRefRate<2) $sRefRate=2;
                @odbc_exec($ConnID,”UPDATE User SET
RefRate=”.$sRefRate.”,LstTime=”.time().” WHERE UserID=”.($id));
                @odbc_exec($ConnID,”INSERT INTO ChtCont (sIDFrom,
sNameFrom, sIPFrom, sIDTo, sNameTo, sTime, sCont, bSecret, RoomID)
VALUES (“.$id.”, ‘管理员’, ‘”.getenv(“REMOTE_ADD福特Explorer”State of Qatar.”‘, 0, ‘大家’,
‘”.date(“H:i:s”卡塔尔(قطر‎.”‘, ‘<font
color=gray>【系统消息】”.trim(DelQuot(htmlspecialchars($txtSend卡塔尔(قطر‎卡塔尔State of Qatar.”</font>’,
False, 0卡塔尔国”State of Qatar;
            }
        }
    }
    else{
        $result=@odbc_exec($ConnID,”SELECT
UserID,UserName,PassWord,LstTime,Secret,RefRate,ToID,ToName,RoomID FROM
User WHERE UserID=”.($id));
        if (@odbc_fetch_into($result,0,&$rArr)){
            if ($rArr[2]==$ps){
                if ($rArr[3]>=(time()-1800)){
                    if ($rArr[4]) $sSecret=”True”;
                    $sRefRate=$rArr[5];
                    if ($cmdSend==”送出”){
                        $sUserName=$rArr[1];
                        $sToID=$rArr[6];
                        $sToName=$rArr[7];
                        $sRoomID=$rArr[8];
                        //$sSend=AddLost(DelTag(DelQuot($txtSend)));
                        $sSend=DelQuot(htmlspecialchars($txtSend));
                        if ($chkSecret==”Yes”){
                            $sSecret=”True”;
                            $sTalk=”悄悄说:”;
                        }
                        else{
                            $sSecret=”False”;
                            $sTalk=”说:”;
                        }
                        $sRefRate=(int)($txtRefRate);
                        if ($sRefRate<2) $sRefRate=2;
                        @odbc_exec($ConnID,”UPDATE User SET
EmotionID=”.$sEmotion.”,ColorID='”.$sColor.”‘,Secret=”.$sSecret.”,RefRate=”.$sRefRate.”,LstTime=”.time().”
WHERE UserID=”.$id);
                        $bCht=”True”;
                        $bToMe=”False”;
                        if (substr($sSend,0,3)==”/t “){
                            $sChtCont=”<font
color=blue><i>%m想”.substr($sSend,3).”</i></font>”;
                            $sSecret=”False”;
                            $bCht=”False”;
                        }
                        elseif (substr($sSend,0,3)==”/: “){
                            $sChtCont=”<font
color=red>%m”.substr($sSend,3).”</font>”;
                            $sSecret=”False”;
                            $bCht=”False”;
                        }
                        elseif (strtolower(substr($sSend,0,3))==”/w
“){
                            $result=@odbc_exec($ConnID,”SELECT RoomID
FROM User WHERE UserName='”.trim(substr($sSend,3)).”‘”);
                            if (@odbc_fetch_into($result,0,&$rArr)){
                                if ($rArr[0]>0){
                                    $result=@odbc_exec($ConnID,”SELECT
RoomName FROM Room WHERE RoomID=”.$rArr[0]);
                                    if
(@odbc_fetch_into($result,0,&$rArr))
                                        $sChtCont=”<font
color=gray>【系统音信】”.trim(substr($sSend,3卡塔尔(قطر‎卡塔尔国.”近些日子在屋家”.$rArr[0].”。</font>”;
                                    else
                                        $sChtCont=”<font
color=gray>【系统音讯】系统零乱了,”.trim(substr($sSend,3卡塔尔国卡塔尔(قطر‎.”近年来在的房间不得识别!</font>”;
                                }
                                else
                                    $sChtCont=”<font
color=gray>【系统新闻】”.trim(substr($sSend,3卡塔尔(قطر‎State of Qatar.”近些日子未有上线。</font>”;
                                $sSecret=”True”;
                                $bCht=”False”;
                            }
                            else{
                                $sChtCont=”<font
color=gray>【系统消息】未有”.trim(substr($sSend,3卡塔尔卡塔尔.”此人。</font>”;
                                $sSecret=”True”;
                                $bCht=”False”;
                            }
                            $bToMe=”True”;
                        }
                        elseif (substr($sSend,0,3)==”// “){
                            $result=@odbc_exec($ConnID,”SELECT ActCont
FROM Action WHERE ActID='”.trim(substr($sSend,3)).”‘”);
                            if (@odbc_fetch_into($result,0,&$rArr)){
                                $sChtCont=”<font
color=red>”.trim($rArr[0]).”</font>”;
                                $sSecret=”False”;
                                $bCht=”False”;
                            }
                            else $bCht=”True”;
                        }
                        if ($bCht==”True”){
                            $result=@odbc_exec($ConnID,”SELECT
COUNT(EmotionTp) AS CNT_TP FROM Emotion WHERE EmotionTp=”.$sEmotion);
                            @odbc_fetch_into($result,0,&$rArr);
                            if ($rArr[0]>0){
                                $iEmCnt=suiji($rArr[0]);
                                $result=@odbc_exec($ConnID,”SELECT
EmotionCont FROM Emotion WHERE EmotionTp=”.$sEmotion.” AND
EmotionID=”.$iEmCnt);
                                if
(@odbc_fetch_into($result,0,&$rArr))
                                    $sChtCont=”%m”.trim($rArr[0]).”对%g”.$sTalk.$sSend;
                                else
                                    $sChtCont=”%m对%g”.$sTalk.$sSend;
                            }
                            else $sChtCont=”%m对%g”.$sTalk.$sSend;
                            if ($sSecret==”True”)
                                $sChtCont=”<font
color=green>”.$sChtCont.”</font>”;
                            else
                                $sChtCont=”<font
color=#”.$sColor.”>”.$sChtCont.”</font>”;
                        }
                        if ($bToMe==”True”)
                            @odbc_exec($ConnID,”INSERT INTO ChtCont
(sIDFrom, sNameFrom, sIPFrom, sIDTo, sNameTo, sTime, sCont, bSecret,
RoomID) VALUES (0, ‘大家’, ‘”.getenv(“REMOTE_ADDR”).”‘, “.$id.”,
‘”.$sUserName.”‘, ‘”.date(“H:i:s”).”‘, ‘”.$sChtCont.”‘, “.$sSecret.”,
“.$sRoomID.”)”);
                        else
                            @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”).”‘, ‘”.$sChtCont.”‘,
“.$sSecret.”, “.$sRoomID.”)”);
                    }
                }
            }
        }
    }
    @odbc_close($ConnID);
}
?>
<div align=”center”><center><form method=”post”
action=”cinput.php3″ name=”frmInput” onsubmit=”return
CheckValid();”>
    <input type=”hidden” name=”sEmotion” value=”0″><input
type=”hidden” name=”sColor” value=”000000″>
<?php
    if ($sSecret==”True”)
        echo “t<input type=”checkbox” name=”chkSecret” value=”Yes”
checked>悄悄话n”;
    else
        echo “t<input type=”checkbox” name=”chkSecret”
value=”Yes”>悄悄话n”;
?>
    <input type=”text” name=”txtSend” maxlength=”120″
size=”39″><input type=”hidden” name=”id” value=”<?php echo $id;
?>”><input type=”hidden” name=”ps” value=”<?php echo $ps;
?>”>
    <input type=”submit” name=”cmdSend” value=”送出”>
    刷新:<input type=”text” name=”txtRefRate” maxlength=”2″ size=”2″
value=”<?php echo $sRefRate; ?>”>
    <input type=”button” name=”cmdExit”
onclick=”parent.location=’leave.php3?id=<?php echo $id;
?>&ps=<?php echo $ps; ?>&at=<?php echo time(); ?>'”
value=”退出”>
</form></center></div>
</body>
</html>  

【本文版权归小编与奥索网同盟全数,如需转载,请评释作者及出处】    

You can leave a response, or trackback from your own site.

Leave a Reply

网站地图xml地图