文章詳情頁
一個php作的文本留言本的例子(二)
瀏覽：5日期：2024-01-06 17:24:06
上一次我們研究了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 = " "$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) ;;{ ;;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代碼中,這樣寫起代碼很愜意. 待續...
標簽：
PHP
排行榜
網公網安備