asp 防盜鏈代碼(徹底屏蔽迅雷，旋風(fēng)，快車下載站內(nèi)資源)
更新時(shí)間：2010年04月11日 18:16:06 作者：
asp 防盜鏈代碼(徹底屏蔽迅雷，旋風(fēng)，快車下載站內(nèi)資源) ，判斷是不是下載工具下載，是則報(bào)404錯(cuò)誤。
復(fù)制代碼 代碼如下:
<%
'屏蔽主流的下載工具
Dimxurl,xtool
'獲取瀏覽器AGENT
xurl=lcase(Request.ServerVariables("HTTP_USER_AGENT"))
'定義禁止的AGENT，下面5個(gè)包含最新版的快車，旋風(fēng)和迅雷部分版本，可以自行添加！
xtool="mozilla/4.0(compatible;msie5.00;windows98)"&_
"mozilla/4.0(compatible;msie6.0;windows+nt5.0)"&_
"mozilla/4.0(compatible;msie6.0;windowsnt5.1;)"&_
"mozilla/4.0(compatible;msie6.0;windowsnt5.0;.netclr1.1.4322)"&_
"mozilla/4.0(compatible;msie6.0;windowsnt5.0;.netclr3.5.20706)"&_
"mozilla/4.0(compatible;msie6.0;windowsnt5.1;sv1;.netclr1.1.4322;.netclr2.0.50727)"
'判斷AGENT是否合法
IfInStr(xtool,xurl)>0Then
'下載工具直接報(bào)404錯(cuò)誤
Response.Status="404NotFound"
Response.End
EndIf
'其它的代碼在下面
Response.Write"正常瀏覽內(nèi)容，你可以用下載工具測(cè)試下載該頁面看看是否可以下載？"
%>
相關(guān)文章
ASP讀取Request.QueryString編碼的函數(shù)代碼
ASP讀取Request.QueryString編碼的函數(shù)代碼，學(xué)習(xí)asp的朋友可以參考下。2011-09-09
asp 數(shù)組 重復(fù)刪除函數(shù)(腳本之家增強(qiáng)版)
這篇文章是asp下刪除重復(fù)數(shù)組的函數(shù)，已經(jīng)經(jīng)過測(cè)試。2010-05-05
用ASP VBS xmlhttp adodbstream下載和保存圖片的代碼
用ASP VBS xmlhttp adodbstream下載和保存圖片的代碼...2007-03-03
ASP 遞歸調(diào)用 已知節(jié)點(diǎn)查找根節(jié)點(diǎn)的函數(shù)
已知節(jié)點(diǎn)查找根節(jié)點(diǎn)的asp函數(shù)2009-12-12
虛擬主機(jī)重啟代碼...2006-12-12
asp下對(duì)POST提交數(shù)據(jù)限制的解決方法
由于微軟對(duì)POST提交數(shù)據(jù)的大小進(jìn)行了限制，當(dāng)表單發(fā)送的數(shù)據(jù)量很大時(shí)，就會(huì)報(bào)錯(cuò)(錯(cuò)誤 "ASP 0107 : 80004005")。原因是微軟對(duì)用Request.Form()可接收的最大數(shù)據(jù)限制為100K字節(jié)。2008-06-06
ASP錯(cuò)誤處理...2007-03-03
Insert Date and Time into Access
Insert Date and Time into Access...2007-04-04
asp中通過addnew添加內(nèi)容后取得當(dāng)前文章的自遞增ID的方法
asp中使用addnew方法添加一條記錄后，我們經(jīng)常使用取得自遞增的ID，而使用bookmark很容易實(shí)現(xiàn)這樣的功能。2011-01-01
把字符串轉(zhuǎn)換成數(shù)據(jù)庫SQL語句格式
把字符串轉(zhuǎn)換成數(shù)據(jù)庫SQL語句格式...2006-10-10