《求助》如何将ASP页生成html页 - 编程论坛

#2

hu9jj2006-09-08 08:30

直接将网页文件的后缀改为html就行，但其中的ASP代码将不会被执行。

#3

kun19842006-09-08 08:52

有一个 DW 的插件你试试看行不行吧!
生成HTML的插件
这个我没用过,应该很简单吧!

只有本站会员才能查看附件，请登录

[此贴子已经被作者于2006-9-8 8:52:54编辑过]

#4

mwyvkevke2006-09-08 12:48

好像没那么简单，要自动生成的,好像用什么fso来制作，而且还有很大一部分技术，但是我不会。

#5

exlland2006-09-08 12:52

现在有一种工具可以把动态的网也转换成静态的,你可以去网上搜一下.

#6

kun19842006-09-08 13:22

插件你用了没? 没用就别乱说!

#7

lijia01052006-09-08 13:27

没有吧，如果数据太大就做分页处理把，生成html可能不行，没试过

#8

mwyvkevke2006-09-08 15:31

谢谢各位大侠的指教，我试试看

#9

mwyvkevke2006-09-08 15:37

我把那个插件装起来了，但是我打开dw8不会用这个功能。能告诉我如何用吗？小妹在这里谢谢各kun1984大侠了

#10

mako2006-09-08 22:00

到底怎么生成?

#11

kun19842006-09-09 08:47

我戴了两张图你看一下!

只有本站会员才能查看附件，请登录

具体的你可以到这里来看一下!
http://www.youqian.com/youqian/view.asp?y_id=749

还有啊我可不是大侠我也是在学习中

[此贴子已经被作者于2006-9-9 8:49:39编辑过]

#12

s98992006-09-09 09:59

对于asp页面来说,好多信息是随着数据库的变化而变化的,最好是搞一个能根据页面变化而自动更新生成静态页面的程序,我也在做试验,借助表(模板)和FSO,应该没有问题,试验好了再说

#13

mwyvkevke2006-09-09 10:10

是啊，我也是想要楼上的阁主所说的那种，用表模板和fso，不过我先试试kun1984所说的这种方法，看能不能行的通，如果行不通，我们在互相研究。请以后多多指教。

#14

mwyvkevke2006-09-09 10:12

不行，kun1984所说的是用服务器行为做的时候才能用到的，而我是纯代码，所以这个研究方法是行不通的。看来只能是用用表模板和fso了

#15

huangwei_joy2006-09-10 10:41

.....PHP里好象有这种技术'''''不知道怎么弄的

#16

kun19842006-09-10 20:09

楼主我给你找了这样一个内容你有空去研究一下! 另外这个网站的学习资料还是很不错的!!

大家都可以来看看!!

http://tech.

#17

mwyvkevke2006-09-12 12:45

谢谢kun1984，这个我看了。就差最后一部就出来了。现在已经生成文件夹和html文件了。但是生成html文件里没有内容，是空的。如何将库里的代码调到首页，并让它转到代码里。请各位帮帮我

#18

mwyvkevke2006-09-15 12:09

为什么没人帮我呢?急急急!!!

#19

fengmumei2006-09-16 10:38

好像看到过一个程序，asp的可以实现，你再找一下
不过好像要一个一个的执行，我再看看

#20

mwyvkevke2006-09-19 18:03

呵呵，谢谢了，我都很长时间还没有实现这个功能了。

#21

fengmumei2006-09-20 15:44

一直在找，不过很不好意思，还没找到，不过我会尽力的

#22

fengmumei2006-09-20 16:41

<%
Function GetPage(url)
'获得文件内容
dim Retrieval
Set Retrieval = CreateObject("Microsoft.XMLHTTP")
With Retrieval
.Open "Get", url, False ', "", ""
.Send
GetPage = BytesToBstr(.ResponseBody)
End With
Set Retrieval = Nothing
End Function

Function BytesToBstr(body)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = "GB2312"
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function

on error resume next
Url="http://www.sina.com.cn"'要读取的页面地址
response.write "开始更新首页..."
wstr = GetPage(Url)

'response.write(wstr)
Set fs=Server.CreateObject("Scripting.FileSystemObject")

'if not MyFile.FolderExists(server.MapPath("/html/")) then
'MyFile.CreateFolder(server.MapPath("/html/"))'
'end if

'要存放的页面地址
dizhi=server.MapPath("index.htm")
If (fs.FileExists(dizhi)) Then
fs.DeleteFile(dizhi)
End If

Set CrFi=fs.CreateTextFile(dizhi)
Crfi.Writeline(wstr)
set CrFi=nothing
set fs=nothing
response.write "...<font color=red>更新完成！</font>"
%>

代码算是最简单的，直接保存成一个asp文件即可，只要把URL（要转化的asp地址）和dizhi（要保存的html地址）设置好就可以了，一般这两个文件在同一个目录，才能保证图片或者css、js起作用。

http://guanvee.cnblogs.com/archive/2006/06/16/427534.html

（出处：http://www.vipcn.com）

#23

fengmumei2006-09-20 16:42

刚刚找到，不知是否合适

#24

izrzw2008-03-15 09:51

我也想要啊！