DNF每日签到送豪
lol7月神秘商店
LOL黑市乱斗怎么
LOL英雄成就标志相关资讯
本类常用软件
-
福建农村信用社手机银行客户端下载下载量：584204
-
Windows优化大师下载量：416896
-
90美女秀(视频聊天软件)下载量：366961
-
广西农村信用社手机银行客户端下载下载量：365699
-
快播手机版下载量：325855
骑自行车的正确
在校大学生该如
微信朋友圈怎么下面给大家介绍两种关于ASP禁止刷新当前页面的方法，希望能帮助到大家。
方法1:
<%
Dim SplitReflashPage
Dim DoReflashPage
dim shuaxin_time
DoReflashPage=true
shuaxin_time=10
ReflashTime=Now()
if (not isnull(session("ReflashTime"))) and cint(shuaxin_time)>0 and DoReflashPage then
if DateDiff("s",session("ReflashTime"),Now())<cint(shuaxin_time) then
response.write "<META http-equiv=Content-Type content=text/html; charset=gb2312><meta HTTP-EQUIV=REFRESH CONTENT=3>本页面起用了防刷新机制，请不要在<b><font color=ff0000>"&shuaxin_time&"</font></b>秒内连续刷新本页面<BR>正在打开页面，请稍候……"
response.end
else
session("ReflashTime")=Now()
end if
elseif isnull(session("ReflashTime")) and cint(shuaxin_time)>0 and DoReflashPage then
Session("ReflashTime")=Now()
end if
randomize timer
regjm=int(rnd*8998)+1000
%>
方法2:
<%
Dim URL
If DateDiff("s",Request.Cookies("oesun")("vitistime"),Now())<2 Then
URL=Request.ServerVariables("Http_REFERER")
Response.Write("<meta http-equiv=""refresh"" content=""2;URL="&URL&""">")
Response.Write("防刷新,两秒后自动跳转")
Response.End
End IF
Response.Cookies("oesun")("vitistime")=Now()
%>