引用时就用:urlcheck就可以了。。
sub urlcheck
if min(request.ServerVariables("HTTP_REFERER"),len(" http://"),len(request.ServerVariables("SERVER_NAME")))<>request.ServerVariables("SERVER_NAME") or request.ServerVariables("HTTP_REFERER")="" then
response.Clear
response.write("<script language=""javascript"">alert(""WARNING!\nURL WRONG!"");history.back();</script>")
response.End
end if
end sub
nike shoes
sub urlcheck
if min(request.ServerVariables("HTTP_REFERER"),len(" http://"),len(request.ServerVariables("SERVER_NAME")))<>request.ServerVariables("SERVER_NAME") or request.ServerVariables("HTTP_REFERER")="" then
response.Clear
response.write("<script language=""javascript"">alert(""WARNING!\nURL WRONG!"");history.back();</script>")
response.End
end if
end sub
nike shoes
转载于:https://blog.51cto.com/naiht/226536