% Response.CacheControl ="no-cache" %>
<% Response.AddHeader "Pragma","no-cache" %>
<% Response.Expires = -1 %>
住宅地盤技術研究所 検査Web申込み
<%
dim lngRCount
dim eDay1,eDay2,txtOrdr
eDay1= request("se1")
eDay2= request("se2")
txtOrdr=request("Ordr")
txtTyosa=request("chTyosa")
if len(txtTyosa)=0 then
txtTyosa=0
end if
if len(eDay1)=0 then
'入力がない場合には、当月分のデータのみ表示
if month(date) <> 12 then
eDay1 = year(date()) & "/" & month(date()) & "/1"
eDay2 = year(date()) & "/" & month(date())+1 & "/1"
eDay2 = cdate(eDay2) -1
else
eDay1 = year(date()) & "/12/1"
eDay2 = year(date()) & "/12/31"
end if
end if
if len(eDay2)=0 then
eDay2=eDay1
end if
eDay1=""
%>
|
|
(株)住宅地盤技術研究所オンライン業務依頼
住宅中間検査を依頼することができます |
地盤調査を依頼の場合、案内図と配置図を送ってください。 |
お電話での業務依頼は |
住宅検査部 |
018-862-0901 |
FAXでの業務依頼は |
代表FAX |
018-866-9801 |
|
|