メール送信ＣＧＩの改造

タック [E-Mail] 2000/02/05(土) 13:52:24
perlもまったくわからない者ですが、メール送信ＣＧＩを改造してフォームに入力したアドレス宛を追加したいのですがどうしたらいいでしょうか。
現在（　$mailto = 'abc@abc.ne.jp';　）これに
フォームのテキストボックスに入力したもうひとつのメールアドレス宛てにも送信したいのです。

ジェリー [E-Mail] [HomePage] 2000/02/05(土) 16:02:39
こんにちわ。

■ 現在
$mailto = 'abc@abc.ne.jp';

■ 修正後
$mailto = 'abc@abc.ne.jp,***@xxx.ne.jp';

■ 修正点
メールアドレスとメールアドレスの間に","をつけてください。

以上
がんばってくださいね。

タック [E-Mail] 2000/02/05(土) 16:10:16
ジェリーさんありがとうございます。
補足ですが、ＣＧＩ実行を組み込んだhtmlのページのname=emailadressのテキストボックスの値を***@xxx.ne.jpにあてたいのですが。

ジェリー [E-Mail] [HomePage] 2000/02/05(土) 17:06:59
うーん。
ちょっと良くわからないのですが、もう少し詳しく説明していただけますか?
よろしくお願いいたします。

# ちなみに、メールを送る関係であれば先ほどのもので可能です。

タック 2000/02/05(土) 17:15:01
お言葉に甘えて説明を追加させていただきます。
【html】のページ（申込書のようなページ）
名前
住所
電話
メール(emailadress)
【ＣＧＩ】
$mailto = 'abc@abc.ne.jp';
このabc@abc.ne.jpに加えて、htmlのページのメールアドレスにも送信したいのです。

ジェリー [E-Mail] [HomePage] 2000/02/05(土) 17:34:40
なるほど
注文ページですね。
それならば
HTMLの方のメール入力フォームのname=をmailにして、
$mailto = 'abc@abc.ne.jp,$FORM{'mail'}';
にすればいいと思いますが、
$で使えたかな・・・（＾＾；

では。

ジェリー [E-Mail] [HomePage] 2000/02/05(土) 17:36:41
あっそうだ、シングルだと使えないんだった（＾＾；
CGIスクリプト自体のソースを.txtにして、アップしてもらえれば改造しますが、どうでしょう?

では。

びぎな++ 2000/02/05(土) 17:37:07
メール送信してくれた人へ返信したいということですか？
１４３行目あたり，

# メールヘッダを作成する
#
{
        &jcode'convert(*subject, "jis");
        $mailhead  = "To: $mailto\n";
        if ($FORM{'EMAIL'} ne "(unknown)") {
                $mailhead .= "Cc: $FORM{'EMAIL'}\n";
        }
        $mailhead .= "From: $FORM{'EMAIL'}\n";
        $mailhead .= "Subject: $subject\n";
        $mailhead .= "\n";
}

を

&jcode'convert(*subject, "jis");
$mailhead  = "To: $mailto, $FORM{'EMAIL'}";　　#←ここ
if ($FORM{'EMAIL'} ne "(unknown)") {

とすれば，できますよ。

#ジェリーさんへ
#余計なことかもしれませんけど，
#ジェリーさんのＨＰで<frameset>タグとかの順番があやしいですよ。
#Netscapeではみれませんでした。

びぎな++ 2000/02/05(土) 17:38:54
ぐずぐずしてたら，先こされた・・・(^^;

ジェリー [E-Mail] [HomePage] 2000/02/05(土) 17:38:58
あっそうですか。
もう一度、とほほさんのページ見て見ます。
ご指摘ありがとうございました。

タック 2000/02/05(土) 18:20:20
[[解決]]
皆様、レスありがとうございます。参考にして挑戦してみます。

[上に] [前に] [次に]