code 20.2-1.asp

来自「开发web_xml」· ASP 代码 · 共 25 行

<%@ LANGUAGE=JScript %>
<% Response.Buffer = "True"; %>
   <% 
   var testAgent = Request.ServerVariables("HTTP_USER_AGENT");
   var checkBrowser = Server.CreateObject("MSWC.BrowserType");
   
   if ( checkBrowser.version == 5.0)
      Response.Redirect("toc.xml");

   else {
     Response.Write("This is an XML page and requires Internet Explorer 5 to view. We will have support for all browsers up in a few days. We apologize for the inconvenience.");
     var xmlDocument =
        Server.CreateObject("Microsoft.XMLDOM");
     var xslDocument =
        Server.CreateObject("Microsoft.XMLDOM");

     xmlDocument.load(Server.MapPath("toc.xml"));
     xslDocument.load(Server.MapPath("stylesheets/homepage.xsl"));
     Response.Write(xmlDocument.transformNode(xslDocument)); 
   }
   
   %>
</BODY>
</HTML>