当前位置：网学 > 编程文档 > ASP.net > 正文

ASP开发之生成静态HTML文件的方法比较

作者：用户投稿来源：网络发布时间： 13/01/07

在ASP中，将动态页面转换生成静态Html文件有许多好处，比如生成html网页有利于被搜索引擎收录（特别是对接受动态参数的页面）。前台访问时，脱离了数据访问,减轻对数据库访问的压力，加快网页打开速度。

当然，凡事有利必有弊，生成HTML页面无形中也耗费大量的磁盘空间以存放这些静态文件，在编辑页面过程中除读写数据库外，也要读写服务器磁盘，页面样式的改动必须重新生成全部HTML文件，等等。

像很多搜索引擎，都可以提交网站的页面地址列表，动态文件的收录问题已经不算是个问题了（如google sitemap）。得失就要自己衡量把握了，但无论如何，我们还是要懂得如何操作的。这里就引用一下别人的文章说明几种常见的生成思路，供大家参考参考。

1、下面这个例子直接利用FSO把html代码写入到文件中然后生成.html格式的文件。

这是最原始的，优点是简单，缺点是页面的修改不方便，我一般用到的地方是利用它生成整站参数文件。（通常网站如标题，名称等配置保存在数据库，我将它生成config.asp保存这些变量调用，避免频繁访问数据库）

以下为引用的内容：

＜%   
filename="test.htm"   
if request("body")＜>"" then   
set fso = Server.CreateObject("Scripting.FileSystemObject")   
set htmlwrite = fso.CreateTextFile(server.mappath(""&filename&""))   
htmlwrite.write "＜html>＜head>＜title>" & request.form("title") & "＜/title>＜/head>"   
htmlwrite.write "＜body>输出Title内容: " & request.form("title") & "＜br /> 
输出Body内容:" & request.form("body")& "＜/body>＜/html>"   
htmlwrite.close   
set fout=nothing   
set fso=nothing   
end if   
%>   
＜form name="form" method="post" action="">   
＜input name="title" value="Title" size=26>   
＜br>   
＜textarea name="body">Body＜/textarea>   
＜br>   
＜br>   
＜input type="submit" name="Submit" value="生成html">   
＜/form>

2、但是按照上面的方法生成html文件非常不方便，第二种方法就是利用模板技术，将模板中特殊代码的值替换为从表单或是数据库字段中接受过来的值，完成模板功能，将最终替换过的所有模板代码生成HTML文件。这种技术采用得比较多，大部分的CMS都是使用这类方法。

以下为引用的内容：

template.htm '' //模板文件   
＜html>   
＜head>   
＜title>$titlecontentnbsp;by webjx.com＜/title>   
＜/head>   
＜body>   
$bodycontentnbsp;  
＜/body>   
＜/html> 
TestTemplate.asp ''// 生成Html   
＜%   
Dim fso,htmlwrite   
Dim strTitle,strContent,strOut   
''// 创建文件系统对象   
Set fso=Server.CreateObject("Scripting.FileSystemObject")   
''// 打开网页模板文件，读取模板内容   
Set htmlwrite=fso.OpenTextFile(Server.MapPath("Template.htm"))   
strOut=f.ReadAll   
htmlwrite.close   
strTitle="生成的网页标题"   
strContent="生成的网页内容"   
''// 用真实内容替换模板中的标记   
strOut=Replace(strOut,"$titlecontentquot;,strTitle)   
strOut=Replace(strOut,"$bodycontentquot;,strContent)   
''// 创建要生成的静态页   
Set htmlwrite=fso.CreateTextFile(Server.MapPath("test.htm"),true)   
''// 写入网页内容   
htmlwrite.WriteLine strOut   
htmlwrite.close   
Response.Write "生成静态页成功！"   
''// 释放文件系统对象   
set htmlwrite=Nothing   
set fso=Nothing   
%>