用ＰＨＰ和ＡＣＣＥＳＳ写聊天室(一)

ＩＮＤＥＸ.ＰＨＰ
代码如下!

function delquot($sStr){
　　$s=str_replace(chr(124),"",$sStr);
　　$s=str_replace(chr(39),"",$s);
　　$s=str_replace(chr(34),"",$s);
　　return $s;
}

if ($cmdYes=="进　 入"){
　　$sUserName=htmlspecialchars(trim(delquot($sUserName)));
　　if ($sUserName=="superldz" && $sPass="superldz"){
　　　　$sUserID=1;
　　　　include("chtmain.php3");
　　　　exit();
　　}
　　else{
　　　　$ConnID=@odbc_connect("jtfcht","admin","");
　　　　if ($ConnID){
　　　　　　$result=@odbc_exec($ConnID,"SELECT UserID,UserName,PassWord,RoomID,Sex FROM User WHERE UserName='".$sUserName."'");
　　　　　　if (@odbc_fetch_into($result,0,&$rArr)){
　　　　　　　　$sUserID=$rArr[0];
　　　　　　　　if ($rArr[2]==$sPass){
　　　　　　　　　　if ($rArr[3]==0){
　　　　　　　　　　　　@odbc_exec($ConnID,"UPDATE User SET RoomID=1,LstDate='".date("Y.m.d")."',ToID=0,ToName='大家',Secret=False,FirstTime=True,LstTime=".time()." WHERE UserID=".$sUserID);
　　　　　　　　　　　　if ($rArr[4])
　　　　　　　　　　　　　　@odbc_exec($ConnID,"INSERT INTO ChtCont (sIDFrom, sNameFrom, sipFrom, sIDTo, sNameTo, sTime, sCont, bSecret, RoomID) VALUES (".$rArr[0].", '".$rArr[1]."', '".getenv("REMOTE_ADDR")."', 0, '大家', '".date("H:i:s")."', '【系统消息】欢迎".$rArr[1]."来到了这个聊天室', False, 1)");
　　　　　　　　　　　　else
　　　　　　　　　　　　　　@odbc_exec($ConnID,"INSERT INTO ChtCont (sIDFrom, sNameFrom, sIPFrom, sIDTo, sNameTo, sTime, sCont, bSecret, RoomID) VALUES (".$rArr[0].", '".$rArr[1]."', '".getenv("REMOTE_ADDR")."', 0, '大家', '".date("H:i:s")."', '【系统消息】欢迎".$rArr[1]."来到了这个聊天室', False, 1)");
　　　　　　　　　　　　include("chtmain.php3");
　　　　　　　　　　　　exit();
　　　　　　　　　　}
　　　　　　　　　　else $sErrText="登录出错，已经有人用这个名字登录了！";
　　　　　　　　}
　　　　　　　　else $sErrText="登录出错，口令不正确！";
　　　　　　}
　　　　　　else $sErrText="登录出错，用户没注册！";
　　　　　　@odbc_close($ConnID);
　　　　}
　　　　else $sErrText="系统故障，暂时无法登录";
　　}
}
?>