How to Prevent webpage content from being collected by others

<%
'*************************************** *
'How can we prevent webpage content from being collected by others and illegally access your website?
'*************************************** *
Dim onlyURL, from '*** specifies the source URL...
OnlyURL = "http: // 127.0.0.1 /"
From = trim (request. serverVariables ("HTTP_REFERER "))
If from = "" then' **** the source is blank: the URL or thief may be entered directly...
Response. write "<div style = 'display: none'> <p> reject thieves !!! "
Response. write "<p> from:" & from
Response. write "<p> visit: <a href = '" & onlyURL & "'>" & onlyURL & "</a>"
Response. write "<p> <form name = 'blance' method = get action =''> </form>"
Response. write "<p> <script language =" "JavaScript" "> blankForm. submit () </script>" & vbCRLF
Response. end
Else
If inStr (from, onlyURL) <> 1 then
'*** Unspecified source: leeching...
Response. write "<div style = 'display: none'> <p> reject leeching !!! "
Response. write "<p> from:" & from
Response. write "<p> visit: <a href = '" & onlyURL & "'>" & onlyURL & "</a>"
Response. write "<p> <form name = 'blance' method = get action =''> </form>"
Response. write "<p> <script language =" "JavaScript" "> blankForm. submit () </script>"
Response. end
Else '*** the source is normal, and the following content will be accessed...

End if
End if
%>