CGIを使ったメールフォームで送信先を選択させることはできますか？

メールフォームにCGIを使用していて固定のアドレスには
送信できますが、送信先をプルダウンなどで選択してもらって
そのアドレスにのみ送信させることは可能でしょうか？

当方ド素人です。
以上、宜しくお願い致します。

No.1 回答者： NNori 回答日時： 2006/11/15 23:51

できますよ。

送信先を選択式にするだけです。
<select name="To">
<option value="[e-mail]" selected>Aさん
<option value="[e-mail]">Bさん
<option value="[e-mail]">Cさん
<option value="[e-mail]">Dさん
</select>

この回答へのお礼

素早い回答有難うございます。
早速試してみます。

お礼日時：2006/11/16 01:18

No.2 回答者： galluda 回答日時： 2006/11/16 00:43

がると申します。

可能である、という点については、#1さんのとおりなのですが。
#1さんのコードをそのまま使ってしまうと、簡単にクラックが出来てしまいますのでご注意を。

valueにはメールアドレスは絶対にいれず、例えば番号とかだけにして。
設定ファイルとかをつかって、メールアドレスを解決する、というほうが、安全だと思います。

一応念のため。

この回答へのお礼

ご助言ありがとうございます。

お恥ずかしながら、CGIは全くの初心者のため設定ファイルの書き方？も全くわかりません。perl自体を書いた経験がないため、現状はKentWebのpostmail.cgiを使用して送信先を選択したいのですが、可能なのでしょうか？
どこかの掲示板から拾ってきた下記のソースをKentWebのpostmail.cgiに
書き足してみたのですが、フォーム上で0,1.2どれを選択してもアドレス1に届いてしまいます。根本的に定義できていない様です。ご助言お願い致します。

$soshinsaki = $form{'soshinsaki'};
if ( $soshinsaki == 0)
{
$mailto = 'アドレス1';
}
elsif ( $soshinsaki == 1)
{
$mailto = 'アドレス2';
}
else
{
$mailto = 'アドレス3';
}

お礼日時：2006/11/16 02:10

No.3 回答者： galluda 回答日時： 2006/11/16 03:34

がるです。

んっと…記述されているコードでNGだとすると、恐らく
$soshinsaki = $form{'soshinsaki'};
のところで、値が取れてないのだと思います。
とりあえず
$soshinsaki = $form{'soshinsaki'};
の次に
print $form{'soshinsaki'} . "\n";
と入れてみてください。これで、値が取れているかどうかがすぐに判断できるかと思うので。

この回答へのお礼

がるさんありがとうございます。

今使ってるCGIはテンプレートファイルから入力された項目の確認画面htmlが表示するようになっているのですが、その画面ではsoshinsakiに数値の1や2がはいっています。これで値が取れていると判断できますか？print $form{'soshinsaki'} . "\n";を入力してみたのですが、動作は以前の￥と同様になっております。

お礼日時：2006/11/16 12:34