推薦：解讀提高MSSQL和ACCESS兼容性的方法
大家都知道ASP當中，最常用到的是ACCESS和MSSQL兩個數據庫。很多程序都想開發成兩個數據庫都可以使用的模式，但是礙于兩個數據庫得一些SQL語句不一致，所以導致很多程序都分兩個沒有必要的版本，就是ACCESS和MSSQL版！而事實上，我們可以通過對代碼判斷和識

自己寫了一段防小偷采集的代碼,與大家交流交流!

用法:
單獨保存一個文件如(no.asp);
在相應的asp頁面頭部用<!--#include file="no.asp" -->加入即可!

<%
'****************************************
'* 網頁防采集實現 *
'****************************************
dim onlyURL,from

'***指定來源網址...
onlyURL="/"

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
%>

來源：CSDN

分享：解析ASP隱藏下載地址及防盜代碼
以下為引用的內容：