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

記事No： 551
投稿日： 2007/05/14(Mon) 18:29:06
タイトル： Joyful NoteへのID表示
ID情報： aqua2
投稿者： AQUA
URL： http://aqua.e-catch.com/members/index.cgi

http://aqua.e-catch.com/members/index.cgi

Joyful Note v1.6を利用しているのですが、BASIC認証を付けて認証IDを掲示板書き込み時に強制的に入力させ、記事の横に表示させる方法で現在悩んでいます。

書き込みのさいには
<input type=text name=id size=28 value="$ENV{REMOTE_USER}" readonly>
を使用することによってフォームに強制的にIDを表示させることが出来るというところまでは来たのですが、そこから先ログへの書き込みなどで躓いています。

このサポートフォーラムのような感じで表示させるようにするにはどのようにすればいいのでしょうか？
何方かサポートお願い致します。

記事No： 554
投稿日： 2007/05/14(Mon) 21:22:46
タイトル： Re: Joyful NoteへのID表示
ID情報： tems
投稿者： BAL
URL： http://f43.aaa.livedoor.jp/~sumure/

> http://aqua.e-catch.com/members/index.cgi
>
> Joyful Note v1.6を利用しているのですが、BASIC認証を付けて認証IDを掲示板書き込み時に強制的に入力させ、記事の横に表示させる方法で現在悩んでいます。
>
> 書き込みのさいには
> <input type=text name=id size=28 value="$ENV{REMOTE_USER}" readonly>
> を使用することによってフォームに強制的にIDを表示させることが出来るというところまでは来たのですが、そこから先ログへの書き込みなどで躓いています。
>
> このサポートフォーラムのような感じで表示させるようにするにはどのようにすればいいのでしょうか？
> 何方かサポートお願い致します。


ID情報を新たにログファイルに記録させるのは修正箇所が多くて面倒ですので簡単な方法を。
ログを記録する際に名前の部分にIDも一緒に記録します。従ってIDは名前の横に表示されます。
v1.6は古いのでv2.72での説明になります。

regist.cgi
#-------------------------------------------------
# 投稿記事受付
#-------------------------------------------------

-- 途中省略 --

# クッキーを発行
&set_cookie($in{'name'},$in{'email'},$in{'url'},$in{'pwd'},$in{'icon'},$in{'color'});
$id = $ENV{'REMOTE_USER'}; ## ←追加
$in{'name'} = "$in{'name'} ID:$id"; ## ←追加
# ログを開く

記事No： 557
投稿日： 2007/05/15(Tue) 11:10:03
タイトル： Re^2: Joyful NoteへのID表示
ID情報： aqua2
投稿者： AQUA
URL： http://aqua.e-catch.com/members/index.cgi

BALさん

有り難う御座いました。
無事改良に成功しました。

WebPatioの場合も同様なのでしょうか？
http://aqua.e-catch.com/member4/index.cgi

記事No： 561
投稿日： 2007/05/15(Tue) 19:10:55
タイトル： WebPatioの記事にログインIDを表示
ID情報： tems
投稿者： BAL
URL： http://f43.aaa.livedoor.jp/~sumure/

> BALさん
>
> 有り難う御座いました。
> 無事改良に成功しました。
>
> WebPatioの場合も同様なのでしょうか？
> http://aqua.e-catch.com/member4/index.cgi

●WebPatioに付属の認証IDを表示する場合
read.cgi
#-------------------------------------------------
# スレッド閲覧
#-------------------------------------------------

-- 途中省略 --

<dt>日時： $dat
<dt>名前： <b>$nam</b>
EOM

if ($eml && $mvw ne '0') {
print "&nbsp; &lt;<a href=\"mailto:$eml\" class=\"num\">$eml</a>&gt;\n";
}
print "<dt>ID：$myid\n"; ## ←追加
if ($url) {
print "<dt>参照： <a href=\"$url\" target=\"_blank\">$url</a>\n";
}

-- 途中省略 --

print "<dl><dt>日時： $dat<dt>名前： <b>$nam</b>";

if ($eml && $mvw ne '0') {
print "&nbsp; &lt;<a href=\"mailto:$eml\" class=\"num\">$eml</a>&gt;";
}
print "<dt>ID：$myid\n"; ## ←追加
if ($url) {
print "<dt>参照： <a href=\"$url\" target=\"_blank\">$url</a>\n";
}


#-------------------------------------------------
# 個別記事閲覧
#-------------------------------------------------

-- 途中省略 --

print "<dl><dt>日時： $dat<dt>名前： <b>$nam</b>";

if ($eml && $mvw ne '0') {
print "&nbsp; &lt;<a href=\"mailto:$eml\" class=\"num\">$eml</a>&gt;\n";
}
print "<dt>ID：$myid\n"; ## ←追加
if ($url) {
print "<dt>参照： <a href=\"$url\" target=\"_blank\">$url</a>\n";
}


●ベーシック認証のIDを表示する場合は以下の修正も必要です。

regist.cgi
#-------------------------------------------------
# 記事投稿処理
#-------------------------------------------------
sub regist {
local($sub,$key,$flg,$i,@top);
$my_id = $ENV{'REMOTE_USER'}; ## ←追加
# 権限チェック

[検索ページ]