記事No | : 2423 |
投稿日 | : 2007/12/23(Sun) 09:47:33 |
タイトル | : YY-BOARDでトピック表示のとき |
ID情報 | : kaz_ck |
投稿者 | : みすじ |
URL | : http://mediaplan.sakura.ne.jp/yybbs/yybbs.cgi |
YY-BOARD(Ver:6.21)でトピック表示にしたときに個別記事閲覧画面でツリー記事も同時に表示されるのですが、このツリー記事を表示させないようにすることはできないでしょうか?
また訪問者による表示タイプの切り替えをできなくし、初期表示タイプで固定することもできないでしょうか?
よろしくご教授お願いいたします。
記事No | : 2425 |
投稿日 | : 2007/12/23(Sun) 15:06:17 |
タイトル | : Re: YY-BOARDでトピック表示のとき |
ID情報 | : fuyuki |
投稿者 | : BAL |
URL | : http://f43.aaa.livedoor.jp/~sumure/ |
> YY-BOARD(Ver:6.21)でトピック表示にしたときに個別記事閲覧画面でツリー記事も同時に表示されるのですが、このツリー記事を表示させないようにすることはできないでしょうか?
>
> また訪問者による表示タイプの切り替えをできなくし、初期表示タイプで固定することもできないでしょうか?
>
> よろしくご教授お願いいたします。
以下の修正を。
yybbs.cgi
#-------------------------------------------------
# 記事表示部
#-------------------------------------------------
-- 途中省略 --
if (!defined($list_type{$in{'list'}})) { $in{'list'} = $view_type; }
if ($in{'list'} ne "thread") {
print qq |[<a href="$bbscgi?mode=form&list=$in{'list'}">新規投稿</a>]\n|;
}
#▼ここから▼
#foreach ( 'thread', 'tree', 'topic' ) {
#next if ($in{'list'} eq $_);
#print qq |[<a href="$bbscgi?list=$_">$list_type{$_}</a>]\n|;
#}
#▲ここまでコメントアウト▲
print <<EOM;
[<a href="$bbscgi?mode=howto&list=$in{'list'}">留意事項</a>]
read.cgi
#-------------------------------------------------
# 記事個別閲覧
#-------------------------------------------------
-- 途中省略 --
if (!$in{'list'}) { $in{'list'} = 'thread'; }
if ($in{'list'} ne "thread") {
print qq |[<a href="$bbscgi?mode=form&list=$in{'list'}">新規投稿</a>]\n|;
}
#▼ここから▼
#foreach ( 'thread', 'tree', 'topic' ) {
#next if ($in{'list'} eq $_);
#print qq |[<a href="$bbscgi?list=$_">$list_type{$_}</a>]\n|;
#}
#▲ここまでコメントアウト▲
print <<EOM;
[<a href="$bbscgi?mode=howto&list=$in{'list'}">留意事項</a>]
#-------------------------------------------------
# 記事一括閲覧
#-------------------------------------------------
sub all_list {
print <<EOM;
<blockquote>
EOM
# 関連ツリー
my $i = 0;
local($oya,$resub,$list);
foreach (@tree) {
$i++;
my ($no,$reno,$dat,$nam,$eml,$sub,$com,$url,$hos,$pw,$col,$ico) = split(/<>/);
#if ($reno && $i == @tree) { print " └ "; } ## ←コメントアウト
#elsif ($reno && $i > 1) { print " ├ "; } ## ←コメントアウト
my $param;
if ($reno) {
$param = "&top=$reno";
$oya = $reno;
} else {
$oya = $no;
$resub = $sub;
}
# ツリー表示
#print qq |<a href="$readcgi?mode=all&list=$in{'list'}&no=$oya#$no">$sub</a> - <b>$nam</b> $dat <span style="color:$subcol">No.$no</span><br>\n|; ## ←コメントアウト
記事No | : 2432 |
投稿日 | : 2007/12/24(Mon) 00:17:02 |
タイトル | : Re: YY-BOARDでトピック表示のと |
ID情報 | : kaz_ck |
投稿者 | : みすじ |
URL | : http://mediaplan.sakura.ne.jp/yybbs/yybbs.cgi |
BAL様、迅速で丁寧なご返答ありがとうございました。