Ｐａｇｅ 6 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼旧BBS参考６ ユー 02/7/25(木) 13:16 ─────────────────────────────────────── ■題名 ： 旧BBS参考６ ■名前 ： ユー ■日付 ： 02/7/25(木) 13:16 -------------------------------------------------------------------------
| Ｑ FFA（改）Ver1.105でメッセージ返信機能を組み込ませて頂きましたが、 うまく作動しません Ａ Ver1.105はＩＤが暗号化されているためそのままではうまく動きません。 なお、 1.104の改造方法と照らし合わせながら見てください。 赤字の部分はVer.1.104と異なる部分です。 青字の部分はさらに追加したものです。 ただし、普通にメッセージを送る時に相手のＩＤが暗号化されるのにたいして、 返信機能をもちいて、メッセージを送る時に相手のＩＤは暗号化されていませんので、 青字部分が追加されています。 （message.cgiを見てみれば解ると思いますが・・・） （タグの関係上コピペしても、エラーがでます） -------------------------------------------------------------- 【届いているメッセージ】表\示数<b>$max_gyo</b>件まで<br> EOM open(IN,"$message_file"); @MESSAGE_LOG = <IN>; close(IN); my $angou_kid = crypt("$kid","$ch_id_messe"); $hit=0;$i=1; foreach(@MESSAGE_LOG){ ($pid,$hid,$hname,$hmessage,$hhname,$htime) = split(/<>/); if($angou_kid eq "$pid"){ }elsif($kid eq "$pid"){ if($max_gyo < $i) { last; } print "<hr size=0><a href=\"./hens.cgi?mode=messe&id=$kid&pass=$kpass&hnid=$hid\" target\=\"_blank\"><b>$hnameさん</b></A><font color=red><small> ＞ 「<b>$hmessage</b>」($htime)</small></b></font><br>\n"; $hit=1;$i++; }elsif($kid eq "$hid"){ print "<hr size=0><small>$knameさんから$hhnameさんへ ＞ 「$hmessage」($htime)</small><br>\n"; } } if(!$hit){ print "<hr size=0>$knameさん宛てのメッセージはありません<p>\n"; } print "<hr size=0><p>"; -------------------------------------------------------------- |