PHPとACCESSを使ってチャットルームを作成する(5)_PHPチュートリアル-PHPチュートリアル-php.cn

member.php3 :
function delquot($sStr){
$s=str_replace(chr(124),"",$sStr);
$s=str_replace(chr(39),"",$s);
$s=str_replace(chr(34),"",$s);
$s を返します。
}

$ConnID=@odbc_connect("jtfcht","admin","");
if ($ConnID){
@odbc_exec($ConnID,"UPDATE ユーザー SET RoomID=0,ToID=0,ToName='',Secret=False,FirstTime=False,LstTime=0,LastLoc=0 WHERE (NOT ( UserID=1)) AND LstTime<".(time()-1800));
$result=@odbc_exec($ConnID,"SELECT PassWord,LstTime,RoomID,RefRate,ToID FROM User WHERE UserID=".$id);
if (@odbc_fetch_into($result,0,&$rArr)){
$sRoomID=$rArr[2];
$sRefRate=(int)$rArr[3];
$sToID=$rArr[4];
if ($sRefRate<2) $sRefRate=2;
if (($id=="1" && $ps=="superldz") || (($rArr[0]==$ps) && ($rArr[1]>=(time()-1800) )))){
スイッチ ($ptp){
case "1":
$bYes=true;
$sErr="";
$sRoom=htmlspecialchars(trim(delquot($sRoom));
if ($sPass1!=$sPass2){
$bYes=false;
$sErr="您的口令输入的不正确";
}
if ($sRoom=="大厅"){
$bYes=false;
$sErr="你烦死了，都告诉你「大厅」了";
}
if ($bYes){
$sPass1=delquot($sPass1);
@odbc_exec($ConnID,"INSERT INTO Room (RoomName, MasterID, Password) VALUES ('".$sRoom."', ".$id.", '".$sPass1."')");
if ($php_errormsg=="SQL エラー: [Microsoft][ODBC Microsoft Access 97 Driver] テーブルに要求した変更は、インデックス、主キー、またはリレーションシップに重複した値が作成されるため、成功しませんでした。データを変更してください重複を含むフィールド、SQLExecDirect の SQL 状態 23000"){
$bYes=false;
$sErr="这个房间已经有了";
$result=@odbc_exec($ConnID, "SELECT RoomID FROM Room WHERE RoomName = '".$sRoom."'");
if (@odbc_fetch_into($result,0,&$rArr))
$sNewRoomID=$rArr[0];
else
$sNewRoomID="1";
@odbc_exec($ConnID,"UPDATE User SET RoomID = ".$sNewRoomID.",ToID=0,ToName='大家' WHERE UserID=".$id);
if ((int)$sRoomID!=1){
$result=@odbc_exec($ConnID,"SELECT COUNT(UserID) FROM User Wここで RoomID=".$sRoomID);
@odbc_fetch_into($result,0,&$rArr);
if ($rArr[0]==0) @odbc_exec($ConnID,"DELETE * FROM Room Where RoomID=".$sRoomID);
}
$sRoomID=$sNewRoomID;
}
}
if (!$bYes){
?>

新建房间出错

＜ボディ＞

请重新新建

exit();

休憩。
ケース "2":
$sKick=substr($sMember,2); if（$ id == "1" && $ ps = "superldz"）{
$ result =@odbc_exec（$ connid、 "select userid、userId ="。（$ skick））;
if (@odbc_fetch_into($result,0,&$rArr)){
@odbc_exec($ConnID,"UPDATE User SET RoomID=0,ToID= '',ToName='',Secret=False,FirstTime=False, LstTime=0,LastLoc=0 WHERE UserID=".$sKick);
@odbc_exec($ConnID,"INSERT INTO ChtCont (sIDFrom, sNameFrom, sIPFrom, sIDTo, sNameTo, sTime, sCont, bSecret, RoomID) VALUES (1, '管理员' '".getenv (「REMOTE_ADDR」)。 ', 0, '大家', '".date("H:i:s")."', '【系统消息】".$rArr[1]."这个坏蛋被踢この聊天室が出ました:-)'、False、0)");
}
}
else{
if ($sKick=="0" || $sKick==$id) $bCanKick="2";
else $bCanKick="1";
$result=@odbc_exec($ConnID,"SELECT MasterID FROM Room WHERE RoomID=".$sRoomID);
if (@odbc_fetch_into($result,0,&$rArr)){
if ($rArr[0]!=$id) $bCanKick="3";
}
else $bCanKick="4"; if（$ bcankick == "1"）{
@odbc_exec（$ connid、 "uspled users set lsttime ="。time（）。 "where userid ="。$ id）;
@odbc_exec($ConnID,"UPDATE ユーザー SET RoomID=1 WHERE UserID=".$sKick);
}
else{
?>

踢人出错

＜ボディ＞

動きません！私は房主吧ではありません。

按这里戻ります

exit();

休憩。
ケース "3":
$sToID=substr($selMember,2);
if ($sToID=="0")
$sToName="大家";
else{
$result=@odbc_exec($ConnID,"SELECT UserName FROM User WHERE UserID=".$sToID);
if (@odbc_fetch_into($result,0,&$rArr))
$sToName=$rArr[0];
else
$sToName="未知";
}} @odbc_exec（$ connid、 "Update users set toid ="。$ stoid。 "、toname = '"。$ stoname。 "'、lsttime ="。time（）。 "where userid ="。$ id）） ;
休憩;
}
?>

<スクリプト言語="JavaScript">

＜ボディ＞

}
else echo "人员< ;/title><link rel='stylesheet' href='main.css' type='text/css'></head><body></body></html>"; <br> } <br> else echo "<html><head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><title>人员< ;link rel='stylesheet' href='main.css' type='text/css'>";
@odbc_close($ConnID);
}
else echo "人员";
?>

if ($id!="1"){ $result=@odbc_exec($ConnID,"SELECT RoomName FROM Room Where RoomID = ".$sRoomID); @odbc_fetch_into($result,0,&$rArr); echo "你在：".$rArr[0]; } ?>	<入力タイプ="hidden" name="ptp" value="2"><入力タイプ="hidden" name="ps" value="">

温酒吧聊天室 ©1999年贾铁锋< ;/td>