#!/usr/local/bin/perl require './jcode.pl'; use CGI qw(param, uploadInfo); $mode = param('mode'); $ONAMAE = param('ONAMAE'); $TEL1 = param('TEL1'); $TEL2 = param('TEL2'); $TEL3 = param('TEL3'); $FAX1 = param('FAX1'); $FAX2 = param('FAX2'); $FAX3 = param('FAX3'); $EMAIL1 = param('EMAIL1'); $EMAIL2 = param('EMAIL2'); $REM = param('REM'); #■SENDMAILの設定 $sendmail = '/usr/lib/sendmail'; #■受信先メールアドレス $mailto ='support@shintani-1.co.jp'; if($mode eq 'ok'){ok();} if($mode eq 'mail'){mail();} sub add{ print <<_HTML_; Content-type: text/html\n\n 空測撮影　シンタニ製グラス製品製造販売 株式会社シンタニ
■お問い合わせ
◆当社の営業日（火曜〜日曜　※定休日を除く）外のメールは、翌営業日以降の対応となります。
お問合せの内容によっては、お返事までにお時間をいただく場合があります。

＊お電話でのお問い合わせはAM10:00~6:30までとさせて頂きます。

■は必ずご記入ください。
■お名前
_HTML_ if($er2==1){print qq(お名前を記入してください！);} print <<_HTML_;
■電話番号
- - _HTML_ if($er5==1){print qq(市外局番を半角数字で記入してください。);} if($er6==1){print qq(市外局番を記入してください。);} if($er7==1){print qq(局番を半角数字で記入してください。);} if($er8==1){print qq(局番を記入してください。);} if($er9==1){print qq(番号を半角数字で記入してください。);} if($er10==1){print qq(番号を記入してください。);} print <<_HTML_;
■FAX番号
- -
■メールアドレス


▼確認のため、もう一度入力してください。
_HTML_ if($er11==1){print qq(メールアドレスでは、使用できない文字があります。);} if($er12==1){print qq(メールアドレスの形式で記入してください。);} if($er13==1){print qq(メールアドレスを記入してください。);} if($er14==1){print qq(確認用のメールアドレスが違います。);} print <<_HTML_;
■お問い合わせ内容


◆携帯電話へのお返事は、文字数等の制限により質問に対し十\分なお答が出来ない場合があります。
◆お問い合わせの内容によっては、メールではなく、対応スタッフより直接お電話にてお返事を差し上げる場合があります。
◆弊社からの回答文面の全部または一部を引用もしくは転用・転載されることはご遠慮ください。



株式会社　シンタニ
〒067-0032 北海道江別市元江別872-2　
ＴＥＬ ： 011-384-9387 / ＦＡＸ ： 011-389-3133・ mail： support@shintani-1.co.jp
お問い合わせはお気軽にお問い合わせフォームよりご連絡ください。

業務内容：空測撮影　シンタニ製グラス製品製造販売
このページのトップへ-トップページ        会社概要-RCヘリによる空撮-保有機材-業務履歴-空撮サンプル写真-リンク

※当サイトに掲載された写真・記事を許可なく転載することを禁じます。
(C) 2010 shintani co. ltd.
_HTML_ exit; } sub mail{ $REM =~ s/
/\n/g; $REM =~ s/\r//g; if (!open(OUT,"| $sendmail -t")) { &error('システム異常','申し訳ありませんが何らかの原因で処理できません.'); } print OUT "X-HTTP-REFERER: $ref\n"; print OUT "Errors-To: $mailto\n"; print OUT "To: $mailto\n"; print OUT "From: $EMAIL1\n"; &jis("Subject: $ONAMAE様よりお問い合わせ"); print OUT "$msg\n"; print OUT "Content-Transfer-Encoding: 7bit\n"; print OUT "Content-Type: text/plain\n"; &jis("---------------------------------------"); print OUT "$msg\n"; &jis("お名前：$ONAMAE"); print OUT "$msg\n"; &jis("電話番号：$TEL1-$TEL2-$TEL3"); print OUT "$msg\n"; &jis("FAX番号：$FAX1-$FAX2-$FAX3"); print OUT "$msg\n"; &jis("メールアドレス：\n$EMAIL1"); print OUT "$msg\n"; &jis("---------------------------------------"); print OUT "$msg\n"; &jis("お問い合わせ内容：$REM"); print OUT "$msg\n"; $host = $ENV{'REMOTE_HOST'}; $addr = $ENV{'REMOTE_ADDR'}; if ($host eq $addr) { $host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $addr; } close(OUT); if (!open(OUT,"| $sendmail -t")) { &error('システム異常','申し訳ありませんが何らかの原因で処理できません.'); } print OUT "X-HTTP-REFERER: $ref\n"; print OUT "Errors-To: $mailto\n"; print OUT "To: $EMAIL1\n"; print OUT "From: $mailto\n"; &jis("Subject: $ONAMAE様、お問い合わせありがとうございます。"); print OUT "$msg\n"; print OUT "Content-Transfer-Encoding: 7bit\n"; print OUT "Content-Type: text/plain\n"; &jis("このたびは、株式会社シンタニに"); print OUT "$msg\n"; &jis("お問い合わせいただき、誠にありがとうございます。"); print OUT "$msg\n\n"; &jis(""); print OUT "$msg\n"; &jis("＊このEメールアドレスは配信専用ですので、メッセージを返信しない様お願い致します"); print OUT "$msg\n"; &jis(""); print OUT "$msg\n"; &jis("--- お問い合わせ内容をご確認ください。 ---"); print OUT "$msg\n\n"; &jis("---------------------------------------"); print OUT "$msg\n"; &jis("お名前：$ONAMAE"); print OUT "$msg\n"; &jis("電話番号：$TEL1-$TEL2-$TEL3"); print OUT "$msg\n"; &jis("FAX番号：$FAX1-$FAX2-$FAX3"); print OUT "$msg\n"; &jis("メールアドレス：\n$EMAIL1"); print OUT "$msg\n"; &jis("---------------------------------------"); print OUT "$msg\n"; &jis("お問い合わせ内容：$REM"); print OUT "$msg\n"; &jis("---------------------------------------"); print OUT "$msg\n"; &jis("＜お問い合わせ先＞"); print OUT "$msg\n"; &jis("株式会社シンタニ"); print OUT "$msg\n"; &jis("北海道江別市元江別872-12"); print OUT "$msg\n"; &jis("TEL:011-384-9387 /FAX:011-389-3133"); print OUT "$msg\n"; &jis("E-mail"); print OUT "$msg\n"; &jis("$mailto"); print OUT "$msg\n"; $host = $ENV{'REMOTE_HOST'}; $addr = $ENV{'REMOTE_ADDR'}; if ($host eq $addr) { $host = gethostbyaddr(pack('C4',split(/\./,$host)),2) || $addr; } close(OUT); print <<_HTML_; Content-type: text/html\n\n 空測撮影　シンタニ製グラス製品製造販売 株式会社シンタニ
■お問い合わせありがとうございます。

$ONAMAE様、お問い合わせいただきありがとうございます。
$EMAIL1に確認のメールが自動で送信されていますので、ご確認ください。
確認メールが送信されていない場合は、再度、メールアドレス等をご確認の上、送信してください。
お問合せには、迅速に対応させていただきますが、
内容によっては、お応えに時間がかかる場合がありますので、予\めご了承ください。

お電話でのお問い合わせは、ＴＥＬ：011-384-9387までご連絡ください。
株式会社　シンタニ
〒067-0032 北海道江別市元江別872-2　
ＴＥＬ ： 011-384-9387 / ＦＡＸ ： 011-389-3133・ mail： support@shintani-1.co.jp
お問い合わせはお気軽にお問い合わせフォームよりご連絡ください。

業務内容：空測撮影　シンタニ製グラス製品製造販売
このページのトップへ-トップページ        会社概要-RCヘリによる空撮-保有機材-業務履歴-空撮サンプル写真-リンク

※当サイトに掲載された写真・記事を許可なく転載することを禁じます。
(C) 2010 shintani co. ltd.
_HTML_ exit; } sub ok{ $er2=0; $er3=0; $er4=0; $er5=0; $er6=0; $er7=0; $er8=0; $er9=0; $er10=0; $er11=0; $er12=0; $er13=0; $er14=0; if ($ONAMAE eq ''){ $er2=1; } $C_TEL1=$TEL1 =~ tr/0-9//c; if ($C_TEL1>0){ $er5=1; } if ($TEL1 eq ''){ $er6=1; } $C_TEL2=$TEL2 =~ tr/0-9//c; if ($C_TEL2>0){$er7=1;} if ($TEL2 eq ''){$er8=1; } $C_TEL3=$TEL3 =~ tr/0-9//c; if ($C_TEL3>0){$er9=1; } if ($TEL3 eq ''){$er10=1;} $C_EMAIL1=$EMAIL1 =~ tr/0-9a-zA-Z\.\-\_\@//c; if ($C_EMAIL1>0){$er11=1;} if (!($EMAIL1 =~ /(.*)\@(.*)\.(.*)/)) {$er12=1; } if ($EMAIL1 eq ''){ $er13=1;} if ($EMAIL1 ne $EMAIL2){ $er14=1; } $erc=$er2+$er3+$er4+$er5+$er6+$er7+$er8+$er9+$er10+$er11+$er12+$er13+$er14; if($erc >0){add();} $REM =~ s/\n/
/g; $REM =~ s/\r//g; print <<_HTML_; Content-type: text/html\n\n 空測撮影　シンタニ製グラス製品製造販売 株式会社シンタニ
■お問い合わせ
◆当社の営業日（火曜〜日曜　※定休日を除く）外のメールは、翌営業日以降の対応となります。
お問合せの内容によっては、お返事までにお時間をいただく場合があります。

＊お電話でのお問い合わせはAM10:00~6:30までとさせて頂きます。

■お名前
$ONAMAE
■電話番号
$TEL1 - $TEL2 - $TEL3
■FAX番号
$FAX1 - $FAX2 - $FAX3
■メールアドレス
$EMAIL1
■お問い合わせ内容
$REM


◆携帯電話へのお返事は、文字数等の制限により質問に対し十\分なお答が出来ない場合があります。
◆お問い合わせの内容によっては、メールではなく、対応スタッフより直接お電話にてお返事を差し上げる場合があります。
◆弊社からの回答文面の全部または一部を引用もしくは転用・転載されることはご遠慮ください。



株式会社　シンタニ
〒067-0032 北海道江別市元江別872-2　
ＴＥＬ ： 011-384-9387 / ＦＡＸ ： 011-389-3133・ mail： support@shintani-1.co.jp
お問い合わせはお気軽にお問い合わせフォームよりご連絡ください。

業務内容：空測撮影　シンタニ製グラス製品製造販売
このページのトップへ-トップページ        会社概要-RCヘリによる空撮-保有機材-業務履歴-空撮サンプル写真-リンク

※当サイトに掲載された写真・記事を許可なく転載することを禁じます。
(C) 2010 shintani co. ltd.
_HTML_ exit; } print <<_HTML_; Content-type: text/html\n\n 空測撮影　シンタニ製グラス製品製造販売 株式会社シンタニ
■お問い合わせ
◆当社の営業日（火曜〜日曜　※定休日を除く）外のメールは、翌営業日以降の対応となります。
お問合せの内容によっては、お返事までにお時間をいただく場合があります。

＊お電話でのお問い合わせはAM10:00~6:30までとさせて頂きます。

■は必ずご記入ください。
■お名前
■電話番号
- -
■FAX番号
- -
■メールアドレス


▼確認のため、もう一度入力してください。
■お問い合わせ内容


◆携帯電話へのお返事は、文字数等の制限により質問に対し十\分なお答が出来ない場合があります。
◆お問い合わせの内容によっては、メールではなく、対応スタッフより直接お電話にてお返事を差し上げる場合があります。
◆弊社からの回答文面の全部または一部を引用もしくは転用・転載されることはご遠慮ください。



株式会社　シンタニ
〒067-0032 北海道江別市元江別872-2　
ＴＥＬ ： 011-384-9387 / ＦＡＸ ： 011-389-3133・ mail： support@shintani-1.co.jp
お問い合わせはお気軽にお問い合わせフォームよりご連絡ください。

業務内容：空測撮影　シンタニ製グラス製品製造販売
このページのトップへ-トップページ        会社概要-RCヘリによる空撮-保有機材-業務履歴-空撮サンプル写真-リンク

※当サイトに掲載された写真・記事を許可なく転載することを禁じます。
(C) 2010 shintani co. ltd.
_HTML_ exit; sub jis { $msg = $_[0]; &jcode'convert(*msg, 'jis'); }