如何将一个HTML页面嵌套在多个动态页面（asp）博客分类： Javascript asp

程序员文章站 2024-03-21 22:04:46

...

正文：

很多时候，由于程序设计需要，要求在asp的include包含文件里调用动态的文件。如其中的1是个动态参数，需要request获取。但可惜的是，include语句里并不能含有变量，否则将提示找不到文件错误。本文将提供3种方法解决该问题。

首先，我们需要了解，包含文件的提示和警告信息：被包含的文件可以包含其他文件。只要“#include”命令不导致循环，.asp 文件也可以多次包含同一文件。例如，如果文件 First.asp 包含文件 Second.inc，则 Second.inc 不能反过来包含 First.asp。文件也不能包含其自身。ASP 检测这样的循环或嵌套错误，生成错误消息，并停止处理请求的 .asp 文件。

解决方法一：FSO调用方法

ASP语言是强大易用的语言，我们不要把自己的思维局限固定在一个角落里，“条条大道通罗马”，一个思路不通，换个思路吧。

本方法采用变通的方法实现同样的包含功能。即FSO调用。代码如下：

<%
Function getFileContents(strIncludeFile) '函数：读取包含文件内容
Dim objFSO,objText,strPage
Set objFSO = Server.CreateObject("Scripting.FileSystemObject") '调用FSO对象
Set objText = objFSO.OpenTextFile(Server.MapPath(strIncludeFile))
getFileContents = objText.ReadAll
objText.Close
Set objText = Nothing
Set objFSO = Nothing
End Function

dim p
p=request("p") '2种方式：request.form ,request.querystring
response.write getFileContents("map"&p&".asp")
%>

这样，利用fso函数读取包含文件的内容，然后用response.write把包含文件的内容输出，即实现和include命令同样的功能了，轻松实现*输出诸如 map1.asp，map2.asp… 等文件内容了。

解决方法二：if...elseif...

此方法适用于要包含的文件数量不多的情况下，也是懒人+笨人的方法，呵呵。代码如下：

<%if a=1 then%>

<%elseif a=2 then%>

<%elseif a=3 then%>

<%end if%>

解决方法三：select case

方法和第二种差不多，稍微好点。代码如下：

<%select case p
case 1%>

<%case 2%>

<%case 3%>

<%case 4%>

<%end select%>

如果你有其他更好的方法，欢迎与我们交流。您可以把你您的想法留在博客评论里，我们期待与您的探讨。

补充：关于asp的include包含命令，需要注意以下方面。

ASP程序在执行脚本命令之前就已经包含文件。因此，不能使用脚本命令来建立被包含的文件名。举例来说，因为 ASP 试图在将文件名指派给变量 name 之前执行“#include”命令，所以下面的脚本无法打开文件 Header1.inc。

<% name= header1.inc %>

脚本命令和过程必须完全包含在脚本分隔符 <% 和 %> 内，即 HTML 标签 <SCRIPT> 和 </SCRIPT>，或 HTML 标签 <OBJECT> 和 </OBJECT> 内部。也就是说，不能在包含 .asp 文件中打开脚本分隔符，并在被包含的文件中关闭分隔符；脚本或脚本命令必须是一个完整的单元。例如，下面的脚本将不起作用：

<%
For i = 1 To n
主文件中的语句

Next
%>

但下面的脚本会起作用：

<%
For i = 1 to n
主文件中的语句
%>

<% Next %>

如果 ASP 脚本包含的文件中存在包含脚本不需要的大量函数和变量，则这些无用的结构反而会影响性能，并最终降低 Web 应用程序的伸缩性。因此，通常将包含文件分成多个小文件，并且只包含那些服务器端脚本必需的文件，而不是包含那些带有冗余信息的一个或多个大型包含文件。

如果是用if else那还算什么动态？case也一样，所以我想用fso的方法，可惜我最后失败了。文章来源：http://www.piaoyi.org/asp/asp-include-variables.html

最后我是用的js的方法的XMLHttpRequest send ，responseText到div的innerHtml中得到了解决方法：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<html>
<head>
    <meta http-equiv="Content-Type"     content="text/html; charset=utf-8" />
<script>
  window.onload =  function () {
	var req = false;
	var url  ="text"+Math.floor(Math.random()*10+1)+".asp";
   // Safari, Firefox, 及其他非微软浏览器
	if (window.XMLHttpRequest) {
		try {
			req = new XMLHttpRequest();
			} catch (e) {
				req = false;
			}
		} else if (window.ActiveXObject) {
		// For Internet Explorer on Windows
		try {
			req = new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
		try {
			req = new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e) {
		req = false;
		}
	}
}
var element = document.getElementById("includefooter");
if (!element) {
	alert("函数clientSideInclude无法找到id " + id + "。" +"你的网页中必须有一个含有这个id的div 或 span 标签。");
	return;
	}
if (req) {
	// 同步请求，等待收到全部内容
	req.open('GET', url, false);
	req.send(null);
	element.innerHTML = req.responseText;
	} else {
		element.innerHTML ="对不起，你的浏览器不支持" +"XMLHTTPRequest 对象。这个网页的显示要求" +"Internet Explorer 5 以上版本, " +"或 Firefox 或 Safari 浏览器，也可能会有其他可兼容的浏览器存在。";
	}
 }
</script>
</head>
<body>
<span id="includefooter"></span>

</body>
</html>

代码来源：http://blog.csdn.net/huangxy10/article/details/8486719

如何将一个HTML页面嵌套在多个动态页面（asp） 博客分类： Javascript asp