一个php作的文本留言本的例子(二)
一个php作的文本留言本的例子(二),一个php作的文本留言本的例子(二)
-----------
//edit.php
<?
if ($Submit)
{
if ($SavePassword=="on")
{setcookie("TxtPassword","$TxtPassword",time()+30*24*3600);}
else
{setcookie("TxtPassword");}
}
?
<html
<style type=text/css
Td {FONT-SIZE: 10pt;}
TEXTAREA
{
FONT-FAMILY: "宋体";
FONT-SIZE: 10pt;
}
</style
<head
<meta http-equiv="Content-Language" content="zh-cn"
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"
<title修改留言</title
<?
require("sys.php");
function readvalue($tags,$tage)
{
global $message,$long,$reply;
$StrStart=strlen(strstr($message,$tags))-strlen($tags);//去除标记后变量所在字串的起始位置.
$StrEnd=strlen(strstr($message,$tage));
$len=$StrStart-$StrEnd;
$StrStart=$long-$StrStart;//起始字符.
$StrString=substr($message,$StrStart,$len);
return $StrString;
}
function save($record)
{
global $TxtContent,$TxtEmail,$TxtHomepage,$TxtEmail,$TxtName,$TxtFrom,$TxtReply,$REMOTE_ADDR,$guestfile;
$content=file($guestfile,"r");
$space = " ";
$time = date(Y年m月d日H小时i分);
$ip=$REMOTE_ADDR;
$TxtReply=StripSlashes($TxtReply);
$TxtContent=StripSlashes($TxtContent);
$TxtContent=htmlspecialchars($TxtContent);
$TxtContent=check_strlen_long($TxtContent);
$TxtContent=nl2br($TxtContent);
$Wcontent = "<tr<td<font color=#AB00E1留言内容:</font<br<!--content$TxtContent<!--endcontent ";
$Wcontent=$Wcontent."<br<font color=#6633FF留言人大名:</font<!--name$TxtName<!--endname ";
if ($TxtEmail !="")
{$Wcontent=$Wcontent."<br<font color=#9900CC电子信箱</font<a href="mailto:$TxtEmail"<!--email$TxtEmail<!--endemail</a"."$space";}
if ($TxtHomepage !="http://")
{$Wcontent=$Wcontent."<font color=#9900CC主页:</font$TxtHompage<a href="$TxtHomepage" target=new<!--homepage$TxtHomepage<!--endhomepage</a";}
$Wcontent=$Wcontent."<br<font color=#0000FF时间:$time 来自:<!--from$TxtFrom<!--endfrom ".$ip."</font";
$Wcontent=ereg_replace(chr(10),"",$Wcontent);
$Wcontent=$Wcontent."<hr size=1</td</tr";
$TxtReply=ereg_replace(chr(10),"",$TxtReply);
$WContent=$Wcontent.$TxtReply."n";
$count=count($content);
$fp=fopen($guestfile,"w");
for ($i=0;$i<$count;$i++)
{
if ($i==$record-1)
{$content[$i]=$WContent;}
fputs($fp,$content[$i]);
}
fclose($fp);
}
$content=file($guestfile,"r");
$message=$content[$record-1];
$long=strlen($message);
$txtcontent=readvalue('<!--content','<!--endcontent');
$txtname=readvalue('<!--name','<!--endname');
$txtfrom=readvalue('<!--from','<!--endfrom');
$txtemail=readvalue('<!--email','<!--endemail');
$txthomepage=readvalue('<!--homepage','<!--endhomepage');
$txtcontent=strip_tags($txtcontent);
$tags="<!--reply";
$txtreply=strstr($message,$tags);
$txtreply=ereg_replace(""",""",$txtreply);
if ($Submit)
{
if ($TxtPassword==$managepwd)
{
i