ASP下载系统防盗链方法 - 月光软件 - 文档中心 - 编程语言

ASP技术

本类阅读TOP10

·解密ASP源代码
·ASP如何获取真实IP地址
·Asp中五种连接数据库的方法
·ASP编程技巧大全[1]
·快速打造留言本教程[1]
·ASP中也能解压缩rar文件
·浅谈如何建立三层体系结构的ASP应用程序（1）
·浅谈如何建立三层体系结构的ASP应用程序（2）
·ASP编程技巧大全[2]
·用ASP发送邮件

→ 精品推荐

ASP下载系统防盗链方法

作者：佚名来源：月光软件站 加入时间：2005-3-1　月光软件站

以动感下载系统为例:

打开文件 SoftDown.Asp 在：
if request.QueryString("ID")="" then
response.write "不能连接或者没有指定下载软件"
response.end
end if
的上面或者是下面加上下列代码

dim strReferer,domain,splDomain,isHttp
isHttp=false

'本站下载系统网址列表，不要带上http://
domain="sron.net,61.156.14.223,61.156.14.227"

splDomain=split(domain,",")
strReferer=Request.ServerVariables("HTTP_REFERER")
for iii = 0 to ubound(splDomain)
if instr(strReferer,trim(splDomain(iii)))>0 then isHttp=True
next
if isnull(strReferer) or isHttp=false then
Response.Write "下载链接来自其他网站，这是不允许的，<a href=""./"">请进入本站页面后再进行下载。</a>"
CloseDatabase
response.end
end if

本站下载系统网址列表就是访问你下载频道网址里的域名，比如你的下载频道可以用多个网址来访问，所以这里用逗号隔开

相关文章：

相关软件：


┊VB 源码┊VC 源码┊ASP源码┊JSP源码┊PHP源码┊CGI源码┊FLASH源码┊素材模板┊C 源程序┊常用软件┊文档中心┊其他程序┊