Recommended: Interpreting ways to improve MSSQL and ACCESS compatibility As we all know, in ASP, the most commonly used databases are ACCESS and MSSQL. Many programs want to develop into a pattern that can be used by both databases, but due to the inconsistent SQL statements of the two databases, many programs are divided into two unnecessary versions, namely ACCESS and MSSQL versions! In fact, we can judge and recognize the code
I wrote a code I collected from thieves and communicated with you!
usage:
Save a file separately such as (no.asp);
Just add it with <!--#include file=no.asp --> at the head of the corresponding asp page!
<%
'*********************************************
'* Web page prevention and collection implementation*
'*********************************************
dim onlyURL,from
'***Specify the source URL...
onlyURL=/
from=trim(request.serverVariables(HTTP_REFERER))
if from= then
'***Source is empty: You may enter the URL or the thief directly...
response.write <div style='display:none'><p>Reject thieves!!!
response.write <p>From: & from
response.write <p>Please visit:<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
'***Not specified source: Link thief...
response.write <div style='display:none'><p>Reject link thieves!!!
response.write <p>From: & from
response.write <p>Please visit:<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
'***The source is normal, the following content will be accessed...
end if
end if
%>
Source: CSDN
Share: parse ASP hidden download address and anti-theft code The following is the quoted content: