用文本文件实现的动态实时发布新闻的程序
更新时间：2006年10月09日 00:00:00 作者：
动态实时发布新闻的程序，可以根据发布时间，自动地排列显示顺序。新闻文件为存储在指定目录的文本文件组成，当有新闻的时候，程序会自动地将其显示出来，并且排列在页面的最开始部分。
<html>
<head>
<title>News</title>
</head>
<body bfcolor="#ffffff">
<h1>News</h1>
<div aligh="center">
<table border="0" cellspacing="5" cellpadding="10" width="90%" bgcolor="#e0e0e0">
<?php
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."<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 "<tr><td>n";
print "<b>".date("d.m.Y - H:i:s",$newsfile[$key])."</b><br>n";
for($i=0; $i<$n; $i=$i+1){
$s=chop($fa[$i]);
$s=htmlspecialchars($s);
$s=createur1($s);
print $s."<br>n";
}
print "</td></tr>";
}
$hd->close();
?>
</body>
</html>
<html>
<head>
<title>News</title>
</head>
<body bfcolor="#ffffff">
<h1>News</h1>
<div aligh="center">
<table border="0" cellspacing="5" cellpadding="10" width="90%" bgcolor="#e0e0e0">
<?php
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."<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 "<tr><td>n";
print "<b>".date("d.m.Y - H:i:s",$newsfile[$key])."</b><br>n";
for($i=0; $i<$n; $i=$i+1){
$s=chop($fa[$i]);
$s=htmlspecialchars($s);
$s=createur1($s);
print $s."<br>n";
}
print "</td></tr>";
}
$hd->close();
?>
</body>
</html>
相关文章
Laravel是一个简单优雅的PHP Web开发框架，可以将开发者从意大利面条式的代码中解放出来，通过简单、高雅、表达式语法开发出很棒的Web应用，那下面跟着小编一起来学习laravel中的存取器吧。2016-07-07
用ＰＨＰ和ＡＣＣＥＳＳ写聊天室(二)...2006-10-10
这段时间做数据统计，产品那边要求数据能按高到低排序，想了很多方法，都不行。最后找到PHP的array_multisort()方法。虽然实现了效果，但对这个方法还是半董半董2012-05-05
php的命名空间功能已经出来很久了，但是一直以来没怎么深究过，这次赶着有时间所以特意翻着手册做一个整理和总结帮助自己完善完善,需要的朋友可以参考下2018-02-02
今天小编就为大家分享一篇关于PHP _construct()函数讲解，小编觉得内容挺不错的，现在分享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧2019-02-02
利用一个文本文件实现多个页的计数减少服务器的I/O占用率在需要纪录的文件里,只需加入很少的几行代码2006-10-10
在非常多时候，我们需要跟踪浏览者在整个网站的活动，对他们身份进行自动或半自动的识别（也就是平时常说的网站登陆之类的功能），这时候，我们常采用Cookie与 Session来跟踪和判断2013-04-04
PHP个人网站架设连环讲(一)...2006-10-10
php4的session功能评述（一）...2006-10-10
在PHP3中实现SESSION的功能（一）...2006-10-10
最新评论