[求助]asp如何整站转静态? - 编程论坛

#2

yms1232007-09-19 10:46

如果是已做好的网站可以用Ajax的方式转静态。
https://blog.bc-cn.net/user1/1193/archives/2007/4610.shtml
可以用我写的转换类
将转换类存为MarkHTML.asp

<%
Dim MHtml
Set MHtml=New MarkHTML
MHtml.UrlStr=Request("Url")'URL地址
MHtml.FilePath="html/"'生成网页的所在文件夹
MHtml.FileName="test.htm"'生成静态页的文件名
MHtml.XMLHttpMetHod ADOStream'调用生成方法(最后用ADOStream写网页文件)
Response.Redirect "html/test.htm"'转向生成好的网页
%>
上面的代码使用方法
存储上面的代码为asp文件
URL调用:xxx.asp?url=xxx.asp

#3

yfen2582007-09-19 11:13

yms123版主,你好,我的网站已经做完了,现在就是把所有模块转静态的问题.

看了下你的转换类 MarkHTML.asp,不是很懂操作~~
能不能具体帮小弟解释下你的转换类 ?谢谢!!!!

Private mUrlStr'网页的URL地址

Private mTemplateBody'模板文件替换后的HTML代码

Private mFilePath'生成网页的文件路径

Private mFileName'生成网页的文件名 '类初始化过程

Private Sub Class_Initialize

mUrlStr=""

mTemplateBody=""

mFilePath=""

mFileName=""

End Sub

<%
Dim MHtml
Set MHtml=New MarkHTML
MHtml.UrlStr=Request("Url")'URL地址
MHtml.FilePath="html/"'生成网页的所在文件夹
MHtml.FileName="test.htm"'生成静态页的文件名
MHtml.XMLHttpMetHod ADOStream'调用生成方法(最后用ADOStream写网页文件)
Response.Redirect "html/test.htm"'转向生成好的网页
%>
上面的代码使用方法
存储上面的代码为asp文件
URL调用:xxx.asp?url=xxx.asp

#4

yfen2582007-09-19 11:14

我的网站www.113799.com
用我的这个网站该如何操作你的转换类??

#5

yfen2582007-09-19 12:34

怎样才能转静态~~~~

#6

yms1232007-09-19 12:38

最本的办法
把我写的那个存成asp文件(比如abc.asp)
然后每个url连接
改成
(比如这个页面dailixx.asp?id=25)
abc.asp?url=dailixx.asp?id=25

#7

yfen2582007-09-19 12:57

这样是一个页面转静态吧

要一个个这样转到什么时候才完?

不能整个模块一起转吗?

#8

yfen2582007-09-19 13:31

郁闷死了

一天熬在这了还没转成功~~

#9

chenxingg2007-09-19 13:46

先做模版

然后批量生成静态

看我搞得：http://www.51adn.com

#10

yfen2582007-09-19 13:57

chenxingg 你做的不错
能不能教我怎么做?
我都一天在这了,不能转~~
谢谢

#11

yfen2582007-09-19 14:18

#12

yfen2582007-09-19 14:56

知道的说下呀

#13

saioy2007-09-20 09:25

是啊,chenxingg,你就教教大家具体如何操作呀?

#14

yfen2582007-09-20 11:26

#15

孤独冷雨2007-09-20 23:15

我想知道那个模板是怎么做的？说一下啊！