推荐:解读提高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隐藏下载地址及防盗代码以下为引用的内容: