ASP生成静态代码,可用模板技术,非常简单,以下是代码示例:
"
For j=1 To TotalPage
AbsPage=AbsPage&""&j&""
Next
AbsPage=AbsPage&"页"
PageNav=PageFirst&ageBack&ageNext&ageLast&AbsPage
End If
TempContent=Conn.Execute("Select TempContent From Templet Where TempID=1")(0)
TempContent=replace(TempContent,"$ArticleList$",strList)
TempContent=replace(TempContent,"$PageNav$",PageNav)
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Fout = FSO.CreateTextFile(Server.MapPath("Article/Index_"&age&".html"))
Fout.Write TempContent
Fout.Close
%>
完成
">
第页生成完毕!