200X/00/16 レス機能を考えるために、先日ほぼ?完成した掲示板を改良(*^。^*) @JavaScriptを排除して・・・ A今までは、HTMLタグもログを取って居ましたが、タブで区切ってリストに変更。 B返信ボタンを追加して、どのデータの返信ボタンを押したか解るように内緒でログナンバーを 送信するようにしました(*^^*ゞ ログの取り方変更部分 今までは↓ $logdata = $ban."<center><table width='600' border='2'><tr><td bgcolor='#ffffff'> <b>$dai</b> <font size='2'>name: <b><a href='mailto:$address'>$name</a> </b>\[ $hyouji$youbi$jikan ] <a href='$url'>[HOME]</a></font></td></tr><td bgcolor='$bg'><font color='$color'>$memo</font></td></tr></table></center>"."\n"; これを一行で書いてた(*^^*ゞ これからは↓ $logdata = $ban."\t".$dai."\t".$address."\t".$name."\t".$hyouji."\t".$youbi."\t".$jikan."\t".$url."\t".$memo."\n"; 今までも、ログデータ以外はこうやって取ってたのですがね(*^^*ゞ 送信ボタン追加とログナンバー送信 $logfile = "./logfile.txt"; open(LOGFILE, "$logfile"); @logs = <LOGFILE>; foreach $kakiko ( @logs ){ chomp( $kakiko ); ( $ban, $dai, $address, $name, $hyouji, $youbi, $jikan, $url, $memo, $resdata ) = split( /\t/, $kakiko, ); print <<MAMA; <center> <table width='600' border='2'> <tr><td> <font size="2">[$ban]</font> <b>$dai</b> <font size='2'>name: <b><a href='mailto:$address'>$name</a> </b> \[ $hyouji$youbi$jikan ] <a href='$url'>[HOME]</a></td> </font> <td align="center" width="42"> <FORM METHOD="POST" ACTION=\"****.cgi\" \n> <input type=hidden name=resf value="resf"> <input type=hidden name=no value=$ban>(これがログ参照ナンバー) <input type=submit value="返信"> </td></tr> <td colspan='2'><font color='$color'><blockquote>$memo</blockquote></font></td></tr> </table></form> </center> MAMA } close( LOGFILE ); 《これを表示させるとこんな感じ→ 「dbbbs9.html」》 |