文章导航PC6首页软件下载单机游戏安卓资源苹果资源

pc软件新闻网络操作系统办公工具编程服务器软件评测

安卓新闻资讯应用教程刷机教程安卓游戏攻略tv资讯深度阅读综合安卓评测

苹果ios资讯苹果手机越狱备份教程美化教程ios软件教程mac教程

单机游戏角色扮演即时战略动作射击棋牌游戏体育竞技模拟经营其它游戏游戏工具

网游cf活动dnf活动lol周免英雄lol礼包

手游最新动态手游评测手游活动新游预告手游问答

您的位置:首页网页设计PHP实例 → 一个可分页的基于文本的PHP留言板

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

时间:2004/11/7 3:22:00来源:本站整理作者:蓝点我要评论(0)

    小弟初学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<100;$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."条留言&nbsp;&nbsp;&nbsp;&nbsp;第".$page."页/共".$pages."页
";

  if($page>1){

    $prev=$page-1;

    echo "&lt;&lt;&nbsp;";

  }

  for($i=1;$i<=$pages;$i++){

    echo "&nbsp;".$i."&nbsp;";

  }

  if($page<$pages){

    $next=$page+1;

    echo "&nbsp;&gt;&gt;";

  }

  echo "

";

  for($i=($page-1)*20; $i<$page*20 && $i<$size; $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]."

&nbsp;".$buffer[4]."
&nbsp;



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


   

    大家可到gd9901.oso.com.cn看看效果,有什么问题请E_Mail至jaayee@21cn.com。  


相关阅读 Windows错误代码大全 Windows错误代码查询激活windows有什么用Mac QQ和Windows QQ聊天记录怎么合并 Mac QQ和Windows QQ聊天记录Windows 10自动更新怎么关闭 如何关闭Windows 10自动更新windows 10 rs4快速预览版17017下载错误问题Win10秋季创意者更新16291更新了什么 win10 16291更新内容windows10秋季创意者更新时间 windows10秋季创意者更新内容kb3150513补丁更新了什么 Windows 10补丁kb3150513是什么

文章评论
发表评论

热门文章 没有查询到任何记录。

最新文章 我的php文件怎么打开_php运算符怎么写 php 如何生成静态页面的函数PHP生成图片缩略图PHP session常见问题集锦及解决办法PHP实现同步远程Mysql

人气排行 DEDE在文章列表文章没有缩略图的不显示图片php+mysq修改用户密码我的php文件怎么打开_如何打开php文件的办法FCKeditor的配置和使用方法使用dedecms建站教程PHP+Ajax实现分页技术图片存储与浏览一例Linux+Apache+PHP+MySQLPHP生成图片缩略图