asp 防止外部提交表单，网页

server_v1 = CStr(Request.ServerVariables("HTTP_REFERER"))
server_v2 = CStr(Request.ServerVariables("HTTP_HOST"))
If Mid(server_v1, 8, Len(server_v2))<>server_v2 Then
    Response.Write "<script>alert('警告！你正在从外部提交数据！！请立即终止！！\n你的IP已经被记录，如果再次来,XXX');</script>"
    Response.Redirect "http://www.yongfa365.com/"
End If