<!-- #include file="../../include.asp" -->

<%
'<!-- 
'################################################
' 	名称	:自社情報照会		 
' 	作成日:2002/8/30
' 	作成者:山崎
' 	目的 :自社情報を照会する
' 	概要	:
' 	 <<表示>>
' 	・自社情報を表示
' 	2002/9/30:山崎:修正:会社略名称を追加
'################################################
'-->
%>

<% 
main()

Sub main()

	Dim RouteType
	RouteType = Request("RouteType")

%>
<html>
<% = HtmlHeader("") %>
<SCRIPT LANGUAGE="JavaScript">
<!--
	ExitFlg = 1;
	HomeAlias = "<% = HomeAlias %>";
	HomeAliasSL = "<% = HomeAliasSL %>";
-->
</SCRIPT>


<frameset rows="*,0" framespacing="0" border="0" frameborder="0"> 
  <frame name="main" src="teikan_main.asp?RouteType=<% = RouteType %>&WBCLB=<% = Request("WBCLB") %>&<% = TimeUniq() %>" scrolling="no" noresize>
  <frame name="printout" id="teikan_print.asp?RouteType=<% = RouteType %>&WBCLB=<% = Request("WBCLB") %>&<% = TimeUniq() %>">
  <noframes>
  <body onkeydown="if(ExitFlg==2)ExitFlg=3;">

  <p>このページにはフレームが使用されていますが、お使いのブラウザではサポートされていません。</p>

  </body>
  </noframes>
</frameset>

</html>
<%
End Sub
%>