| 2003/10/07(Tue) 01:26:46 編集(投稿者)
■No7842に返信(りゅういちさんの記事) > でどうでしょうか(はしょりすぎてます?(^^;)
ありがとうございました! 二度手間をさせてしまい、申し訳ないことでした。 しかし、見事に、修正出来ました。 m(_._)m 解読に時間がかかりましたが(笑)。
もし、他にも同様の修正をされる方がいるかも知れませんので、一応、どの様に修正したかを書いておきます。 上段が、修正前、下段が修正後です。
if($type){$ti=sprintf("%011d",$tim); if($date){unshift(@RES,"$ti<>$name<>$tim<>$type<>");} $ResCount{$type}++;} を if($type){$ti=sprintf("%011d",$tim); if($date){unshift(@RES,"$ti<>$name<>$tim<>$type<>$date<>");} $ResCount{$type}++;} に。
if($date){unshift(@RES,"$ti<>$name<>$tim<>$namber<>");} を if($date){unshift(@RES,"$ti<>$name<>$tim<>$namber<>$date<>");} に。
($Ti,$Name,$Tim,$namber)=split(/<>/,$RES[0]); を ($Ti,$Name,$Tim,$namber,$ReDate)=split(/<>/,$RES[0]); に。
<th>$ResCount{$namber}</th><th>$Name</th><td align=center><small>$date</small></td> を <th>$ResCount{$namber}</th><th>$Name</th><td align=center><small>$ReDate</small></td> に。
上記の様に、修正しました。 ただし、部分的に、既に前回りゅういちさんに修正を加えていただいた部分が、「修正前」のところに入っているかも知れませんので、 No7787 からのスレッドをご覧ください。
|