电脑技术学习

一个php作的文本留言本的例子(二)

dn001
上一次我们研究了guest.php文件.具体的问题还要求读者朋友自己深入的去实践,而且需要一些工具书来学习,如果您一点php的知识都没有,笔者奉劝您就不要想下看了,笔者没有太多的时间和篇幅去逐句探究一个php文件的用途和意义.好的,接下来我们来作edit.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 = "&nbsp;"
$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(""","&quot;",$txtreply);
if ($Submit)
;;{
;;if ($TxtPassword==$managepwd)
;;{
;;if ($TxtName!="" and $TxtContent!="")
;;;;{
;;save($record);
;;echo "<meta http-equiv=Refresh content="1;url=guest.php">"
;;exit;
;;;;}else {$errorm="留言人姓名和内容必填!!";}
;;}
;;else {$errorm="密码错误,只有管理员有权修改!!";}
;;}
?>
</head>

<body bgcolor="#FFFFFF" background="back.gif">
<? include('head.htm');?>
<div align="center">
;;<center>
;;;;<table border="1" width="68%" height="31" cellspacing="0" cellpadding="7" bordercolor="#E3E3E3">
;;;;;<form action="edit.php" method=post>
;;;;;<?
;;;;;if ($errorm and $Submit)
;;;;;{
echo"<tr>";;;
echo"<td height=40 colspan=4>"
echo"<font color=red>出错了,</font>$errorm"
echo"</td>"
echo"</tr>"
;;;;;}
;;;;;?>
<tr>;;
;;<td width="18%" height="37" bgcolor="#f0f0f0"><font color="#000000">留言大名</font></td>
;;<td width="39%" height="37" bgcolor="#FFFFFF">;;
;;;;<input type="text" name="TxtName" size="26" value=<?echo "$txtname"?>>
;;;; </td>
;;<td width="11%" height="37" bgcolor="#f0f0f0"><font color="#000000">来自</font></td>
;;<td width="32%" height="37" bgcolor="#FFFFFF">;;
;;;;<input type="text" name="TxtFrom" size="20" value=<?echo "$txtfrom"?>>
;;</td>
;;;;;;</tr>
;;;;;;<tr>;;
;;<td width="18%" height="31" bgcolor="#f0f0f0"><font color="#000000">主页地址</font></td>
;;<td width="39%" height="31" bgcolor="#FFFFFF">;;
;;;;<input type="text" name="TxtHomepage" size="26" value=<?echo "$txthomepage"?>>
;;</td>
;;<td width="11%" height="31" bgcolor="#f0f0f0"><font color="#000000">Email</font></td>
;;<td width="32%" height="31" bgcolor="#FFFFFF">;;
;;;;<input type="text" name="TxtEmail" size="20" value=<?echo "$txtemail"?>>
;;</td>
;;;;;;</tr>
<tr bgcolor="#FFFFFF">;;
;;<td height="31" colspan="4"><font color="#000000">留言内容</font></td>
;;;;;;</tr>
<tr bgcolor="#f0f0f0">;;
;;<td height="105" colspan="4" valign="middle" align="center">;;
;;;;<textarea rows="6" name="TxtContent" cols="50" wrap="VIRTUAL"><? echo "$txtcontent"?>
;;</textarea>
</td>
;;;;;;</tr>
<tr bgcolor="#FFFFFF">;;
;;<td height="40" colspan="4" valign="middle" align="center"> <font color="#000000">修改密码</font>;;
;;;;<input type="password" name="TxtPassword" size="10" value=<?echo "$TxtPassword"?>>
;;;;<font color="#000000">是否保存密码</font>;;
;;;;<input type="checkbox" name="SavePassword" value="on" checked>
;;<input type=hidden name=record value=<? echo "$record"?>>
;;
;;<input type="submit" value="我要修改了" name="Submit">
</td>
;;;;;;</tr>
;;;;;;<? echo "$txtreply"?>
;;;;;;;<input type=hidden name=TxtReply value="<? echo "$txtreply" ?>">
;;;;;;</form>
;;;;</table>
;;</center>
</div>
<?include('bottom.htm');?>
</body>

</html>
----------
该注明的地方我已作了诠释.php可以嵌入html代码中,这样写起代码很惬意.
待续...

标签: