一個可分頁的基於文本的PHP留言板源碼第1/2頁_php執行個體

來源:互聯網
上載者:User
小弟初學PHP,編了一個留言板程式,自我感覺良好,故厚著臉皮放了上來,請各位大哥指正。來源程式如下: 
<?php 
//檔案名稱:guest.php 
//設定部分 
$guestfile="guest";//紀錄留言的文字檔 
$home="index.html";//返回的首頁 
$imagedir="image"; //影像檔的目錄 
$backimage=$imagedir."/bk.gif";//背景映像 
$backcolor="#ceffff";//背景顏色,在$backimage=""時起作用 
?> 
<html> 
<head> 
<?php 
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 "<script Language="JavaScript">n"; 
    echo "  alert("請至少輸入姓名與留言標題。");n"; 
    echo "history.back();"; 
    echo "</script></head></html>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); 
  } 

?> 
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312"> 
<title>留言板</title> 
<style> 
a{text-decoration:none; font-size:9pt; color:blue} 
a:visited {text-decoration:none; color:009999} 
a:hover {color:red; text-decoration:underline} 
td{font-size:9pt;line-height:14pt} 
P{font-size:9pt} 
</style> 
</head> 
<?php 
if($backimage!="" && file_exists($backimage)){ 
  echo "<body background="".$backimage."" bgproperties="fixed">n"; 

else{ 
  echo "<body bgcolor="".$backcolor."">n"; 

?> 
<table width="100%" border="0" cellspacing="0" cellpadding="0"> 
  <tr bgcolor="#9999FF"> 
    <td height="28"> 
      <div align="center"><b>供電9901網上空間留言板</b></div> 
    </td> 
  </tr> 
<tr><td><div align="right"><a href="<? echo $home; ?>">[返回首頁]</a></div></td></tr> 
</table> 
<font size="2"> 
<form method="post" action="guest.php"> 
  <input type="hidden" name="mode" value="add"> 
  <p>姓名: 
    <input type="text" name="name" size="20"> 
    <br> 
    E_Mail: 
    <input type="text" name="e_mail" size="20"> 
    <br> 
    首頁: 
    <input type="text" name="url" value="http://" size="30"> 
    <br> 
    留言標題: 
    <input type="text" name="title" size="50"> 
    <br> 
    留言內容:(不支援HTML)<br> 
    <textarea name="data" rows="5" cols="60"></textarea> 
  <div id="Layer1" style="position:absolute; left:460px; top:152px; width:301px; height:104px; z-index:1"> 
    <p>表情:</p> 
    <p> 
      <input type="radio" name="icon" value="1"> 
      <img src="<? echo $imagedir."/1.gif"; ?>" width="15" height="15"> 
      <input type="radio" name="icon" value="2"> 
      <img src="<? echo $imagedir."/2.gif"; ?>" width="15" height="15"> 
      <input type="radio" name="icon" value="3"> 
      <img src="<? echo $imagedir."/3.gif"; ?>" width="15" height="15"> 
      <input type="radio" name="icon" value="4" checked> 
      <img src="<? echo $imagedir."/4.gif"; ?>" width="15" height="15"> 
      <input type="radio" name="icon" value="5"> 
      <img src="<? echo $imagedir."/5.gif"; ?>" width="15" height="15">
當前1/2頁  12下一頁閱讀全文
相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.