ASP下载系统防盗链方法
点击次数:20 次 发布日期:2008-11-26 11:11:03 作者:源代码网
|
源代码网推荐 源代码网推荐 打开文件 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 源代码网推荐 源代码网推荐 本站下载系统网址列表 就是访问你下载频道网址里的域名,比如你的下载频道可以用多个网址来访问,所以这里用逗号隔开 源代码网推荐 源代码网推荐 做人要厚道,请注明转自酷网动力(www.ASPCOOL.COM)。 源代码网推荐 源代码网供稿. |
