checkpost.asp

来自「网上流行的MOVE站点」· ASP 代码 · 共 19 行

<%dim server_v1,server_v2
chkpost=false
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(server_v1,8,len(server_v2))<>server_v2 then
chkpost=false
else
chkpost=true
end if

if chkpost=false then%>
<script>alert('小子！你想干嘛？不要黑我的程序啊！');</Script>
<script Language=Javascript>location.href = '';</script>"
<%
response.end
end if
%>
</body>
</html>