有用如下Microsoft.XMLHTTP的方法生成静态页面，
但此方法有个弊端，在修改数据库内容后立刻调用生成的静态页面读不到最新数据
典型的就是在后台修改新闻内容页后，立刻生成修改后的页面，数据不能及时更新。
解决方法加上延迟就可以
<%
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) %>
使用说明：
<% TimeDelaySeconds(2) %>
加在调用Microsoft.XMLHTTP前面即可，中间一段是此函数体，
放在当前页
|
