| 記事No | ： 10741 |
| 投稿日 | ： 2012/07/13(Fri) 21:21:25 |
| タイトル | ： レス番号と並び替え |
| ID情報 | ： mulchs |
| 投稿者 | ： 七星 |
| URL | ： http://mulchs.r.ribbon.to/patio/patio.cgi? |
http://www.kent-web.com/bbs/patio.html
http://www.kent-web.com/bbs/patio/patio.cgi
についてなんですが、スレ内の記事のレスで、
・レスごとにナンバーをつけたい
・レスの並び順を変えたい
のですが、どうやったらいいでしょうか。
具体的に言うと・・・
http://mulchs.r.ribbon.to/patio1/patio.cgi?read=1&ukey=0
（↑↓どちらも僕の掲示板です）
http://mulchs.r.ribbon.to/patio/read.cgi?no=1
上のＵＲＬでは、レス題名の「テスト」の隣に何もありませんが、
下のＵＲＬでは、レス題名の「テスト」の隣に、「NO.○」と書いてありますよね。
上のＵＲＬでは、古いレスがページ下にありますが（更新日時見ればわかります）、
下のＵＲＬでは、古いレスはページ上にありますよね。
この具体例でいうと、上のＵＲＬでなっていることを下のＵＲＬのように変えたいのです。
長文ですが誰か回答お願いします
| 記事No | ： 10742 |
| 投稿日 | ： 2012/07/14(Sat) 07:52:05 |
| タイトル | ： Re: レス番号と並び替え |
| ID情報 | ： Fuyuki |
| 投稿者 | ： BAL |
| URL | ： http://www26.tok2.com/home/sumire1100/ |
以下の修正を
●patio.cgi
#-----------------------------------------------------------
# 記事閲覧
#-----------------------------------------------------------
-- 省略 --
# スレッド読み込み
$in{read} =~ s/\D//g;
my @log;
open(IN,"$cf{logdir}/$in{read}.cgi") or &error("open err: $in{read}.cgi");
my $top = <IN>;
my $par = <IN>;
my ($no,$sub,$res,$key) = split(/<>/, $top);
my $i = 0;
while(<IN>) {
$i++;
next if ($i <= $res - $cf{pg_max} - $pg);
last if ($i > $res - $pg);
push(@log,$_); ## ★追加
#unshift(@log,$_); ## ★コメントアウト
-- 省略 --
# レス記事
foreach (@log) {
my ($no,$sub,$nam,$eml,$com,$date,$ho,$pw,$url,$mlo,$myid,$tim,$up1,$up2,$up3) = split(/<>/);
$nam = qq|<a href="mailto:$eml">$nam</a>| if ($eml && $mlo);
$url &&= qq|<a href="$url" target="_blank">$url</a>|;
$com =~ s/\{ico:(\d+)\}/<img src="$cf{iconurl}\/$smile[$1]">/g;
# 画像
$com = &image($com,$tim,$up1,$up2,$up3);
my $tmp = $loop;
$tmp =~ s/<!-- res_id -->/[ID: $myid]/g if ($cf{authkey} && $myid);
$tmp =~ s|!ico:(\w+\.\w+)!|<img src="$cf{iconurl}/$1">|g;
$tmp =~ s/!res_no!/$no/g; ## ★追加
●read.html修正
<!-- loop_begin -->
<div class="art-head">
!ico:pg_art.gif! [!res_no!] !res_sub!
| 記事No | ： 10744 |
| 投稿日 | ： 2012/07/14(Sat) 13:22:29 |
| タイトル | ： Re^2: レス番号と並び替え |
| ID情報 | ： mulchs |
| 投稿者 | ： 七星 |
| URL | ： http://mulchs.r.ribbon.to/patio/patio.cgi? |
助かりました！ありがとうございます！