| ■10329 / inTopicNo.5) |
Re[2]: sendmailの設定。
|
□投稿者/ あじのひらき -(2004/12/25(Sat) 03:32:02)
| ゆさま、ありがとうございます。
> Rocket3の掲示板の
> http://rocket3.net/data/supp/CGI_SUPP/CGI_BBS/wforum.cgi?mode=allread&no=1874&page=0
> を参考に書き換えて見て下さい。
ermgr.cgiの最後の方に該当と思われる箇所があったのですが
&jcode'convert(*id,'jis');
&jcode'convert(*mails,'jis');
if($SeMail =~ /^\,|^ /){$SeMail=substr($SeMail,1);}
if($SeMail){
if (open(MAIL,"| $s_mail $SeMail")) {
print MAIL "X-Mailer: MultiVote MAILER\n";
print MAIL 'To: ring@user\n';
print MAIL "From: $imail\n";
print MAIL "Subject: $id\n";
print MAIL "MIME-Version: 1.0\n";
print MAIL "Content-type: text/plain; charset=ISO-2022-JP\n";
print MAIL "Content-Transfer-Encoding: 7bit\n";
print MAIL "\n\n";
print MAIL "$mails\n";
close(MAIL);
}
}
の部分をすべてコメントアウト（#）して、そこに
use Win32::OLE;
$oBasp = Win32::OLE->new('basp21');
$oBasp->SendMail("mail.rocket3.net","$mail_to","$from_mail","$タイトル","$本文","");
を追記することでよろしいのでしょうか？
＄mailなどのどの文が何を代入しているのかすらわらない知識でカスタマイズなど、ご迷惑をおかけして大変もうしわけございません。
ご迷惑とお手数をおかけしますが、何卒よろしくお願いします。
|
|
