<!-- #include file="./include.asp" --> <% '<!-- '################################################ ' 名称 :サイバートレード→サイバー会計連携演出 ' 作成日 :2010/5/25 ' 作成者 :W小野 '################################################ '--> ' ' %> <% main() Sub main() Dim NextUrl NextUrl = "default_bin.asp?" & Request.ServerVariables("QUERY_STRING") If GB_IEmode <> "1" Or "" & Session("ct21_to_ca21") = "1" Then ' Session("ct21_to_ca21") = "" Response.Redirect(NextUrl) Exit Sub Else Session("ct21_to_ca21") = "1" End If Dim Query Dim Content Dim xStart xStart = 344 'ドアスライドのスタート座標 %> <html> <% = HtmlHeader("") %> <SCRIPT LANGUAGE="JavaScript"> <!-- ExitFlg = 1; HomeAlias = "<% = HomeAlias %>"; HomeAliasSL = "<% = HomeAliasSL %>"; //プリロード var PreLoad1 = new Image; PreLoad1.src = "ct21_to_ca21_kabe.gif?<% = GB_STU %>"; var PreLoad2 = new Image; PreLoad2.src = "ct21_to_ca21_door.gif?<% = GB_STU %>"; var PreLoad3 = new Image; PreLoad3.src = "ct21_to_ca21_bg.gif?<% = GB_STU %>"; var PreLoad4 = new Image; PreLoad4.src = "ct21_to_ca21_white.jpg?<% = GB_STU %>"; --> </SCRIPT> <body onkeydown="if(ExitFlg==2)ExitFlg=3;" bgcolor="#ffffff" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" vlink="#CCCCFF" alink="#CCCCFF"> <table width="100%" height="100%" border="<% = debug_tb %>" cellspacing="0" cellpadding="0"><tr><td align="center" valign="middle"> <table width="1004" height="686" border="<% = debug_tb %>" cellspacing="0" cellpadding="0"> <tr> <td align="left" valign="top" background="ct21_to_ca21_bg.gif?<% = GB_STU %>"> <div style="position:relative; width:100%; height:100%;"> <div style="position:absolute; left:0px; top:0px; z-index:999; overflow:visible;"> <img id="FadeImg" src="ct21_to_ca21_white.jpg?<% = GB_STU %>" width="1004" height="686" style="filter:alpha(opacity=0);"> </div> <div style="position:absolute; left:0px; top:0px; z-index:888; overflow:visible;"> <img src="ct21_to_ca21_kabe.gif?<% = GB_STU %>" style="filter:alpha(opacity=100);"> </div> <div id="DoorLay" style="position:absolute; left:<% = xStart %>px; top:259px; width:317px; z-index:777; overflow:visible;"> <img src="ct21_to_ca21_door.gif?<% = GB_STU %>" style="width:317px; filter:alpha(opacity=100);"> </div> </div> </td> </tr> </table> </td></tr></table> </body> <SCRIPT LANGUAGE="JavaScript"> <!-- var doorwidth = 317; var count = 0; var speed = 10; var xx = <% = xStart %>; var xend = <% = xStart - 260 %>; var slideID; function moveLay() { if (xx <= xend) { clearTimeout(slideID); slideID = setTimeout("FadeOutImg();", 1000); return; } xx -= speed; document.all.DoorLay.style.left = xx; clearTimeout(slideID); slideID = setTimeout("moveLay();", 25); } var cnt = 0; function FadeOutImg() { document.images["FadeImg"].filters["alpha"].opacity = cnt; cnt += speed; if (cnt > 100) { clearTimeout(slideID); location.href = "<% = NextUrl %>"; return; } clearTimeout(slideID); slideID = setTimeout("FadeOutImg()",25); } slideID = setTimeout("moveLay();", 1000); --> </SCRIPT> </html> <% End Sub %>