一个基于文本文件的留言本
文件add.htm(增加留言)
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言本</title>
</head>
<body>
<form method="POST" action="addnew.php">
  <p>昵称:&nbsp; <input type="text" name="name" size="20"><br>
  密码:<input type="password" name="mima" size="20"><br>
  E-mail:<input type="text" name="email" size="20"><br>
  主题:&nbsp; <input type="text" name="title" size="20"><br>
  体裁:<input type="text" name="ticai" size="20"><br>
 <textarea rows="7" name="txt" cols="34"></textarea><br>
 <input type="submit" value="完成" name="B1"><input type="reset" value="重写" name="B2"></p>
</form>
</body>
</html>
……………………………………………………………………………………………
文件addnew.php(服务器端处理添加文章)
<?
$file
=file("main.txt");
$intt=sizeof($file);
$tid=$intt+1;
$f=fopen("main.txt","r+");
$msg=fread($f,filesize("main.txt"));
fclose($f);
$f=fopen("main.txt","r+");
$f1=fopen("wenzhang/".$tid.".txt","w+");
$text=$txt;
$text=htmlspecialchars($text);
$text=ereg_replace("rn","<br>",$text);
$text=ereg_replace("r","<br>",$text);
$text=$text."n";
fputs($f1,$text);
fclose($f1);
$t=date(Y年m月d日H时i分);
$line=$tid."||".$name."||".$email."||".$title."||".$t."||".$mima."||".$ticai."n";
if(
$file[0]==$line){
echo (
"这篇文章已经发表过");
fclose($f);
exit;
}
fputs($f,$line);
fputs($f,$msg);
echo (
"你的文章已成功发表");
fclose($f);
?>
…………………………………………………………………………………………
文件read1.php(读取留言列表)
<? 
$filename
="main.txt"
$file=file($filename); 
$line=sizeof($file); 
$pagesize=20
$pagecount=ceil($line/$pagesize); 
if(
$pagepage2){ 
$page=$pagepage2-1
if(
$pagepage2>pagecount){ 
$page=pagecount-1

if(
$pagepage2<1){ 
$page=0;} 

$pagecount2=$pagecount-1
$page2=$page+1
$pp=$page*$pagesize
$pp2=$pp+$pagesize
$nextpage=$page+1
$prevpage=$page-1
?>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>New Page 1</title>
</head>
<body> 
<p align="center">目前共有<? echo $line ?>篇文章</p>      
<form method="POST" action="read1.php">      
  <p align="center">     
  <? if ($page!=0){ ?><a href=read1.php?page=<? echo $prevpage?>>上一页</a><? ?>     
  <? if ($page!=$pagecount2){ ?><a href=read1.php?page=<? echo $nextpage?>>下一页</a><? ?>第     
  <input type="text" name="pagepage2" size="3">页<input type="submit" value="跳转" name="B1"></p>     
</form>     
<table border="1" width="100%" bordercolor="#000000" cellspacing="0" cellpadding="0">  
 <tr>  
  <td width="33%" align="center">  
  <p align="center">题目</td> 
<td width="23%" align="center">体裁</td> 
  <td width="23%" align="center">作者</td>  
  <td width="24%" align="center">发表日期</td>  
 </tr>  
 <? for($i=$pp;$i<$pp2;$i++){  
 if(
$i<$line){  
 
$tp=explode("||",$file[$i]);  
 
?> 
 <tr>  
  <td width="33%" align="center">  
 <a href=read2.php?id=<? echo $tp[0?>><? echo $tp[3?></a></td>
<td width="23%" align="center"><? echo $tp[6?></a></td>  
 <td width="23%" align="center"><a href=mailto:<? echo $tp[2?>><? echo $tp[1?></a></td> 
<td width="24%" align="center"><? echo $tp[4?></td> 
</tr> 
<? }} ?> 
</table>   
<form method="POST" action="read1.php">     
  <p align="center">    
  <? if ($page!=0){ ?><a href=read1.php?page=<? echo $prevpage ?>>上一页</a><? ?>     
  <? if ($page!=$pagecount2){ ?><a href=read1.php?page=<? echo $nextpage?>>下一页</a><? ?>第     
  <input type="text" name="pagepage2" size="3">页<input type="submit" value="跳转" name="B1"></p>     
</form>     
<p align="left"> </p>     
</body>         
</html> 
…………………………………………………………………………………………
文件read2.php(查看每条留言)
<?
$filename
="wenzhang/".$id.".txt"
$f=fopen($filename,"r");
$msg=fread($f,filesize($filename));
echo 
$msg;
?>
…………………………………………………………………………………………
至此,留言本程序已完成!留下的工作就交给美工了!ok!