防止 本地 提交 表单 跨域

v1=Cstr(Request.ServerVariables("HTTP_REFERER"))

v2=Cstr(Request.ServerVariables("SERVER_NAME"))

if mid(v1,8,len(v2))<>v2 then

response.write "<br><br><center><table border=1 cellpadding=20 bordercolor=black bgcolor=#EEEEEE width=450>"

response.write "<tr><td style='font:9pt Verdana'>"

response.write "你提交的路径有误，禁止从站点外部提交数据"

response.write "</td></tr></table></center>"

response.end

end if