CGI サポートフォーラム - サイトトップ

記事No.439 へのコメントです。

設定過去ログ見ましたがよくわかりませんでした。
##-->LIST表示を前の消して過去ログのコピペしてやてみましたが
何もかわってませんでした。コピペしたのは以下のです。

##-->LIST表示

sub list {
open(LOAD,"$logfile") || &error("ログファイルが開けません...Line：".__LINE__,"head");
@box = <LOAD>;
close(LOAD);
if ($ntop==1) { @box = reverse @box; }

&head;
$html .= "<br><table width=400 border=0 cellspacing=0 cellpadding=0>\n<tr><td>\n";

$time=time();

&LoadCategory;
&LoadSubCategory;

foreach $tmp_catid (keys %category) {
$catdata = &GetCategory ($tmp_catid);
$tmp_list{$catdata->{'group'}."_".$catdata->{'catname'}."_".$tmp_catid} = $tmp_catid;
}

foreach $tmp_subid (keys %subcategory) {
$subdata = &GetSubCategory ($tmp_subid);
$tmp_sublist{$subdata->{'group'}."_".$subdata->{'subname'}."_".$tmp_subid} = $tmp_subid;
}

foreach $tmp_catid (sort keys %tmp_list) {
$catdata = &GetCategory ($tmp_list{$tmp_catid});

foreach (sort keys %tmp_sublist) {
$subdata = &GetSubCategory ($tmp_sublist{$_});
if ($catdata->{'catid'} != $subdata->{'catid'}) { next;}

@text=();
foreach $line (@box) {
local($xno,$xjenre,$sitename,$master,$url,$com,$bn,$date,$xtime) = split(/\t/, $line);
@jb = split(":",$xjenre);
$f=0;
foreach $tmp (@jb) {
if($tmp eq $subdata->{'subid'}) { $f=1; }
}
if ($f==0) { next; }
$new="";
$sitename = "<a href=\"$url\"$target class=\"listhost\"><img src=\"$imgdir/$dot_image\" border=0> $sitename</a>";
if ($master) { $master = ": <span class=\"listmaster\">MASTER:$master $keisho</span>";}
if ($time <= $xtime+(60*60*24*$newd)) { $new = "<img src=\"$imgdir/new.$ext\" width=25 height=9>"; }
push(@text,"$sitename $master <a href=\"$script?mode=vew&id=$xno\"><img src=\"$imgdir/data.$ext\" width=30 height=9 border=0></a>$new<br><img src=\"$imgdir/dummy.png\" width=3 height=3><br>\n");
}
if (@text) {
$html .= "<div align=right class=\"header\"><b> $catdata->{'catname'}\/$subdata->{'subname'} </b></div>\n";
$html .= "@text";
$html .= "<br>\n";
}
}
}

$html .= "<br>\n<div><img src=\"$imgdir/line.$ext\" width=400 height=5></div>\n<span class=\"ss\">□タイトルをクリックするとサイトのURLにジャンプします．<br>□<img src=\"$imgdir/data.$ext\" width=30 height=9 border=0 align=middle>をクリックするとそのサイトの詳細が見られます．</span>\n</td></tr>\n</table>\n";
&foot;
}

過去ログでなんとかと言われても解りませんので
もう1度丁寧に教えて頂けませんか？
せめてNO.だけでも書いて下さらないと過去ログの
どれ使えば良いのか全然わかりません；；
グループの使い方も検索でわかりませんでした。
正直面倒かもしれませんがサポートなので
もう少し1つ1つ丁寧に教えていただきたいです。
リンク工事中なんで早めにアップしたいので。

[ この記事にコメントを返信する ] [ 原文引用 ]