<!-- #include file="../include.asp" --> <% '<!-- '################################################ ' 名称 :商社メニュー ' 作成日:2002/10/18 ' 作成者:山崎 '################################################ '--> %> <% main() Sub main() %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=shift_jis"> <meta http-equiv="Pragma" content="no-cache"> <meta http-equiv="Cache-Control" content="no-cache"> <meta http-equiv="Expires" content="-1"> <link href="../binx/sj3web.css?<% = TimeUniq() %>" rel="stylesheet" type="text/css"> <title><% = AppTitle %></title> <script language="JScript" src="../include.js?<% = TimeUniq() %>"></script> <script language="JScript" src="../includesj.js?<% = TimeUniq() %>"></script> <script language="JScript.Encode" src="../include_enc.js?<% = TimeUniq() %>"></script> <script language="JScript.Encode" src="../includesj_enc.js?<% = TimeUniq() %>"></script> <script type="text/javascript" src="../javascript.js?<% = TimeUniq() %>"></script> </head> <SCRIPT LANGUAGE="JavaScript"> <!-- HomeAlias = "<% = HomeAlias %>"; HomeAliasSL = "<% = HomeAliasSL %>"; ExitFlg = 1; --> </SCRIPT> <body onkeydown="if(ExitFlg==2)ExitFlg=3;" bgcolor="#5C70B6" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <% = HtmlDesign(7) %> <div id="L0" style="position: absolute; visibility: hidden; left: 0px; top: -2000px;"> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5"> <tr> <td> <table border="0" cellpadding="0" cellspacing="0" width="100%" height="100%"> <tr> <td align="CENTER" valign="MIDDLE"> <TABLE BORDER="0" CELLSPACING="5" CELLPADDING="0" BGCOLOR="#FFFFFF" STYLE="font-size: 14px; border: 1px solid #000000" width="600" height="400"> <TR> <TD ALIGN="CENTER" bgcolor="#CCFFFF" height="60"> このページは、クライアントインストール用の隠しページです。(3ページ目)<br> 必要の無い場合には、トップページに戻って下さい。<br> <a href="default2.asp">前のページに戻る</a> <a href="/<% = HomeAlias %>/default.asp">トップページへ戻る</a> </TD> </TR> <TR> <TD ALIGN="CENTER" valign="top"> 下にグラフが表示されている事を<br> 確認して下さい。<br><br> 次のページでも<br> <font color="#FF0000">ダイアログが出てくる場合がありますが、「OK」をクリックして下さい。</font><br> <OBJECT CLASSID="CLSID:5220CB21-C88D-11CF-B347-00AA00A28331"> <PARAM NAME="LPKPath" VALUE="olectra6.lpk"> </OBJECT> <object classid="clsid:92D71E93-25A8-11CF-A640-9986B64D9618" width="320" height="155" id="Chart2D1" codebase="/<% = HomeAlias %>/binx/Olec-2d.cab#version=1,1,1,1"> <PARAM NAME="_StockProps" VALUE="0"> </object> </TD> </TR> <TR> <TD ALIGN="CENTER" valign="top" height="90"> <a href="default4.asp">次のページへ</a> </TD> </TR> </TABLE> </td> </tr> </table> </td> </tr> </table> </div> <SCRIPT LANGUAGE="JavaScript"> function ChartReload() { var Rates = new Array(2); var Values = new Array(200); var i; var j; var SonekiBunkitenUriage, Koteihi; document.Chart2D1.IsBatched = true; document.Chart2D1.Layout = 2; document.Chart2D1.AllowUserChanges = false; SonekiBunkitenUriage = 5000000; Koteihi = 1000000; document.Chart2D1.ChartArea.Axes(1).Max = SonekiBunkitenUriage * 2; document.Chart2D1.ChartArea.Axes(2).Max = SonekiBunkitenUriage * 2; document.Chart2D1.ChartArea.Axes(1).Title = "売上高(円)"; document.Chart2D1.ChartArea.Axes(2).Title = "費用・損益(円)"; document.Chart2D1.ChartGroups(1).ChartType = 1; document.Chart2D1.ChartGroups(1).Data.NumSeries = 3; document.Chart2D1.ChartGroups(1).Data.NumPoints(1) = 3; document.Chart2D1.ChartGroups(1).Data.X(1, 1) = 0; document.Chart2D1.ChartGroups(1).Data.X(1, 2) = SonekiBunkitenUriage; document.Chart2D1.ChartGroups(1).Data.X(1, 3) = SonekiBunkitenUriage * 2; document.Chart2D1.ChartGroups(1).Data.Y(1, 1) = 0; document.Chart2D1.ChartGroups(1).Data.Y(1, 2) = SonekiBunkitenUriage; document.Chart2D1.ChartGroups(1).Data.Y(1, 3) = SonekiBunkitenUriage * 2; document.Chart2D1.ChartGroups(1).Data.Y(2, 1) = Koteihi; document.Chart2D1.ChartGroups(1).Data.Y(2, 2) = Koteihi; document.Chart2D1.ChartGroups(1).Data.Y(2, 3) = Koteihi; document.Chart2D1.ChartGroups(1).Data.Y(3, 1) = Koteihi; document.Chart2D1.ChartGroups(1).Data.Y(3, 2) = Math.floor(Koteihi) + Math.floor(document.Chart2D1.ChartArea.Axes(1).Max * (1 - 0.4) / 2); document.Chart2D1.ChartGroups(1).Data.Y(3, 3) = Math.floor(Koteihi) + Math.floor(document.Chart2D1.ChartArea.Axes(1).Max * (1 - 0.4)); document.Chart2D1.ChartGroups(1).Styles(1).Line.Color = 255 * 256 * 256; document.Chart2D1.ChartGroups(1).Styles(1).Line.Pattern = 3; document.Chart2D1.ChartGroups(1).Styles(2).Line.Color = 128 * 256 * 256; document.Chart2D1.ChartGroups(1).Styles(2).Line.Pattern = 5; document.Chart2D1.ChartGroups(1).Styles(3).Line.Color = 128 * 256; document.Chart2D1.ChartGroups(1).Styles(3).Line.Pattern = 6; document.Chart2D1.ChartLabels.RemoveAll(); document.Chart2D1.ChartLabels.Add.Text = "損益分岐点"; document.Chart2D1.ChartLabels(1).Border.Type = 0; document.Chart2D1.ChartLabels(1).AttachMethod = 2; document.Chart2D1.ChartLabels(1).IsConnected = true; document.Chart2D1.ChartLabels(1).Anchor = 16; document.Chart2D1.ChartLabels(1).AttachDataIndex.ChartGroup = 1; document.Chart2D1.ChartLabels(1).AttachDataIndex.Series = 1; document.Chart2D1.ChartLabels(1).AttachDataIndex.Point = 2; document.Chart2D1.ChartLabels(1).Offset = 20; document.Chart2D1.Legend.Anchor = 1; document.Chart2D1.Legend.Orientation = 1; // document.Chart2D1.Legend.Anchor = 32; // document.Chart2D1.Legend.Orientation = 2; document.Chart2D1.Legend.IsShowing = true; document.Chart2D1.Legend.Location.Width = 10; document.Chart2D1.IsBatched = false; } </SCRIPT> <SCRIPT FOR="window" EVENT="onload" LANGUAGE="JavaScript"> ChartReload(); </SCRIPT> </body> <% = HtmlFooter %> </html> <% End Sub %>