掲示板に投稿時刻を表示させるには

[上に] [前に] [次に]
みな [E-Mail] 1999/11/18(木) 20:03:41
みなともうします。
今度初めてCGIで掲示板を作り、というか「自分でオリジナル掲示板を作ろう!」
(ディー・アート社)という本を読んで初めて作成してみたのですが、
それには書き込み時の日付表示はできても、時刻の表示は付いて
いませんでした。
基礎が無くいきなりやってみた者の弱みで、一定範囲を超えた応用が全く
できず、立ち往生しています。
ソースを見ると、最後の所にたぶんここを何かに変えればいいんだろうなあ、
というdate設定の部分は見つけたのですが、どういじくり回しても
表示されません。
JavaScriptで時刻を取得してくるという荒技^^;まで使いましたが、
これはリロードするたびに全発言の時刻がリロードした時間になるのでボツ。

あきらめてこちらに公開されているソースで新たに作ろうとも思いますが、
デザイン、機能等を一生けんめい作ってきたので、このまま捨てるには
忍びないです。

こういうものは、ソースを見て「こうすれば……」と分かるものなのかさえ
分からないのですが、とりあえず、CGIソースとそれを表示するHTMLソースを
DLできるようにしておきました。
http://www.geocities.co.jp/Milano/4730/board.LZH

top.html(掲示板トップページ)
post.html(掲示板投稿用のhtml)
list.html(掲示板表示用のhtml)
board.cgi

です。
ただ、list.htmlの<!--date-->の部分に、日付と時刻が入るようになりさえ
すれば、それで満足なのですが。
(今は自分のWinNT4.0でサーバーを入れてテストしています)
サーバーはアパッチで、言語はperlで書かれているそうです。

どなたか、「自分でオリジナル掲示板を作ろう!」をもっておられる方が
いて下されば分かると思うのですが、これだけの情報ではもしかしたら
わからないかもしれないですね。
「こんなんでは全然駄目」なのだったら、すみません。
でもよろしくおねがいします。

みなみ 1999/11/18(木) 23:11:25
$year = $tdate[5] + 1900;
$month = sprintf("%02d",$tdate[4]);
$day = sprintf("%02d",$tdate[3]);
のあとに
$hour = sprintf("%02d",$tdate[2]); #時
$min = sprintf("%02d",$tdate[1]); #分
$sec = sprintf("%02d",$tdate[0]); #秒
を追加。
曜日も表示させるなら
$wday = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat")[$tdate[6]]; #曜日
を追加。
…という方法でどうでしょうか?

みなみ 1999/11/18(木) 23:15:21
あっ、上の発言の$tdateというのは
全部$dateに置き換えてください。
テストしたのをそのまま送ってしまいました。
申し訳ありません。

TAKI 1999/11/18(木) 23:41:33
念のため。
みなみさんの修正の後、619行目の

>my $date = "$year\-$month\-$day";

my $date = "$year\-$month\-$day $hour:$min:$sec";
のようにする必要あり。と思う。
(曜日を追加する場合はどこかに$wdayを追加)
#CGI-Lite.pm入れてないんで実際に動かして試してはいないです(^^;

Nobu3 1999/11/18(木) 23:44:45
http://www.tohoho-web.com/wwwperl2.htm#Times
のあたりも参考にするといいかも。

みな [E-Mail] 1999/11/19(金) 10:54:47
[[解決]]
で、できましたああああああ!!!(嬉)(嬉)(嬉)(嬉)(嬉)
ほんとに、ほんとに、ありがとうございました!!!
すっごくうれしいでふ〜〜*T▽T*

ほんとに、こんな質問に親切に答えて下さって、感激モード(泣)
ありがとうございました!

[上に] [前に] [次に]