BDG Scenario 3

gate.asp (ja)

<%@ Language=VBScript Transaction=Not_Supported %>
<% Option Explicit
   Response.Buffer = True
   'Set the codePage for japanese character set
   Session.CodePage = 932
   Dim lang
   lang = Server.MapPath(".")
   lang = Mid(lang,InStrRev(lang,"\")+1)
%>
<html>
<head>
<title>Testing and Training (BDG Sample Application)</title>
<meta  NAME="GENERATOR" CONTENT="MICROSOFT VISUAL STUDIO 6.0">
<meta  HTTP-EQUIV="Content-type" CONTENT="text/html; charset=shift-jis">

<script language="javascript" src="../Scripts/GetParam.js"></script>
<script language="javascript" for="window" event="onload">
var fileName = getParam('fileName');
if (fileName) {
   var search = window.location.search
   var frames = document.all;
   
   frames('logo').src = fileName + 'Logo.htm' + search;
   frames('menubar').src= '../menu/menu.asp?lang=' + '<%= lang  %>';
   frames('rightpane').src = fileName + '.htm' + search;
   frames('leftpane').src = fileName + 'List.htm' + search;
}
else {
   location.href = 'welcome.htm';
}
</script>

</head>
<frameset FRAMESPACING="0" BORDER="0" FRAMEBORDER="0" ROWS="75,24,*">
 <frame ID="logo" NAME="LOGO" SCROLLING="NO" MARGINWIDTH="0" MARGINHEIGHT="0">
 <frame ID="menubar" NAME="MENUBAR" SCROLLING="NO" MARGINWIDTH="0" MARGINHEIGHT="0" FRAMEBORDER="1">
 <frameset COLS="20%,*">
     <frame ID="leftpane" NAME="LEFTPANE" SCROLLING="No" MARGINWIDTH="0" MARGINHEIGHT="0">
     <frame ID="rightpane" NAME="RIGHTPANE" SCROLLING="AUTO" MARGINWIDTH="0" MARGINHEIGHT="0">
 </frameset>
</frameset>
<body>
</body>
</html>