条件分岐のプログラムの書き換え場所

タカシマさん (2011-07-05 17:58:05) www.daika-net.com/inq/inquiry.html

和田様、こんにちは。

以前「エラーテキストが出るタイミングをカスタマイズ」で質問させていただいたものです。
おかげさまで無事サイトの方もアップできました。ありがとうございます。

ところで私もラジオボタンの選択でメールの受信先を選べtるようにしたいと思っています。
詳細な説明は無理だと思うのですが、ちょっとだけヒントをいただけないでしょうか。

書き換えが必要な箇所は「functions.cgi」のファイルの「getpost」のところ、下記の行じゃないかとにらんでいます。いかがでしょうか?
       
## email
$form{’email’} =~ s/ //ig;
##

それとも新たに追記する必要があるのか…。

甘えた質問ですが、良かったらご回答をよろしくお願い致します!

条件分岐のプログラムのエレメンツ間違い?

タカシマさん (2011-07-05 18:46:46) www.daika-net.com/inq/inquiry.html

すみません、たびたび。

先ほどの質問で挙げた場所は間違ってますね。

現在下記のように追記をするとfff@fffにメールがとんできてしまうので、
ifのあとのかっこの中が間違っているのだろうなあと想像しています。
がんばります!

if($form{’email’} eq ’仮設(建築)’){
@mailto = ’aaa@aaa;
}elsif($form{’email’} eq ’仮設(住宅・流通・催事)’){
@mailto = ’bbb@bbb;
}elsif($form{’email’} eq ’繊土’){
@mailto = ’ccc@ccc;
}elsif($form{’email’} eq ’スポーツ’){
@mailto = ’ddd@ddd;
}elsif($form{’email’} eq ’海洋’){
@mailto = ’eee@eee;
}else{ #AでもBでもない→つまり(ここでは)C
@mailto = ’fff@fff;

Re:条件分岐のプログラムのエレメンツ間違い

和田 (2011-07-10 22:45:23) www.synck.com

はい。間違ってます。
さすがにPerlを教える事になるのでこれ以上はサポートできませんが、ヒントとしてはemail関係ないってことでしょうか。例えばエレメント名が「問い合わせ先」の場合、
$form{’問い合わせ先’} がその分岐対象となります。emailはお客さんが入力するemailですね。