<%
Dim refreshintervaltime
Refreshintervaltime = 3' indicates the number of seconds to prevent refresh. 0 indicates no
If not isempty (Session ("visit") and isnumeric (Session ("visit") and INT (refreshintervaltime)> 0 then
If (timer ()-int (Session ("visit") * 1000 <refreshintervaltime * 1000 then
Response. Write ("<meta http-equiv =" "refresh" "content =" & refreshintervaltime & ""/> ")
Response. Write ("refreshing too fast, please wait ")
Session ("visit") = timer ()
Response. End
End if
End if
Session ("visit") = timer ()
%> <! Doctype HTML public "-// W3C // dtd html 4.01 transitional // en">
<HTML>
<Head>
<Title> How does ASP prevent frequent page refreshes? -wwww.zhangpeng.com.cn </title>
<Meta http-equiv = "Content-Type" content = "text/html; charset = gb2312">
<LINK rel = "stylesheet" type = "text/CSS" href = "style.css">
<Style type = "text/CSS">
</Style>
</Head>
<Body style = "background-color: #666666; font-size: 36pt; font-family:; color: # ffffff;">
How does ASP prevent frequent page refreshes? -www.zhangpeng.com.cn
</Body>
</Html>