include('locationfilename.php');
  function createur1($text){
  //新闻的文本文件中这样插入你的链接
  //${http://mysite.ch}
  //或是${http://mysite.ch|My homepage in}
  //开始处理文本文件部分
    $s=$text;
    $a=strstr($s,'${');
    if ($a){
      $b=strstr($a,'}');
      if ($b){
        $la=strlen($a); $ls=strlen($s);
        $s=substr($s,0,$ls-$la);
        $a=substr($a,2);
        $lb=strlen($b); $la=strlen($a);
        $a=substr($a,0,$la-$lb); $b=substr($b,1);
        $ta=strstr($a,"|");
        if($ta){
          $la=strlen($a); $lt=strlen($ta);
          $linktext=substr($a,$la-$lt+1);
          $a=substr($a,0,$la-$lt);
        }
       else{
         $linktext=$a;
       }
      $s=$s."".$linktext."".$b;
      }
    }
  return($s);
  }
  //在这里修改你的新闻文件存放目录
  //切记，新闻文件必须是文本文件
  $newspath="/home/htdocs/test/new/";
  //设置数组
  $newsfile=array();
  //设置目录把柄
  $hd=dir($newspath);
  //获取全部文件，并将其存放在数组中
  while($filename=$hd->read() ){
    $s=strtolower($filename);
    if (strstr($s,".txt")){
      //检测最新修改日期
      $lastchanged=filemtime($newspath.$filename);
      $newsfile[$filename]=$lastchanged;
    }
  }
  //文件排序
  arsort($newsfile);
  //输出文件
  for(reset($newsfile);  $key=key($newsfile);  next($newsfile)){
    $fa=file($newspath.$key);
    $n=count($fa);
    print "";
  }
  $hd->close();
?>

 

以上就介绍了发布新闻 用文本文件实现的动态实时发布新闻的程序，包括了发布新闻方面的内容，希望对PHP教程有兴趣的朋友有所帮助。

n";     print "".date("d.m.Y - H:i:s",$newsfile[$key])." n";     for($i=0; $i      $s=chop($fa[$i]);       $s=htmlspecialchars($s);       $s=createur1($s);       print $s." n";     }     print "