一个可分页的基于文本的PHP留言板_PHP

小弟初学PHP，编了一个留言板程序，自我感觉良好，故厚着脸皮放了上来，请各位大哥指正。源程序如下：
//文件名：guest.php
//设定部分
$guestfile="guest";//纪录留言的文本文件
$home="index.html";//返回的主页
$imagedir="image"; //图像文件的目录
$backimage=$imagedir."/bk.gif";//背景图像
$backcolor="#ceffff";//背景颜色,在$backimage=""时起作用
?>


if($QUERY_STRING!="") {
$page = $QUERY_STRING;
} else {
$page = 1;
}
if($mode=="add"){
$name=htmlspecialchars(trim($name));
$title=htmlspecialchars(trim($title));
$data=nl2br(htmlspecialchars($data));
$data=str_replace("r","",$data);
$data=str_replace("x0A","",$data);
$data=str_replace(" "," ",$data);
if($data=="") $data=" ";
$e_mail=trim($e_mail);
if($e_mail=="") $e_mail=0;
$url=trim($url);
if($url=="http://" || $url=="") $url=0;
$time=date("Y")."年".date("m")."月".date("d")."日[".date("H").":".date("i").":".date("s")."]";
if($name=="" || $title==""){
echo "n";
exit;
}
$adddata=$name."t".$e_mail."t".$url."t".$title."t".$data."t".$icon."t".$time."n";
if(file_exists($guestfile)){
$filebuffer=file($guestfile);
if(sizeof($filebuffer)>100){
for($i=0;$i $newbuffer[i]=$filebuffer[i];
}
else{
$newbuffer=$filebuffer;
}
$fp=fopen($guestfile,"w");
fputs($fp,$adddata);
fclose($fp);
$buffer=implode("",$newbuffer);
$fp=fopen($guestfile,"a");
fputs($fp,$buffer);
fclose($fp);

}
else{
$fp=fopen($guestfile,"w");
fwrite($fp,$adddata);
fclose($fp);
}
}
?>




if($backimage!="" && file_exists($backimage)){
echo "n";
}
else{
echo "n";
}
?>

供电9901网上空间留言板

[返回首页]

姓名:



E_Mail:



主页:



留言标题:



留言内容:(不支持HTML)

表情:

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">


" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">


" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

" width="15" height="15">

---

if(!file_exists($guestfile)){
echo "

没有留言

";
}
else{
$filebuffer=file($guestfile);
$size=sizeof($filebuffer);
$pages=ceil($size/20);
echo "

共".$size."条留言 第".$page."页/共".$pages."页
";
if($page>1){
$prev=$page-1;
echo "<< ";
}
for($i=1;$i echo " ".$i." ";
}
if($page $next=$page 1;
echo " >>";
}
echo "

";
for($i=($page-1)*20; $i $buffer=explode("t",$filebuffer[$i]);
echo "";
echo "";
echo "";
echo "";
echo "";
echo "";
echo "";
echo "";
}
}
?>

	".$buffer[3]."	(".$buffer[0].")	"; if($buffer[2]!="0"){ echo "主页"; } else{ echo "主页"; } echo "	"; if($buffer[1]!="0"){ echo "E_Mail"; } else{ echo "E_Mail"; } echo "	".$buffer[6]."
	".$buffer[4]."

---

本网站由疯狂电脑工作室制作 2000

大家可到gd9901.oso.com.cn看看效果，有什么问题请E_Mail至[e-mail]。