mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
34 lines
865 B
34 lines
865 B
<%@ LANGUAGE = VBScript %>
|
|
<% Option Explicit %>
|
|
<!-- #include file="../directives.inc" -->
|
|
|
|
<!--#include file="jsbrowser.str"-->
|
|
|
|
<%
|
|
Const LARGE = 1
|
|
|
|
Dim pg
|
|
|
|
pg=Request.QueryString("pg")
|
|
if Request("jsfontsize") <> "" then
|
|
Session("JSFONTSIZE") = Request("jsfontsize")
|
|
else
|
|
Session("JSFONTSIZE") = LARGE
|
|
end if
|
|
|
|
%>
|
|
|
|
<HTML>
|
|
<HEAD>
|
|
<TITLE><%= L_TITLE_TEXT %></TITLE>
|
|
</HEAD>
|
|
<% if Instr(Request.ServerVariables("HTTP_USER_AGENT"),"MSIE") then %>
|
|
<FRAMESET ROWS="100%" COLS="100%" BORDER=NO FRAMESPACING=1 FRAMEBORDER=0>
|
|
<FRAME SRC="<%= pg %>" NAME="main" SCROLLING=NO FRAMESPACING=0 BORDER=NO MARGINHEIGHT=5 MARGINWIDTH=5>
|
|
</FRAMESET>
|
|
<% else %>
|
|
<FRAMESET ROWS="*,0" COLS="100%" BORDER=NO FRAMESPACING=1 FRAMEBORDER=0>
|
|
<FRAME SRC="<%= pg %>" NAME="main" SCROLLING=NO FRAMESPACING=0 BORDER=NO MARGINHEIGHT=5 MARGINWIDTH=5>
|
|
</FRAMESET>
|
|
<% end if %>
|
|
</HTML>
|