method 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
"
This page is used in this page, please do not in
"
&
Shuaxin_time
&
"
Continuous refreshing in seconds This page
is open, please wait ...
"
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
%
>
Method 2:
<
%
DIM
URL
IF
Datediff
(
"
s
"
, Request.cookies
"
Oesun
"
) (
"
VitiStime
"
),
NOW
())
<
2
THEN
URL
=
Request.SerVariables
"
HTTP_REFERER
"
) Response.write
"
"
&
URL
&
"
""
"
) Response.write
"
Anti-reflection, automatic jump after two seconds
"
.) Response.
End
End
IF
Response.cookies
"
Oesun
"
) (
"
VitiStime
"
)
=
NOW
()%
>
