close
禁止盜連
<%
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
%>
arrow
arrow
    全站熱搜

    jpluvali 發表在 痞客邦 留言(0) 人氣()