用文本文件实现的动态实时发布新闻的程序

动态实时发布新闻的程序,可以根据发布时间,自动地排列显示顺序。新闻文件为存储在指定目录的文本文件组成,当有新闻的时候,程序会自动地将其显示出来,并且排列在页面的最开始部分。
html head titleNews/title /head body bfcolor=#ffffff h1News/h1 div
aligh=center table border=0 cellspacing=5 cellpadding=10 width=90%
bgcolor=#澳门新葡亰3522平台游戏,e0e0e0 ?php include(‘locationfilename.php’); function
createur1($text){ //新闻的文本文件中这样插入你的链接 //${} //或是${|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.a href=.$a..$linktext./a.$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 trtdn; print b.date(d.m.Y

  • H:i:s,$newsfile[$key])./bbrn; for($i=0; $i$n; $i=$i+1){
    $s=chop($fa[$i]); $s=htmlspecialchars($s); $s=createur1($s); print
    $s.brn; } print /td/tr; } $hd-close(); ? /body /html