asp定时生成html静态页面,确切的来说实应该是触发生成，也就是每隔一段时间，有访问者点击网页时进行判断，触发生成静态页面.实现代码如下：
<%
Dim sDate,filepath,url
sDate = Application("App_XXX")
If IsEmpty(sDate) Or DateDiff("d",sDate,Now())>1 Then
Application.Lock
Application( "App_XXX") = Now()
Application.UnLock
Dim sDate,filepath,url
sDate = Application("App_XXX")
If IsEmpty(sDate) Or DateDiff("d",sDate,Now())>1 Then
Application.Lock
Application( "App_XXX") = Now()
Application.UnLock
'生成代码开始
filepath="index.html"
url="http://"&Request.ServerVariables("HTTP_HOST")&"/index_mb.asp"
set http=Server.createobject("Msxml2.XMLHTTP")
http.open "GET",url,false
http.send()
set objStream = Server.CreateObject("ADODB.Stream")
objStream.type = 1
objStream.open
objstream.write http.responseBody
objstream.SaveToFile server.mappath(filepath),2
objstream.close
'生成代码结束
End If
%>