KENT-WEB サポートコーナー 過去ログ [ 0121 ]


記事No: 14001
投稿日: 2015/05/12(Tue) 19:41:03
タイトルWeb-Patio掲示板について
ID情報: st_002
投稿者: st
URLhttp://www.alma-web.net/patio/list.cgi

はじめまして。
突然の質問失礼いたします。

現在、WEB-PATIOのスレ式掲示板を少し改造しているのですが、
TOPページのスレッドの一覧が表示される部分に、”スレッドを立てた日時”を表示したいのです。
最終更新時間は、デフォルトで表示されていますが、”スレッドを立てた日時”が表示できません。

当方、プログラムの知識に疎く、大変申し訳ございませんがどなたかご教授頂けませんでしょうか。
よろしくお願いいたします。


記事No: 14002
投稿日: 2015/05/13(Wed) 08:30:21
タイトルRe: Web-Patio掲示板について
ID情報: hamel
投稿者: Hamel
URLhttp://drc3.news-site.net/script1

> はじめまして。
> 突然の質問失礼いたします。
>
> 現在、WEB-PATIOのスレ式掲示板を少し改造しているのですが、
> TOPページのスレッドの一覧が表示される部分に、”スレッドを立てた日時”を表示したいのです。
> 最終更新時間は、デフォルトで表示されていますが、”スレッドを立てた日時”が表示できません。
>
> 当方、プログラムの知識に疎く、大変申し訳ございませんがどなたかご教授頂けませんでしょうか。
> よろしくお願いいたします。

patio.cgi内 102行目あたり

# 参照カウンタ
open(NO,"$cf{logdir}/$num.dat");
my $data = <NO>;
close(NO);
my ($cnt) = (split(/:/,$data))[0];


↑の↓に下記を追加

# データ読み込み
open(DAT,"< $cf{logdir}/$num.cgi") or &error("open err: $cf{logdir}/$num.cgi");
my $top = <DAT>;
my $par = <DAT>;
my ($no2,$date) = (split(/<>/, $par))[0,5];


「my $tmp = $loop;」から「print $tmp;」内に下記を追加

$tmp =~ s/!date!/$date/g;


tmpl/bbs.html内57行目あたり

<td>!topic!</td>

↑を↓にようにしてください

<td>!topic! (スレッド投稿日:!date!)</td>

これでいかがでしょうか?


記事No: 14003
投稿日: 2015/05/13(Wed) 11:31:46
タイトルRe^2: Web-Patio掲示板について
ID情報: st_002
投稿者: st
URLhttp://www.alma-web.net/patio/list.cgi

patio.cgi内 102行目あたり
>
> # 参照カウンタ
> open(NO,"$cf{logdir}/$num.dat");
> my $data = <NO>;
> close(NO);
> my ($cnt) = (split(/:/,$data))[0];
>
>
> ↑の↓に下記を追加
>
> # データ読み込み
> open(DAT,"< $cf{logdir}/$num.cgi") or &error("open err: $cf{logdir}/$num.cgi");
> my $top = <DAT>;
> my $par = <DAT>;
> my ($no2,$date) = (split(/<>/, $par))[0,5];
>
>
> 「my $tmp = $loop;」から「print $tmp;」内に下記を追加
>
> $tmp =~ s/!date!/$date/g;
>
>
> tmpl/bbs.html内57行目あたり
>
> <td>!topic!</td>
>
> ↑を↓にようにしてください
>
> <td>!topic! (スレッド投稿日:!date!)</td>
>
> これでいかがでしょうか?

Hamel様
さっそくのご返信ありがとうございます。
ご教授頂いた通りに記述したところ、
無事、表示させる事が出来ました。

お早い返信を頂き、大変感謝しております。
本当にありがとうございます。


記事No: 14004
投稿日: 2015/05/13(Wed) 12:39:59
タイトルRe: Web-Patio掲示板について
ID情報: st_002
投稿者: st
URLhttp://www.alma-web.net/patio/list.cgi

度々申し訳ございません。

もう2点程ご教授頂けませんでしょうか。

・1点目「入力項目を増やしたい」
過去ログに同様の質問はありましたが、返信がないようでした。
http://www.kent-web.com/support/oldlog/0005/0448.html

・2点目「入力内容をスレ一覧部分に表示させたい」
デフォルトで「アイコン」「トピックス名」「作成者」「返信」「参照」「最終更新」が表示されていますが、例えば”URL”もこの一覧表示に加えたいのです。

頼ってばかりではと思い、自力でなんとかしようと思ったのですがとても無理でした。
質問ばかりで大変申し訳ないのですが、どうかよろしくお願いいたします。


記事No: 14005
投稿日: 2015/05/13(Wed) 14:30:57
タイトルRe^2: Web-Patio掲示板について
ID情報: hamel
投稿者: Hamel
URLhttp://drc3.news-site.net/script1

> 度々申し訳ございません。
>
> もう2点程ご教授頂けませんでしょうか。
>
> ・1点目「入力項目を増やしたい」
> 過去ログに同様の質問はありましたが、返信がないようでした。
> http://www.kent-web.com/support/oldlog/0005/0448.html
>
> ・2点目「入力内容をスレ一覧部分に表示させたい」
> デフォルトで「アイコン」「トピックス名」「作成者」「返信」「参照」「最終更新」が表示されていますが、例えば”URL”もこの一覧表示に加えたいのです。
>
> 頼ってばかりではと思い、自力でなんとかしようと思ったのですがとても無理でした。
> 質問ばかりで大変申し訳ないのですが、どうかよろしくお願いいたします。

2点目について・・・

先ほど追加した

# データ読み込み
open(DAT,"< $cf{logdir}/$num.cgi") or &error("open err: $cf{logdir}/$num.cgi");
my $top = <DAT>;
my $par = <DAT>;
my ($no2,$date) = (split(/<>/, $par))[0,5];

↑を↓のように変更

# データ読み込み
open(DAT,"< $cf{logdir}/$num.cgi") or &error("open err: $cf{logdir}/$num.cgi");
my $top = <DAT>;
my $par = <DAT>;
my ($no2,$date,$url) = (split(/<>/, $par))[0,5,8];

その下に下記を追加

$url &&= qq|<a href="$url" target="_blank">参照</a>|;

あとは、
$tmp =~ s/!date!/$date/g; #←の下に
$tmp =~ s/!url!/$url/g; #←を追加

tmpl/bbs.html内

<th colspan="5">スレッド一覧</th>

↑を↓のように変更

<th colspan="6">スレッド一覧</th>

次に、
<td class="td-b">トピックス</td>
の↓に追加
<td class="td-b w2e">参照先</td>

また、
<td>!topic!</td>

↑の↓に下記を追加

<td class="td-c w2e">!url!</td>

以上でよろしいかと思います。


1点目はどのような項目を追加したいのか、具体的に記載されていないと、どなたも、回答出来ないと思います。

また、patio.cgi内だけでも、数多くの修正追加が必要になるだけでなく
regist.cgi並びにadmin.cgiも修正しないといけないくなるので、とてもココに簡単に記載できるようなものではないと思います。


それと、あらたな質問は新しくトピックを立てるというのが、このサポート掲示板の利用規約です。
また、タイトルも「Web-Patio掲示板について 」という大雑把なタイトルではなく、
他の同じような疑問を抱いている方々にもすぐにわかるようなタイトルをつけるべきではないでしょうか?


記事No: 14006
投稿日: 2015/05/13(Wed) 15:38:54
タイトルRe^3: Web-Patio掲示板について
ID情報: st_002
投稿者: st
URLhttp://www.alma-web.net/patio/list.cgi

> > 度々申し訳ございません。
> >
> > もう2点程ご教授頂けませんでしょうか。
> >
> > ・1点目「入力項目を増やしたい」
> > 過去ログに同様の質問はありましたが、返信がないようでした。
> > http://www.kent-web.com/support/oldlog/0005/0448.html
> >
> > ・2点目「入力内容をスレ一覧部分に表示させたい」
> > デフォルトで「アイコン」「トピックス名」「作成者」「返信」「参照」「最終更新」が表示されていますが、例えば”URL”もこの一覧表示に加えたいのです。
> >
> > 頼ってばかりではと思い、自力でなんとかしようと思ったのですがとても無理でした。
> > 質問ばかりで大変申し訳ないのですが、どうかよろしくお願いいたします。
>
> 2点目について・・・
>
> 先ほど追加した
>
> # データ読み込み
> open(DAT,"< $cf{logdir}/$num.cgi") or &error("open err: $cf{logdir}/$num.cgi");
> my $top = <DAT>;
> my $par = <DAT>;
> my ($no2,$date) = (split(/<>/, $par))[0,5];
>
> ↑を↓のように変更
>
> # データ読み込み
> open(DAT,"< $cf{logdir}/$num.cgi") or &error("open err: $cf{logdir}/$num.cgi");
> my $top = <DAT>;
> my $par = <DAT>;
> my ($no2,$date,$url) = (split(/<>/, $par))[0,5,8];
>
> その下に下記を追加
>
> $url &&= qq|<a href="$url" target="_blank">参照</a>|;
>
> あとは、
> $tmp =~ s/!date!/$date/g; #←の下に
> $tmp =~ s/!url!/$url/g; #←を追加
>
> tmpl/bbs.html内
>
> <th colspan="5">スレッド一覧</th>
>
> ↑を↓のように変更
>
> <th colspan="6">スレッド一覧</th>
>
> 次に、
> <td class="td-b">トピックス</td>
> の↓に追加
> <td class="td-b w2e">参照先</td>
>
> また、
> <td>!topic!</td>
>
> ↑の↓に下記を追加
>
> <td class="td-c w2e">!url!</td>
>
> 以上でよろしいかと思います。
>
>
> 1点目はどのような項目を追加したいのか、具体的に記載されていないと、どなたも、回答出来ないと思います。
>
> また、patio.cgi内だけでも、数多くの修正追加が必要になるだけでなく
> regist.cgi並びにadmin.cgiも修正しないといけないくなるので、とてもココに簡単に記載できるようなものではないと思います。
>
>
> それと、あらたな質問は新しくトピックを立てるというのが、このサポート掲示板の利用規約です。
> また、タイトルも「Web-Patio掲示板について 」という大雑把なタイトルではなく、
> 他の同じような疑問を抱いている方々にもすぐにわかるようなタイトルをつけるべきではないでしょうか?

Hamel 様
ご返信ありがとうございます。
無事、表示させる事が出来ました。
とてもわかりやすくご教授頂き本当にありがとうございます。

入力項目を増やすと言うのは、、修正が多く必要なようですね。
こちらはいつかやれるよう勉強をしていきたいと思います。

>新たな質問
仰る通りです。申し訳ございません。
利用規約を見落としておりました。
また、タイトルの件も他の方や、今後のことを考えた配慮が出来ておりませんでした。

今後、繰り返さないよう気を付けます。

ご教授、ご指摘頂きありがとうございました。


[検索ページ] [掲示板]