1、加入数据程序：

$date=date("Y-m-d H:i:s");//取得系统时间
$ip = $HTTP_SERVER_VARS[REMOTE_ADDR]; //取得发言的IP地址
$text=encode($gb_text);//去掉留言内容后面的空格.
$fp=fopen("gb.dat","a");//以只写模式打开gb.dat文本文件,文件指针指向文件尾部.
$str=$ip."|".$date."|".$gb_name."|".$gb_email."|".$gb_home."|".$face."|".$gb_qq."|".$head."|".$text."|".$reply." ";//将所有留言的数据赋予变量$str，"|"的目的是用来今后作数据分割时的数据间隔符号。
fwrite($fp,$str);//将数据写入文件
fclose($fp);//关闭文件
showmessage("留言成功!","index.php","3");//留言成功，3秒后自动返回主界面。

其中的$gb_name 、$gb_email、$gb_home、$face、$gb_qq、$head、$gb_text、$reply是由发言表单传过来的数据。

2、显示数据程序：

0){//如果信息数大于零（即文本数据库不为空）
$total=ceil($num/$pagesize);//计算总页数(取最大整数,即凡有小数点都进一取整，$pagesize为预设的每页显示的信息数)
if($page<1){//如果当前页面数码号小于1
$page=1;//则赋值为1
}
$number=($page-1)*$pagesize;//计算当前所显示第一个留言的数码号（数码号从零开始，主要是达到与数组单元号对应的目的）
for($i=0;$i<=$pagesize-1;$i++){//进入循环
$row=explode("|",$arr[$number]);//以"|"作为分割符,分割数组$arr中每第$number个单元的数据,并将这些数据赋予数组$rom 
list($ip,$datetime,$name,$email,$home,$face,$qq,$head,$text,$reply)=$row;//将数组$row里的单元数据按顺序赋予括号里的变量
?>
 >//显示客户形象图片


昵称【】
//显示客户名
发表于：//显示留言发表时间

 
>//显示客户留言表情图片
说://显示客户留言内容 

 
//显示回复内容


" rel="external nofollow" target="_blank">访问的主页//客户主页的超连接
" rel="external nofollow" >给发信//客户E-MAIL的连接
的QQ号码是//显示客户的QQ号码 
的IP地址为" //显示客户的IP地址
" rel="external nofollow" >回复//留言回复的连接语句 
" rel="external nofollow" >删除//留言删除的语句（以客户留言时间$datetime作为删除标识）

 
 1)//如果当前页面数码号不等于1
{
$back = $page - 1;//当前页面数码号减1，并将此值赋予变量$back
echo "第一页";//显示第一页的连接
echo " 上一页" ;当前页面数码号等于$back，并显示其连接
}
if ($page <> $total)//如果当前页面数码号不等于总页数号（最后一页数码号）
{
$next = $page + 1;//当前页面数码号加1并赋予变量$next
echo " 下一页" ;//显示下一页连接
echo " 最后一页"; 显示最后一页连接
} 
echo "页数：$page / $total";//显示当前页面数码号和显示最后一页数码号
echo "共有 $num 条留言";//显示留言数信息
}
else {
echo "当前没有任何留言！";//如果文件内容为空则显示的信息
}
else {
echo "数据文件丢失，请联系管理员！或发布留言重新建立数据文件！";//如果文件不存在显示的信息
}

3、数据修改程序：

$list=file("gb.dat");//读取整个gb.dat文件到数组$list,数组每一个元素为一条留言($list[0]是第一条留言的数据、$list[1]是第一条留言的数据.....
$n=count($list);//计算$list内容里的留言总数,并赋予变量$n
if ($n>0){ //如果留言数大于0
$fp=fopen("gb.dat","w");//则以只写模式打开文件gb.dat
$gb_reply=encode($gb_reply);
for ($i=0;$i<$n;$i++) {//进入循环
if(eregi($ttime,$list[$i])){//将送来发留言时间$ttime与数组单元$list里内容进行字串匹配比较
$f=explode("|",$list[$i]);//如果找到匹配，就以"|"作为分隔符,切开留言信息$list[$i](第$i条留言),并将这些数据赋予数组$f
$f[9]=$gb_reply;//将$f[9]（留言信息最后一条数据）用$gb_reply（回复内容）代替。 
$list[$i]=$f[0]."|".$f[1]."|".$f[2]."|".$f[3]."|".$f[4]."|".$f[5]."|".$f[6]."|".$f[7]."|".$f[8]."|".$f[9]." "; //将数组单元$list[$i]的内容用数组$f加上分隔符"|"代替（其中$f[9]是修改了的新数据）。
break;//跳出循环
}
}//循环结束符
}
FOR($i=0;$i<=$n;$i++){//进入循环
fwrite($fp,$list[$i]);//将数组$list的每个单元为一行，写入文件gb.dat
}//循环结束符 
fclose($fp);//关闭文件
showmessage("回复成功!","index.php");//回复成功，自动返回主界面。

4、数据删除程序：

$list=file("gb.dat");//读取整个gb.dat文件到数组$list,数组每一个元素为一条留言($list[0]是第一条留言的数据、$list[1]是第一条留言的数据.....
$n=count($list);//计算$list内容里的留言总数,并赋予变量$n
if ($n>0){//如果留言数大于0
$fp=fopen("gb.dat","w");//则以只写模式打开文件gb.dat
for ($i=0;$i<$n;$i++) {//进入循环
if(eregi($ttime,$list[$i])){//将发送过来发留言时间$ttime与数组$list[$i]里的字串进行匹配比较 
$list[$i]="";//如果匹配成功，则将$list[$i]清空（达到删除的目的）
break;//跳出循环
}
}//循环结束符 
FOR($i=0;$i<=$n;$i++){//进入循环
fwrite($fp,$list[$i]);//将数组$list的每个单元为一行，写入文件gb.dat
} //循环结束符
fclose($fp);//关闭文件
showmessage("删除成功!","index.php");//删除成功，自动返回主界面。
}

5、数据查询程序：

搜索关键字： 






////////////////////////////////上面是搜索表单语句段
您没有输入任何关键字！";//作相关显示
}
else {
if($n>0){//如果留言数大于0
for ($i=0;$i<$n;$i++) {//进入循环
if(eregi($found,$list[$i])){//输入的关键字与数组$list[$i]里的字串进行匹配比较
$row=explode("|",$list[$i]); $id=1; //如果找到匹配，就以"|"作为分隔符,切开留言信息$list[$i](第$i条留言),并将这些数据赋予数组$row.并将变量$id赋予1，以便作为是否找到匹配的判断。
list($ip,$datetime,$name,$email,$home,$face,$qq,$head,$text,$reply)=$row;//将数组$row里的单元数据按顺序赋予括号里的变量
?>
 >//显示客户形象图片


昵称【】
//显示客户名
发表于：//显示留言发表时间

 
>//显示客户留言表情图片
说://显示客户