当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP中利用execute实现动态包含文件的方法

ASP
ASP漏洞及安全建议(3)
ASP漏洞及安全建议(4)
实现聊天室的悄悄话功能(上)
实现聊天室的悄悄话功能(中)
用ASP实现悄悄话的功能
《 优化你的ASP程序 》
让ASP应用系统成为跨平台的应用系统
让ASP应用系统成为跨平台的应用系统(2)
使用ASP加密算法加密你的数据(一)
使用ASP加密算法加密你的数据(二)
用ASP制作个性化的调查板
asp+语法介绍(二)---书写我们的第一个asp+ 文件
asp+语法介绍(一)
asp+语法介绍(三)----asp+的服务器端编程初步
asp+语法介绍(四)----asp+的服务器端编程进介
asp+语法介绍(五)----asp+的服务器端编程控件篇
sp+语法介绍(六)----数据库篇
用ASP和VBScript上载文件(一)
用ASP和VBScript上载文件(二)
解析正则表达式(原创)

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 234 ::
收藏到网摘: n/a

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

Execute("Class clsAbc"&vbCrLf&"Public Function output"&vbCrLf&"Response.Write 123"&vbCrLf&"End Function"&vbCrLf&"End Class")

复制代码 代码如下:

Dim objAbc
Set objAbc = New clsAbc
objAbc.output
Set objAbc = Nothing

使用时可以用从文件或数据库读取出ASP代码再执行,注意,所执行的代码中不应包含<%和%>
注意不要与Server.Execute混淆,Server.Execute参数为ASP虚拟路径,并且使用该函数不但不能动态声明Class类,甚至不可以给主程序段的变量赋值。
例子:
main.asp
复制代码 代码如下:

Dim strAbc,objAbc
strAbc = "Test"
Server.Execute("sub.asp")
Response.Write strAbc
Set objAbc = New clsAbc
objAbc.output
Set objAbc = Nothing

sub.asp
复制代码 代码如下:

strAbc = "Execute"
Class clsAbc
Public Function output
Response.Write "Class"
End Function
End Class

执行main.asp后,将仅输出Test,而objAbc则不能实例化。