|
| カレッヂ |
|
質問者 SAYOKO
投稿日 7/21(土) 12:54:51
ショッピングバスケットプロv6.02で、送信される注文書の内容に注文者のメールアドレスを 入れたいのですが、どなたか教えて頂けないでしょうか!? テキスト本を見ながらにcart.cgiファイルの必要箇所と思われる部分までは辿り着きました。 注文者にアドレスの入力をさせる部分に <input type=text name="_email" size=40>とあるので、入力されたアドレスの名前が "_email"だと言う事と、それから先で、�｜輅現颪魎浜�者に、��注文書の写しを発注者に、 それぞれメールで送信しますが、メールを作成して送信する部分で�，浪宍�……!? （間違っているのかも知れないのですが……）と思っているのですけれど、 この部分だとして、何処にどう"_email"を追加させたらいいのかが判りません。 どなたか是非に教えて頂きたいのですが、宜しくお願い致します。 1 if (!open(OUT,"｜ $sendmail -t")) { &error("異常停止" ,$1); } 2 3 print OUT &jis("X-AGENT: $HTTP_USER_AGENT\n"); 4 print OUT "From: $mailto_order\n"; 5 print OUT "To: $mailto_order\n"; 6 print OUT "Reply-To: $in{'_email'}\n"; 7 print OUT &jis("Subject: [$date_num] $mail_subject\n"); 8 print OUT "Content-Transfer-Encoding: 7bit\n"; 9 print OUT "Content-Type: text/plain; charset=iso-2022-jp\n\n"; 10 11 print OUT "\n"; 12 foreach (@in) { 13 14 s/"/"/g; 15 s/&/&/g; 16 s/</</g; 17 s/>/>/g; 18 19 if (/^\.\t(.*)/) { print OUT &jis("$1\n"); } 20 elsif (/(.*)\t(.*)/) { print OUT &jis("[$1]\n$2\n\n"); } 21 } 22 print OUT "\n"; 23 24 print OUT &jis("$sign\n"); 25 close(OUT); 26 27 sleep(1); |
|
質問者 SAYOKO
[削除]
投稿日 7/21(土) 17:03:21
自己解答 その1 素人解答なので、参考になるのかは謎ですが、 cart.cgiの中のオーダー処理部分の中央「sleep(1);」の上の辺りに ��print OUT "$in{'_email'}\n";を入れてみたら成功しました。 それに欲を出して、その上に ��print OUT &jis("発注者のメールアドレス\n\n")としたら、 エラーでcart.cgiが呼び出せなくなり、 �△硫爾� ��print OUT "\n";としても駄目でした。 この�，諒�法で表示可能になった申込み者のメールアドレスの上に ［発注者のメールアドレス］無理なら［］無しという記述を表示させるには どうすればいいのでしょうか!? ご理解出来る方、是非に是非に御指導下さぁ〜いm(_ _)v。 |
|
質問者 SAYOKO
[削除]
投稿日 7/23(月) 13:30:27
自己回答 その2 注文書メールに顧客のアドレスを追加する方法のまとめ 注文書に顧客アドレスを追加するには cart.cgi「オーダー処理」の中央あたり ※私の場合は、setup.cgiの4sign=<<'EOF';で記述したサインの上に表示されるように しています。 print OUT "\n"; print OUT &jis("発注者のメールアドレス: ").$in{'_email'}."\n"; ←これ print OUT &jis("$sign\n"); close(OUT); sleep(1); 上記「←これ」部分を追加して私の希望が叶いました。 Perlの質問の場所で、yaku shimaさんから御指導を頂きました。 ありがとうございましたm(_ _)v。 |
返信(回答)する
| Ｗｅｂ裏技 |