<%
Dimrefreshintervaltime
Обновление времени = 3 'предотвращает освежающие временные секунды, 0 означает не предотвращение
Ifnotisempty (session («посещение»)) andisnumeric (session («посещение»)) и Int (refreshintervaltime)> 0then
if (timer ()-int (session («посещение»))*1000 <Обновление, 1000then
Ответ.
Ответ.
Session («Посещение») = таймер ()
Response.end
эндиф
Эндиф
Session («Посещение») = таймер ()
%> <! Doctypehtmlpublic "-// w3c // dtdhtml4.01transitional // en">
<html>
<голова>
<Title> Асфора, чтобы предотвратить частое обновление веб-страниц-www.zhangpeng.com.cn </title>
<metahttp-equiv = "content-type" content = "text/html; charset = gb2312">
<linkrel = "styleSheet" type = "text/css" href = "style.css">
<styletype = "text/css">
</style>
</head>
<BodyStyle = "фоновый цвет:#6666666; размер шрифта: 36pt; font-family: bold; color: #fffff;">
Асфоу, чтобы предотвратить частое обновление веб -страниц - www.zhangpeng.com.cn
</body>
</html>