如何动态ASP文件

动态

可以动态Include文件吗?

什么是动态Include?我们从一个案例谈起:
<%
'得到用户所在的省份
Dim Province
Province = Request.form("Province")

'下面显示这个省份相关的信息
%>

<!--#include virtual="/ Province/<%= Province%>"-->

你觉得上面的代码可以工作吗?不!简单地使用ASP来达到动态包含,你不能达到你想要的效果。为什么?因为:Include命令先于ASP代码而得到执行,所以,上面的代码并没有按照作者的意愿,先得到用户所在的省份,再包含这个省份的信息!

如果你确实需要动态包含,你可以这样做:
<%
Select Case Province
Case 1:%>
<!--#include file="1.asp"
<% Case 2:%>
<!--#include file="2.asp"
<% Case 3:%>
<!--#include file="3.asp"
<% End Select%>

应该说,这段代码可以得到你想要的结果。但是,由于你的用户可能来自于33个省,你难道包含33个文件?特别要说明的是,SSInc.dll是不知道你究竟需要哪个包含文件的(事实上,这时候Province还没有值),所以,她把所有的文件都包含进来了!你可以想象,这时候的文件有多大!然后,ASP.DLL会去扫描这个文件中的ASP代码,然后执行!

所以,每当这样的时候,你应该考虑其他的思路,比如数据库,或者采用FileSystemObject。

Q021:怎样动态Include文件?
ASP程序员经常面临的最大挑战之一是动态Include文件。由于#include 在ASP代码执行之前处理,所以,看起来,动if/else的脑筋是不可能的。
真是这样吗?

根据你使用Include的目的,以及你将Include的文件数目,使用if/else也许可以解决问题。但这绝对不是任何时候可以奏效的,而且也不是一种有效的解决办法,因为你需要做许多的手工工作。
假设有两个样本HTM文件,1.htm和2.htm,为简化起见,假设文件的内容如下:
<!-- 1.HTM: -->
<font color=#ff0000>This is 1.htm</font>

<!-- 2.HTM: -->
<font color=#0000ff>This is 2.htm</font>
现在我们来试试动态Include:
<%
if request.querystring(‘param‘)=‘2‘ then
%>
<!--#include file=‘2.htm‘-->
<%
else
%>
<!--#include file=‘1.htm‘-->
<%
end if
%>
请注意:上面的两个#include 实际上都得到了处理。你可以实际运行一下,看看效果:
http://localhost/Test.asp?param=1
http://localhost/Test.asp?param=2
http://localhost/Test.asp
上面我们是把一个querystring作为条件。你还可以把时间、日期、浏览器版本等作为条件。但是,条件越复杂,这种方法的效率越差。下面提供了另外一种思路:
<%
if request(‘param‘)=‘2‘ then
filespec = ‘2.htm‘
else
filespec = ‘1.htm‘
end if
filespec = server.mapPath(filespec)
scr = ‘scripting.fileSystemObject‘
set fs = server.createobject(scr)
set f = fs.openTextFile(filespec)
content = f.readall
set f = nothing
set fs = nothing
response.write(content)
%>
在IIS5.0/ASP3.0中,有两种新的方法来支持“动态包含”:
<%
server.transfer filename
server.execute filename
%>
如果正好使用的是IIS5.0和ASP3.0,那么一切Ok!

时间: 2024-10-15 13:56:09

如何动态ASP文件的相关文章

asp如何动态include文件

必须存在该文件并且会预先编译(不管前面是否加以条件) 经常有这样的要求,根据不同的需求要求include不同的文件 如各个人的不同设置,所以要求能动态include文件. 代码如下:   <%   Function include(filename)       Dim re,content,fso,f,aspStart,aspEnd       set fso=CreateObject("Scripting.FileSystemObject")       set f=fso.

asp动态include文件

include|动态 受<! #include file="filename.asp" --> 宏限制必须存在该文件并且会预先编译(不管前面是否加以条件) 经常有这样的要求,根据不同的需求要求include不同的文件如各个人的不同设置,所以要求能动态include文件. 代码如下: Function include(filename) Dim re,content,fso,f,aspStart,aspEnd set fso=CreateObject("Script

ASP中动态include文件代码实例

include|动态 受<! #include file="filename.asp" --> 宏限制,必须存在该文件并且会预先编译(不管前面是否加以条件).经常有这样的要求,根据不同的需求要求include不同的文件,如各个人的不同设置,所以要求能动态include文件.     代码如下: Function include(filename)  Dim re,content,fso,f,aspStart,aspEnd  set fso=CreateObject(&quo

ASP中动态include文件

include|动态 受<! #include file="filename.asp" --> 宏限制,必须存在该文件并且会预先编译(不管前面是否加以条件).经常有这样的要求,根据不同的需求要求include不同的文件,如各个人的不同设置,所以要求能动态include文件.     代码如下: Function include(filename)  Dim re,content,fso,f,aspStart,aspEnd  set fso=CreateObject(&quo

对ASP动态包含文件方法的改进

动态 ASP 本身不支持动态包含文件,现在的动态包含是通过 FSO 把被包含的文件合并到主文件里再运行.以下也有把形如 <!--#include file="filename.asp" --> 的普通包含文件方式称作"传统引用",用函数实现的动态包含文件称作"动态引用".常见的程序如下: Function include(filename)Dim re,content,fso,f,aspStart,aspEndset fso=Crea

asp可以动态Include文件吗?

include|动态 可以动态Include文件吗? 2001年4月23日 什么是动态Include? 解答 我们从一个案例谈起: <% '得到用户所在的省份 Dim Province Province = Request.form("Province") '下面显示这个省份相关的信息 %> <!--#include virtual="/ Province/<%= Province%>"--> 你觉得上面的代码可以工作吗?不!简单

ASP 动态包含文件的改进

动态 ASP本身不支持动态包含文件,现在的动态包含是通过FSO把被包含的文件合并到主文件里再运行.以下也有把形如<!--#includefile="filename.asp"-->的普通包含文件方式称作"传统引用",用函数实现的动态包含文件称作"动态引用".常见的程序如下:Functioninclude(filename) Dimre,content,fso,f,aspStart,aspEnd  setfso=CreateObject

对ASP 动态包含文件方法的改进

ASP 本身不支持动态包含文件,现在的动态包含是通过 FSO 把被包含的文件合并到主文件里再运行.以下也有把形如 <!--#include file="filename.asp" --> 的普通包含文件方式称作"传统引用",用函数实现的动态包含文件称作"动态引用".常见的程序如下: Function include(filename) Dim re,content,fso,f,aspStart,aspEnd set fso=Creat

ASP中利用execute实现动态包含文件的方法_ASP CLASS类

摘要:本文介绍了ASP中动态包含ASP文件,并使其中ASP类(Class)可实例化的方法. ASP中,include file/virtual 是优先脚本代码处理的,所以无法使用include动态包含ASP文件.我们可以使用Execute函数动态执行所需代码. 方法: Execute(ASP代码) 例子:(vbCrLf为换行符) 复制代码 代码如下: Execute("Class clsAbc"&vbCrLf&"Public Function output&q