我的論壇原始碼(六)

來源:互聯網
上載者:User
關鍵字 我的論壇原始碼(六)
repal.php回複用的頁面,因為回複可以不必要是使用者,所以沒加使用者身份校正



回複論題:<? echo $zt;?>



include "linkfox.inc.php";        //包含進檔案
include "info.inc.php";

function yy($f)
{
 $oldmess=@file($f);                  //引用原文處理
 for ($i=0;$i {
  if (ord(substr($oldmess[$i],0,1))==161)  //第一位是否全形空格
  $mess=$mess.$oldmess[$i];
  else $mess=$mess."  ".trim($oldmess[$i]);
 }
 return $mess;
}

function mesput($query,$use,$id)   
{
   $req=MySQL_query($query);
   if ($req)
    {
     echo "";
     echo ";";
     echo "如果系統沒有反應,請點擊";
    }
   else
   echo "";
}
function usehf($message,$useinfo,$id,$use,$ft,$mess,$c)     //使用者回複就直接從表裡調出使用者資訊
{
  $query="select * from useinfo where usename='".$useinfo[0]."'";
  $req=mysql_query($query);
   if ($req)
     {
       $useinfo=mysql_fetch_array($req);
       $fo=fopen($ft,"a");
       $message=str_replace("<","<",str_replace(">",">",$message));
       $message=nl2br($message);
       $gip=getenv("REMOTE_ADDR");
       $messages=$message."ㄞㄚㄓ".$useinfo[2]."ㄞㄚㄓ".$useinfo[3]."ㄞㄚㄓ".$useinfo[9]."ㄞㄚㄓ".$useinfo[8]."ㄞㄚㄓ".$useinfo[14]."ㄞㄚㄓ".$useinfo[11]."ㄞㄚㄓ".$time."ㄞㄚㄓ".$gip."δεζ";
      if($c==dd)    //如果是引用回複,加上原文內容
        {
     $messages="".$mess."★原文……★……引用★
".$messages;
        }
       $fp=fputs($fo,$messages);
       $time=date(Y年n月j日G時i分);  //主題回複數加一,覆蓋上一回複人與時間
       $query="update foxbbs set hfnum=hfnum+1,hfname='".$ft."',hfusename='".$useinfo[2]."',hfdate='".$time."' where id='".$id."'";
       mesput($query,$use,$id);
     }
   else
     {
   echo "";
     }
}

function gr($ft,$message,$youname,$youmail,$youoicq,$youweb,$youaddr,$youbq,$id,$use,$mess,$c)    //非註冊使用者
{
if (!uinfo($youmail,mail)||strlen($youmail)<12) //校正MAIL
{
   echo "";
}
else if (!uinfo($youoicq,oicq)||strlen($youoicq)>12) //校正OICQ,只能判斷是否數字和位元,如果有更好的方法就好。
{

   echo "";
}

else
{
   if (uinfo($youweb,web)==OK&&substr($youweb,0,3)!=htt) $youweb="http://".$youweb;
   else if (uinfo($youweb,web)==OK&&substr($youweb,0,3)==htt) $youweb=$youweb;
   else $youweb="不告訴你";
   $time=date(Y年n月j日G時i分);     //取目前時間
   $message=str_replace("<","<",str_replace(">",">",$message));
   $message=nl2br($message);
   $gip=getenv("REMOTE_ADDR");
   $messages=$message."ㄞㄚㄓ".$youname."ㄞㄚㄓ".$youoicq."ㄞㄚㄓ".$youweb."ㄞㄚㄓ".$youmail."ㄞㄚㄓ".$youbq."ㄞㄚㄓ".$youaddr."ㄞㄚㄓ".$time."ㄞㄚㄓ".$gip."δεζ";
    if($c==dd)    //如果是引用回複
     {
    $messages="".$mess."★原文……★……引用★
".$messages;
     }
   $fo=fopen($ft,"a");
   $fp=fputs($fo,$messages);
   $query="update foxbbs set hfnum=hfnum+1,hfname='".$ft."',hfusename='".$youname."',hfdate='".$time."' where id='".$id."'";
   mesput($query,$use,$id);
}
}
?>



$tem=$HTTP_COOKIE_VARS[FlyFoxNet];
$temp=explode("|",$tem);
$cookiem=$temp[0];
$useinfo=cuser($cookiem,$action);

if (!$useinfo[0]){ $useinfo[2]="遊客"; $usename=1;}

$query="select mesname from foxbbs where id='".$id."'";
$req=mysql_query($query);
 if ($req)
 {
 $f=mysql_fetch_array($req);
 $mess=yy($f[0]);
   if ($message&&$action=add)
    {
     $ft="foxbbs/".$f[0].".bbs";
     if (ord(substr($message,0,1))!=161) $message="  ".$message;
     for ($i=0;$i<10;$i++)
     {
      if ($bq[$i]) $youbq=$bq[$i];
     }
     if ($usename) gr($ft,$message,$youname,$youmail,$youoicq,$youweb,$youaddr,$youbq,$id,$use,$mess,$c);
     else usehf($message,$useinfo,$id,$use,$ft,$mess,$c);
    }
  }
  else echo "";


?>





















                                                       

   
  

   
  

  
  

   
  

   當前位置:狐網─>狐網論壇─>回複主題:
  
  
  

   
  

   
  

   
  








      

   






                                   
你正在回複的主題是:[]

  
   if ($usename) //不是註冊使用者就顯示輸入框輸入遊客資訊。
   {
   echo "你的大名:".$mess;?>

  



  • 相關文章

    聯繫我們

    該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

    如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

    A Free Trial That Lets You Build Big!

    Start building with 50+ products and up to 12 months usage for Elastic Compute Service

    • Sales Support

      1 on 1 presale consultation

    • After-Sales Support

      24/7 Technical Support 6 Free Tickets per Quarter Faster Response

    • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.