CGIなどのの質問を受付ます。
現在SPAM対策の為、一部ホストアドレスを規制中。
▼スレッド
│
└◇280:Re[6]:日記SP「開いた時にその月のログを表示」にはできませんか? [ぷりん] 01/18 17:29
└◇281:すみません、もう1つ・・・ [ぷりん] 01/25
└◇282:Re:すみません、もう1つ・・・ [moon(管] 01/25
できました!スレッド一覧
本当にありがとうございました。
結構長い間探し回っていたのですが、これで理想のcgiになりました。
お世話になりました。
また、これからいっぱい使わせてもらうのでよろしくお願いします。
早いレスも有難うございました。助かりました☆
同じようにやって携帯からでもページを開いた時は当月のログにしました。スレッド一覧
最新ログもどうにか見たいんですが・・・。
お教えいただけますか?
> 同じようにやって携帯からでもページを開いた時は当月のログにしました。スレッド一覧
> 最新ログもどうにか見たいんですが・・・。
実際にテストをしていないので動くかどうかはわかりませんが・・・
携帯の設定はkei.plに記述されています。
また、i-modo・vodafone用(CHTML)と、au用(XHTML)に分かれていますので、同じような編集を二箇所ずつします。
まず523行目あたり
print qq|<select name="day3">\n|;
print qq|<option value="">\n|;
print qq|<option value="a">上旬\n|;
print qq|<option value="b">中旬\n|;
print qq|<option value="c">下旬\n|;
print qq|</select>\n|;
↓
print qq|<select name="day3">\n|;
print qq|<option value="">\n|;
print qq|<option value="new">最新\n|;
print qq|<option value="a">上旬\n|;
print qq|<option value="b">中旬\n|;
print qq|<option value="c">下旬\n|;
print qq|</select>\n|;
610行目あたりも同様に。
283行目
if ($in{'day3'} eq "a") {
↓
if ($in{'day3'} eq "new") {
last;
} elsif ($in{'day3'} eq "a") {
ちょっと下にある320行目あたり
} else {
$chh = "$in{'year'}$in{'mon'}$in{'day1'}$in{'day2'}";
if ($_[0] =~ /^$chh/) {
push(@datas,$line);
}
}
}
foreach (@datas) {
(@_) = split(/\t/);
↓
} else {
$chh = "$in{'year'}$in{'mon'}$in{'day1'}$in{'day2'}";
if ($_[0] =~ /^$chh/) {
push(@datas,$line);
}
}
}
open (IN,$file); #←これを入れる
@datas = <IN>; #←これを入れる
close (IN); #←これを入れる
foreach (@datas) {
(@_) = split(/\t/);
同じように380行目あたりからのものを修正する。
以上で大丈夫だと思います。