有时候我们不想客户频繁的刷新我们的网站,我们可以用一段代码去判断下,如果客户频繁刷新,就会提示客户。下面青岛星网跟大家分享下实现方法。
<% dim RefreshIntervalTime RefreshIntervalTime = 5 '防止刷新的时间秒数,0表示不防止 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 ("刷新过快,请稍候") 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>asp防止网页频繁刷新</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <style type="text/css"> </style> </head> <body> 页面内容,连续刷新看下效果吧 </body> </html>