岁月留声QtAsp

有用如下Microsoft.XMLHTTP的方法生成静态页面，
但此方法有个弊端，在修改数据库内容后立刻调用生成的静态页面读不到最新数据
典型的就是在后台修改新闻内容页后，立刻生成修改后的页面，数据不能及时更新。

 set objXmlHttp=Server.createObject("Microsoft.XMLHTTP") objXmlHttp.open "GET",strUrl,false objXmlHttp.send() binFileData=objXmlHttp.responseBody Set objXmlHttp=Nothing set objAdoStream=Server.CreateObject("Adodb." & "Stream") objAdoStream.Type=1 objAdoStream.Open() objAdoStream.Write(binFileData) objAdoStream.SaveToFile FilePath,2 objAdoStream.Close() set objAdoStream=nothing End Function 
 

 解决方法加上延迟就可以
  <%
  Sub TimeDelaySeconds(DelaySeconds)
  SecCount = 0
  Sec2 = 0
  While SecCount < DelaySeconds + 1
  Sec1 = Second(Time())
  If Sec1 <> Sec2 Then
  Sec2 = Second(Time())
  SecCount = SecCount + 1
  End If
  Wend
  End Sub
  %>
  
  ' To change delay adjust here
  <% TimeDelaySeconds(2) %>