|
|
<?
if ($message)
{
$message = ereg_replace( "rnrn", "n<P>", $message);
//去除無(wú)效的控制符號(hào)
$date = date( "l, F j Y, h:i a"); //獲取指定的日期時(shí)間格式
$ip=getenv("REMOTE_ADDR");
$message = "<table border="0" cellspacing="0" width="640" cellpadding="0">
<tr>
<td width="25%"><B>$name </B></td>
<td width="25%">$email</td>
<td width="25%">寫于--$date</td>
<td width="25%">來(lái)自>>$ip</td>
</tr>
<tr>
<td width="100%" colspan="4">$subject</td>
</tr>
<tr>
<td width="100%" colspan="4">$massage</td>
</tr>
</table><hr>
";
$fp = fopen (basename($php_SELF) . ".comment", "a");
fwrite ($fp, $message);
fclose ($fp);
}
@readfile(basename(($php_SELF . ".comment")));
//讀出記錄文件內(nèi)容
?>
<form method="POST" >
<p>姓名：<input type="text" name="name" size="20"> E-mail：<input type="text" name="email" size="24"><hr>
主題：<input type="text" name="subject" size="55">
<p>
您想說(shuō)的話：<br><TEXTAREA name="message" rows=10 cols=60 wrap=virtual>
</TEXTAREA><BR><br>
<INPUT name="submit" type="submit" value="發(fā)表！"> <input type="reset" value="重寫？" name="B2">
</p>
</form>
──────────────────────────────────────
上面的程序，其原理是：在php端首先判斷message變量是否存在，如果不存在，則讀文件。讀文件使用了readfile函數(shù)。至于文件名的提取，這里使用了一個(gè)巧妙的方式（使用$php_SELF變量提取文件所在的絕對(duì)位置，然后用basename()函數(shù)提取文件名，再加上指定的文件尾comment.）來(lái)完成的。為了能更好的學(xué)習(xí)php&MySQL，特拿來(lái)和大家共享，也希望曾經(jīng)和niky一樣痛苦過(guò)的網(wǎng)路人能有一個(gè)屬于自己的留言本，而不是"xxx留言本由xxx.com提供."而大煞風(fēng)景。還等什么，趕快行動(dòng)吧！
版權(quán)所有，請(qǐng)勿隨便轉(zhuǎn)載！
Copyright ©2000 niky All rights reserved.
【本文版權(quán)歸作者與奧索網(wǎng)共同擁有，如需轉(zhuǎn)載，請(qǐng)注明作者及出處】
php技術(shù)：一個(gè)沒(méi)有MYSQL數(shù)據(jù)庫(kù)支持的簡(jiǎn)易留言本的編寫，轉(zhuǎn)載需保留來(lái)源！
鄭重聲明：本文版權(quán)歸原作者所有，轉(zhuǎn)載文章僅為傳播更多信息之目的，如作者信息標(biāo)記有誤，請(qǐng)第一時(shí)間聯(lián)系我們修改或刪除，多謝。
