| 記事No | ： 15365 |
| 投稿日 | ： 2017/02/03(Fri) 14:09:22 |
| タイトル | ： 【postmail】送信先アドレスをプルダウンによって変更 |
| ID情報 | ： fusion55 |
| 投稿者 | ： fusion |
| URL | ： http://www.d-switch.net/test/k-net/ |
postmail v8.02を使用しております。
http://www.d-switch.net/test/k-net/
フォーム内容は上記ページのような感じでして、
プルダウンで選択した「お問い合せ先」ごとに
送信先（メールアドレス）を変更したいと考えております。
CGIに関してはまったくの素人で、
どこをカスタマイズすればよいか全くわかりません。
どなたかご教授いただければ幸いです。
よろしくお願い致します。
| 記事No | ： 15367 |
| 投稿日 | ： 2017/02/03(Fri) 22:18:02 |
| タイトル | ： Re: 【postmail】送信先アドレスをプルダウンによって変更 |
| ID情報 | ： fusion55 |
| 投稿者 | ： fusion |
| URL | ： http://www.d-switch.net/test/k-net/ |
> postmail v8.02を使用しております。
>
> http://www.d-switch.net/test/k-net/
>
> フォーム内容は上記ページのような感じでして、
> プルダウンで選択した「お問い合せ先」ごとに
> 送信先（メールアドレス）を変更したいと考えております。
>
> CGIに関してはまったくの素人で、
> どこをカスタマイズすればよいか全くわかりません。
>
> どなたかご教授いただければ幸いです。
> よろしくお願い致します。
| 記事No | ： 15368 |
| 投稿日 | ： 2017/02/03(Fri) 22:23:33 |
| タイトル | ： 【postmail】送信先アドレスをプルダウンによって変更 |
| ID情報 | ： fusion55 |
| 投稿者 | ： fusion |
| URL | ： http://www.d-switch.net/test/k-net/ |
追記になります。
下記のようなサイトを見つけました。
http://okwave.jp/qa/q3340917.html
やりたい事はまさにこれなのですが、
postmailのバージョンが違っているためか、
同じような設定をやってみても動きませんでした。
どうぞよろしくお願いいたします。
| 記事No | ： 15370 |
| 投稿日 | ： 2017/02/05(Sun) 16:48:17 |
| タイトル | ： Re: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
postmail.cgi のメール送信直前で処理する場合です。
my $email = $$in{email} eq '' ? $cf{mailto} : $$in{email};
の前あたりで
my %mailto = ('横浜市'=>'***@***','川崎市'=>'***@***','藤沢市'=>'***@***');
のようにエリアごとの送信先をハッシュ%mailtoに保存しておきます。
そして
$cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) }
で$cf{mailto}をエリアごとのメールアドレスに置き換えます。
| 記事No | ： 15371 |
| 投稿日 | ： 2017/02/06(Mon) 12:44:23 |
| タイトル | ： Re^2: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： fusion55 |
| 投稿者 | ： fusion |
| URL | ： http://www.d-switch.net/test/k-net/ |
hirayama様
ご親切にご回答いただきましてありがとうございました。
いただいた情報を元に、勉強しながらやってみます。
どうしても分からないようでしたらまた教えて下さい。
よろしくお願い致します。
| 記事No | ： 15372 |
| 投稿日 | ： 2017/02/06(Mon) 21:26:04 |
| タイトル | ： Re^3: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
すみません
$cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) }
は末尾の;が抜けていました。
$cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) };
に変更してください。
簡単に補足しておきます。
my %mailto = ('横浜市'=>'***@***','川崎市'=>'***@***','藤沢市'=>'***@***');
の行は、
$mailto{'横浜市'} = '***@***';
$mailto{'川崎市'} = '***@***';
$mailto{'藤沢市'} = '***@***';
のように指定したのと同じです。
このハッシュのキーとなっている市の名前は
$$in{'エリア'}で返るはずなので、
$mailto{$$in{'エリア'}}としたいところですが、
postmail の場合、メール送信前の確認画面で$$in{'エリア'}の値は hex_encode されたうえ送信されるので、
hex_decode で元の値に戻してからハッシュ%mailtoのキーとして使用しています。
$cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) };
| 記事No | ： 15742 |
| 投稿日 | ： 2018/01/17(Wed) 21:53:17 |
| タイトル | ： Re^4: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： decoy421 |
| 投稿者 | ： decoy |
横から失礼いたします。
こちら参考にさせていただき、試してみたのですが
syntax error at /ooo/ooo/ooo/cgi-bin/postmail.cgi line 321, near "};"
Execution of /ooo/ooo/ooo/cgi-bin/postmail.cgi aborted due to compilation errors.
このようなエラーが出て動きませんでした。。
こちらどこを直せばいいかご教示いただくことは可能でしょうか？
下記のようにしております。
# メールアドレスがない場合は送信先に置き換え
my %mailto = ('1'=>'ooo@ooo.co.jp','2'=>'xxx@xxx.co.jp','3'=>'ccc@ccc.co.jp');
my $email = $$in{email} eq '' ? $cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) };
| 記事No | ： 15743 |
| 投稿日 | ： 2018/01/18(Thu) 00:58:20 |
| タイトル | ： Re^5: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
自分で改造した場合は基本的に自己責任ということになります。
>このようなエラーが出て動きませんでした。。
>こちらどこを直せばいいかご教示いただくことは可能でしょうか？
どこをどのように改造されているのかわからないので、ちょっと難しいですが、
少なくとも
my $email = $$in{email} eq '' ? $cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) };
は
my $email = $$in{email} eq '' ? $cf{mailto} : $mailto{ hex_decode($$in{'エリア'}) };
とでもしないとsyntax errorになると思います。
| 記事No | ： 15744 |
| 投稿日 | ： 2018/01/18(Thu) 11:50:25 |
| タイトル | ： Re^6: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： decoy421 |
| 投稿者 | ： decoy |
早速のご返信ありがとうございます！
改造した箇所は No.15370 でご教示いただいている下記のみです。
> my $email = $$in{email} eq '' ? $cf{mailto} : $$in{email};
>
> の前あたりで
> my %mailto = ('横浜市'=>'***@***','川崎市'=>'***@***','藤沢市'=>'***@***');
> のようにエリアごとの送信先をハッシュ%mailtoに保存しておきます。
> そして
>
> $cf{mailto} = $mailto{ hex_decode($$in{'エリア'}) }
>
> で$cf{mailto}をエリアごとのメールアドレスに置き換えます。
> my $email = $$in{email} eq '' ? $cf{mailto} : $mailto{ hex_decode($$in{'エリア'}) };
ご教示いただいたこちらに変更したらsyntax errorは出なくなりました！
ありがとうございます。
ただ、送信されるメールアドレスではなくてお客様に届く自動返信メールの受信先が選択したメールアドレスになってしまって。。
挙動が逆というか。。
説明が下手くそで申し訳ございません。
もしお分かりになればアドバイスいただけると大変助かります。
| 記事No | ： 15745 |
| 投稿日 | ： 2018/01/18(Thu) 12:32:43 |
| タイトル | ： Re^7: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
| URL | ： http://shade-search.com/sts/term/term.php |
まず何をしたいのかということがわからないので、
これ以上はなんともいえません。
別スレッドをたてて、設置URLやどのようなフォームを使っているのかも
説明してください。
| 記事No | ： 15746 |
| 投稿日 | ： 2018/01/18(Thu) 14:00:58 |
| タイトル | ： Re^8: 【postmail】送信先アドレスをプルダウンに |
| ID情報 | ： decoy421 |
| 投稿者 | ： decoy |
> まず何をしたいのかということがわからないので、
> これ以上はなんともいえません。
>
> 別スレッドをたてて、設置URLやどのようなフォームを使っているのかも
> 説明してください。
すみません！ありがとうございます。
別でスレッドたててみます！