こんにちは。

質問

こんにちは。
GateWayBoardを使用しています。
http://www.kent-web.com/bbs/gwbbs.html

書き込みのあった2日以内の記事にnewマークをつけたいと思い、
下記のサポート掲示板などを参考に試行錯誤してみたのですが・・・
http://www.kent-web.com/support/old/62/0594.html

結果、どのように記述すればよいかわからずうまくいきませんでした。

教えていただけると助かります。
よろしくお願い致します！

回答No.1

ralf124c · ベストアンサー

リンクのは結構大変そう。
単純な内容なのでちょっと作ってみました。
自己責任で作業を行ってください。

以下のサブルーチンをgwbbs.cgiの最後尾に加える
## -------------ここから
sub fChkDays{
my ($sDate,$nHowManyDays,@waste) = @_;
if( $nHowManyDays eq ''){ $nHowManyDays = 2; }

$sDate =~ s/\([^\)]+\)//;
$sDate .= ':00';

my @aDT = localtime(time() - (86400 * $nHowManyDays));
my $sCT = sprintf("%04d/%02d/%02d 00:00:00",$aDT[5]+1900,$aDT[4]+1,$aDT[3]);

my $sRet = 0;
if($sCT gt $sST){ $sRet = 1; }

return $sRet;
}
## -------------ここまで

そして登校日表示している行(344行目付近)の後ろに
if( fChkDays($date) ){ print " New "; }
を挿入します。
" New "
はイメージタグなりなんなり、アレンジしてください。

とりあえず自助努力が肝心です。

お礼

お礼が遅くなり、大変失礼いたしました！

回答No.3

ralf124c

すいません
if($sCT gt $sST){ $sRet = 1; }
の同じ部分もうひとつ間違え
本当は
if($sCT lt $sDate){ $sRet = 1; }
になります
何度も申し訳ありません。

回答No.2

ralf124c

すいません
if($sCT gt $sST){ $sRet = 1; }
の部分、変数間違いでした－＞　試験用のコードが残ってました
本当は
if($sCT gt $sDate){ $sRet = 1; }
になります
回答者が、失敗してすいません。