| 記事No | ： 14017 |
| 投稿日 | ： 2015/05/19(Tue) 12:21:10 |
| タイトル | ： clipmail 自動返信メールについて |
| ID情報 | ： mds5557 |
| 投稿者 | ： 大西 |
| URL | ： http://kdjapan.net/maizurudiving/mailform/mail.html |
はじめまして大西と申します。いろいろと貴社のCGIを使わせて頂いております。教えほしいことがありまして投稿しました。
以前からClip MAIL v1.1を設置していましたが添付が出来なくなってVer: 5.02 (Shift-JIS版)にアップしたところ、自動返信メールの○○様が出来なくなりました。過去ログを見て、
reply.txt
!name!様 を追加
clipmail.cgi 327行目に
$resbody =~ s/!name!/$$in{name}/g;を
$reply =~ s/!name!/$$in{name}/g;に変えて追加しましたが、メールには暗号変換したような英数字が表示されます。
まねごとをしてみましたがうまくいきません。ご教示よろしくお願い致します。
それともう一点、
送信確認画面で必須項目以外(当方では添付ファイルのみ)で未記入(添付無し)の場合は非表示にならないでしょうか??
参考までに設置フォームは http://kdjapan.net/maizurudiving/mailform/mail.html です。
よろしくお願い致します。
| 記事No | ： 14018 |
| 投稿日 | ： 2015/05/19(Tue) 13:57:27 |
| タイトル | ： Re: clipmail 自動返信メールについて |
| ID情報 | ： hamel |
| 投稿者 | ： Hamel |
| URL | ： http://drc3.news-site.net/script1 |
> はじめまして大西と申します。いろいろと貴社のCGIを使わせて頂いております。教えほしいことがありまして投稿しました。
>
> 以前からClip MAIL v1.1を設置していましたが添付が出来なくなってVer: 5.02 (Shift-JIS版)にアップしたところ、自動返信メールの○○様が出来なくなりました。過去ログを見て、
>
> reply.txt
>
> !name!様 を追加
>
> clipmail.cgi 327行目に
>
> $resbody =~ s/!name!/$$in{name}/g;を
> $reply =~ s/!name!/$$in{name}/g;に変えて追加しましたが、メールには暗号変換したような英数字が表示されます。
>
> まねごとをしてみましたがうまくいきません。ご教示よろしくお願い致します。
>
> それともう一点、
>
> 送信確認画面で必須項目以外(当方では添付ファイルのみ)で未記入(添付無し)の場合は非表示にならないでしょうか??
>
> 参考までに設置フォームは http://kdjapan.net/maizurudiving/mailform/mail.html です。
>
> よろしくお願い致します。
質問1.
reply.txtへの変更はそのままで
clipmail.cgi 327行目への追加は削除して下記のように変更する
#-----------------------------------------------------------
# 送信実行
#-----------------------------------------------------------
sub send_mail {
-- 中略 --
452行目あたり
# 返信テンプレ内の変数を置き換え
$reply =~ s/!message!/$mbody/ if ($cf{auto_res});
↑の↓に追加
$reply =~ s/!name!/$$in{name}/ if ($cf{auto_res});
質問２.
#-----------------------------------------------------------
# プレビュー
#-----------------------------------------------------------
sub prev_form {
-- 中略 --
２３４行目あたり
# 画像以外
} else {
$tmp =~ s/!val!/hex_decode($file{$no})/e;
↑の↓に追加
if(!$$in{$key}) {$tmp='';} ## 追加
245行目あたり
$hidden .= qq|<input type="hidden" name="$key" value="$val" />\n|;
↑を↓のように修正
$hidden .= qq|<input type="hidden" name="$key" value="$val" />\n| if($val); ## 修正
255行目
$tmp =~ s/!val!/$$in{$key}/;
↑の↓に追加
if(!$$in{$key}) {$tmp='';} ## 追加
#-----------------------------------------------------------
# 入力エラー表示
#-----------------------------------------------------------
sub err_input {
-- 中略 --
665行目あたり
# 添付時はファイル名
my $fname = $cgi->param_filename("clip-$1");
if ($fname =~ /([^\\\/:]+)\.([^\\\/:\.]+)$/) { $$in{$key} = "$1.$2"; }
} elsif(defined($cf{replace}->{$key})) {
$key_name = $cf{replace}->{$key};
}
$tmp =~ s/!key!/$key_name/;
↑の↓に追加
if(!$$in{$key}) {$tmp='';} ## 追加
687行目あたり
# 添付以外のとき改行復元
if ($key !~ /^clip-\d+$/i) { $$in{$key} =~ s|\t|<br />|g; }
$tmp =~ s/!val!/$$in{$key}/;
↑の↓に追加
if(!$$in{$key}) {$tmp='';} ## 追加
以上でいかがでしょうか？
| 記事No | ： 14019 |
| 投稿日 | ： 2015/05/19(Tue) 15:47:31 |
| タイトル | ： Re^2: clipmail 自動返信メールについて |
| ID情報 | ： mds5557 |
| 投稿者 | ： 大西 |
| URL | ： http://kdjapan.net/maizurudiving/mailform/mail.html |
早速のご教示ありがとうございました。思う通りうまくできました。今後ともよろしくお願いいたします。