來源：互聯網
上載者：User
關鍵字
發布
新聞
程式
即時
動態
檔案
實現
文本
ne
動態即時發布新聞的程式，可以根據發布時間，自動地排列顯示順序。新聞檔案為儲存在指定目錄的文字檔組成，當有新聞的時候，程式會自動地將其顯示出來，並且排列在頁面的最開始部分。
News
News
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 "
n";
print "".date("d.m.Y - H:i:s",$newsfile[$key])."
n";
for($i=0; $i<$n; $i=$i+1){
$s=chop($fa[$i]);
$s=htmlspecialchars($s);
$s=createur1($s);
print $s."
n";
}
print " |
"; } $hd->close(); ?>
