一个php作的文本留言本的例子(四)
一个php作的文本留言本的例子(四),一个php作的文本留言本的例子(四)
---------
//dele.php<html
<head
<title删除留言</title
<style
<!--
A:link {text-decoration: none ; color:0000ff}
A:visited {text-decoration: none; color:004080}
A:active {text-decoration: none}
A:hover {text-decoration: underline; color:ff0000}
BODY {FONT-SIZE:10pt}
TH {FONT-SIZE:10 pt}
TD {FONT-SIZE: 10pt}
--
</style
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"
</head
<?
require("sys.php");
if ($Submit)
{
if ($password<$managepwd)
{$errorm="<font color=red密码错误</font.无权操作..";}
else
{
$content=file($guestfile);
$message=$content[$record-1];
$count=count($content);
if ($dele=="delreply")
{
$replylen=strlen(strstr($message,"<!--reply"));
$long=strlen($message);
$len=$long-$replylen;
$message=substr($message,0,$len);
}
else
{$message="";}
//writefile
$fp=fopen($guestfile,"w");
for ($i=0;$i<$count;$i++)
{
if ($i==($record-1)){$content[$i]=$message;}
fputs($fp,$content[$i],strlen($content[$i]));
}//end for
fclose($fp);
echo "<meta http-equiv=Refresh content="1;url=guest.php"";
exit;
}
}// end ifSubmit
$content=file($guestfile);
$message=$content[$record-1];
$found=ereg("<!--reply",$message);
?
<body bgcolor="#FFFFFF" background="back.gif"
<? include("head.htm"); ?
<table width="68%" border="1" cellpadding="5" align="center" cellspacing="0" bordercolor="#F2F2F2"
<form action=dele.php method=post
<?
if ($errorm)
{
echo "<tr";
echo "<td height=27$errorm</td";
echo "</tr";
}
?
<? echo $message ?
<tr align="center"
<td height="37" bgcolor="#f0f0f0"
<?
if ($found)
{
echo "<input type=radio name=dele value=delall";
echo "全部删除 ";
echo "<input type=radio name=dele value=delreply checked";
echo "仅删除回复";
}
?
<font color="#000000"管理密码</font
<input type="password" name="password" size="10"
<input type=hidden name=record value=<? echo "$record";?
<input type="submit" name="Submit" value="我要删除了"
</td
</tr
</form
</table
<? include("bottom.htm"); ?
</body
</html
------
//sys.php
<titlezihanonline</