用XML组件生成静态首页

【来源：网络作者：backer 更新时间：2007-08-29 | 字体：大中小】

[导读]第 1 页利用Msxml2.ServerXMLHTTP抓取网页内容第 2 页用ADODB.Stream将抓取内容写入文件第 3 页具体的举一个例子了解asp的人应该都知道asp是一种解释执行的脚本程序语言,而脚本程序的执行效率往往都是很低的,如果...

下面为了让大家更好的学习给出具体的举一个实例:

我们有一个网站地址是 http://www.pcer.cn/default.asp

我们要将其首页也就是default.asp生成静态的htm文件

我们先建立个文件:makeindex.asp


<%
dim indexhtmlstr
indexhtmlstr=GetURL("http://www.pcer.cn/default.asp")
dim indexfilename
indexfilename="index.htm"
dim actionstat
if len(indexhtmlstr) <200 then
acti&indexfilename&"文件时遇到"&indexhtmlstr&"错误"
else
dim myhtml
set myhtml= new Htmlmaker
myhtml.foldename = "../.."
myhtml.Filename = indexfilename
myhtml.Htmldel
myhtml.Htmlstr = indexhtmlstr
myhtml.Htmlmake
set myhtml=nothing
acti&indexfilename&"文件"
end if
response.write actionstat
%>

文件function_class.asp的内容主要包括前面给出的函数和生成文件的类就可以了!
运行makeindex.asp就可以生成htm文件了!

注意本文由backer原创

原文地址：http://www.pcer.cn/article/document/20063/346035191.asp

上一页 [1] [2] 3

转载请注明来源：IT学习者网址：http://www.itlearner.com/ 向您的朋友推荐此文章
文章关键词: xml 首页
特别声明：本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系我们，我们会尽快予以更正。