日期:2014-05-16  浏览次数:20737 次

ASP生成静态
刚学习ASP,想了解一下。我要在虚拟主机上生成静态文件,如果使用FSO,FSO要求要有源文件的具体路径,可是,我的页面是动态的,没有具体的路径,怎么办?如果使用模板,可是模板要调用数据库的函数实在太多了,怎么把这些数据都调出来了,生成虚拟的页面(在服务器端),再用FSO生成静态的文件呢?如果要用XMLHTTP,可是又必须打开客户端,有没有办法能不打开客户端就能使用XMLHTTP或类似的插件来生成静态的文件呢?生成静态还有其他的什么方法吗?
asp 生成静态 FSO XMLHTTP

------解决方案--------------------
正在写的一个系统里,ASP页面生成ASP页面的。当然你可以改改生成.html。

1、表名:表1
2、字段名:ID,name
3、在本asp文件的目录中,新建quote文件夹中并生成quote01.asp文件
4、quote01.asp文件内容为表1中字段name的所有值,排序为id desc
5、当然,各种扩展自己写吧

<!--#include file=" conn.asp"-->
<%quotetext=null%>
<%
exec="select * from 表1 order by id desc "
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
do while not rs.eof
quotetext=quotetext&"&rs("name")"
rs.movenext
loop
rs.close
set rs=nothing
%>
''上面是表1中以id desc排序,取所有name并赋值给quotetext
''下面是在quote文件夹中生成quote01.asp文件,最后跳转回1.asp
<%
set fso=server.CreateObject("Scripting.FileSystemObject")
path=server.MapPath("quote")
if fso.FolderExists(path)=false then
fso.CreateFolder(path)
end if
path=path&"/quote01.asp"
set ts=fso.OpenTextFile(path,2,true,-2)
ts.writeline""&quotetext&""
ts.close
set ts=nothing
set fso=nothing
conn.close
set conn=nothing
response.Redirect("1.asp")
%>