家庭/个人应用

开发平台：

ASP/ASPX

checkpost.asp：源码内容

							<%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%>
小子！你想干嘛？不要黑我的程序啊！
<%
response.end
end if
%>

						