怎么防止网页的内容被别人采集,非法的访问你的网站

<%
\'****************************************
\'           怎么防止网页的内容被别人采集,非法的访问你的网站           
\'****************************************
dim onlyURL,from    \'***指定来源网址...
onlyURL="http://127.0.0.1/"
from=trim(request.serverVariables("HTTP_REFERER"))
if from="" then   \'***来源为空:可能是直接输入网址或小偷...    
response.write "<div style=’display:none’><p>拒绝小偷!!!"   
response.write "<p>来自:" & from     
response.write "<p>请访问:<a href=\'" & onlyURL & "\'>" & onlyURL &"</a>"    
response.write "<p><form name=’blankForm’ method=get action=’’></form>"    
response.write "<p><script language=""JavaScript"">blankForm.submit()</script>" & vbCRLF    
response.end
else
if inStr(from,onlyURL)<>1 then           
   \' ***非指定来源:盗链...      
   response.write "<div style=’display:none’><p>拒绝盗链!!!"        
   response.write "<p>来自:" & from         
   response.write "<p>请访问:<a href=’" & onlyURL & "’>" & onlyURL &"</a>"        
   response.write "<p><form name=’blankForm’ method=get action=’’></form>"       
   response.write "<p><script language=""JavaScript"">blankForm.submit()</script>"        
   response.end
else          \'***来源正常,将访问后面的内容...   
  
end if
end if
%>