南强小屋 Design By 杰米
上一次我们研究了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代码中,这样写起代码很惬意.
待续...
标签:
|一个|个p|ph|hp|p作|作的|的文|文本|本留|留言|言本|本的|的例|例子|子二|二|

南强小屋 Design By 杰米
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
南强小屋 Design By 杰米

评论“一个php作的文本留言本的例子(二)”

暂无一个php作的文本留言本的例子(二)的评论...

稳了!魔兽国服回归的3条重磅消息!官宣时间再确认!

昨天有一位朋友在大神群里分享,自己亚服账号被封号之后居然弹出了国服的封号信息对话框。

这里面让他访问的是一个国服的战网网址,com.cn和后面的zh都非常明白地表明这就是国服战网。

而他在复制这个网址并且进行登录之后,确实是网易的网址,也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情,因为以前都没有出现这样的情况,现在突然提示跳转到国服战网的网址,是不是说明了简体中文客户端已经开始进行更新了呢?