防提交的页面不是本网站（非法链接到网站）

<%
  From_url  =   Cstr (Request.ServerVariables( " HTTP_REFERER " )) 
  Serv_url  =   Cstr (Request.ServerVariables( " SERVER_NAME " )) 
   if   mid (From_url, 8 , len (Serv_url))  <>  Serv_url  then  
  response.write  " 非法链接！ "   ' 防止盗链
  response.end 
   end   if  
%>