禁止盜連
＜%
c1="http://網址"
v1=Request.ServerVariables("HTTP_REFERER")
s1 = InStr(v1,c1)
'response.Write(s1)
'response.write(v1)
if v1 =1 then
else
session("msg") = "請勿盜連"
response.redirect("error.asp")
CloseDatabase
end if
%＞
文章標籤
全站熱搜
- 7月 25 週三 200716:30
禁止盜連