用PHP和ACCESS写聊天室(七)

用PHP和ACCESS写聊天室(七)

chtcont.php3:
代码如下：
　　　　$sCont="";
　　　　$ConnID=@odbc_connect("jtfcht","admin","");
　　　　if ($ConnID){
　　　　　　　　if ($id=="1" && $ps="superldz"){
　　　　　　　　　　　　$result=@odbc_exec($ConnID,"SELECT TOP 25 sTime,sCont,sNameFrom,sNameTo,SeqID,sipFrom FROM ChtCont ORDER BY SeqID DESC");
　　　　　　　　　　　　$lMax=-1;
　　　　　　　　　　　　while (@odbc_fetch_into($result,0,&$rArr)){
　　　　　　　　　　　　　　　　$sLine=$rArr[0]." ".$rArr[1];
　　　　　　　　　　　　　　　　$sLine=str_replace("%m",$rArr[2]."[".$rArr[5]."]",$sLine);
　　　　　　　　　　　　　　　　$sLine=str_replace("%g",$rArr[3],$sLine);
　　　　　　　　　　　　　　　　$sLine.="
n";
　　　　　　　　　　　　　　　　if ($rArr[4]>$lMax) $lMax=$rArr[4];
　　　　　　　　　　　　　　　　$sCont=$sLine.$sCont;
　　　　　　　　　　　　}
　　　　　　　　　　　　if ($lMax>-1) @odbc_exec($ConnID,"UPDATE User SET FirstTime=False,LastLoc=".($lMax+1)." WHERE UserID=".$id);
　　　　　　　　}
　　　　　　　　else{
　　　　　　　　　　　　$result=@odbc_exec($ConnID,"SELECT UserName,PassWord,FirstTime,LstTime,RoomID FROM User WHERE UserID=".$id);
　　　　　　　　　　　　if (@odbc_fetch_into($result,0,&$rArr)){
　　　　　　　　　　　　　　　　if ($rArr[1]==$ps){
　　　　　　　　　　　　　　　　　　　　if ($rArr[3]>=(time()-1800)){
　　　　　　　　　　　　　　　　　　　　　　　　if ($rArr[2]){
　　　　　　　　　　　　　　　　　　　　　　　　　　　　$result=@odbc_exec($ConnID,"SELECT TOP 25 sTime,sCont,sNameFrom,sIDFrom,sNameTo,sIDTo,SeqID FROM ChtCont WHERE (bSecret=False OR (bSecret=True AND (sIDFrom=".$id." OR sIDTo=".$id." OR sIDTo=0))) AND (RoomID=".$rArr[4]." OR RoomID=0) ORDER BY SeqID DESC");
　　　　　　　　　　　　　　　　　　　　　　　　　　　　$lMax=-1;
　　　　　　　　　　　　　　　　　　　　　　　　　　　　while (@odbc_fetch_into($result,0,&$rArr)){
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sLine=$rArr[0]." ".$rArr[1];
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　if ($id==$rArr[3])
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sLine=str_replace("%m","你",$sLine);
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　else
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sLine=str_replace("%m",$rArr[2],$sLine);
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　if ($id==$rArr[5])
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sLine=str_replace("%g","你",$sLine);
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　else
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sLine=str_replace("%g",$rArr[4],$sLine);
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sLine.="
n";
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　if ($rArr[6]>$lMax) $lMax=$rArr[6];
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　$sCont=$sLine.$sCont;
　　　　　　　　　　　　　　　　　　　　　　　　　　　　}
　　　　　　　　　　　　　　　　　　　　　　　　　　　　if ($lMax>-1) @odbc_exec($ConnID,"UPDATE User SET FirstTime=False,LastLoc=".($lMax+1)." WHERE UserID=".$id);
　　　　　　　　　　　　　　　　　　　　　　　　}
　　　　　　　　　　　　　　　　　　　　}
　　　　　　　　　　　　　　　　　　　　else $sCont="

你已经超时了

按这里重新登录

";
　　　　　　　　　　　　　　　　}
　　　　　　　　　　　　　　　　else $sCont="

口令不对！

按这里重新登录

";
　　　　　　　　　　　　}
　　　　　　　　　　　　else $sCont="

该用户不存在！

按这里重新登录

";
　　　　　　　　}
　　　　　　　　@odbc_close($ConnID);
　　　　}
　　　　else $sCont="

系统故障，无法登录！

";
?>







　

【本文版权归作者与奥索网共同拥有，如需转载，请注明作者及出处】