知识大全 用Asp隐藏文件路径,实现防盗链

Posted 文件

篇首语：少年乘勇气，百战过乌孙。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 用Asp隐藏文件路径,实现防盗链相关的知识，希望对你有一定的参考价值。

用Asp隐藏文件路径,实现防盗链  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　如果我们知道一个静态文件的实际路径如 如果服务器没有作特别的限制设置 我们就可以毫不费力的把它下载下来！当网站提供 windows pdf下载时 怎么样才能让下载者无法得到他的实际路径呢！本文就来介绍如何使用Asp来隐藏文件的实际下载路径  　　我们在管理网站文件时 可以把扩展名一样的文件放在同一个目录下 起一个比较特别名字 例如放pdf文件目录为the_pdf_file_s 把下面代码另存为down asp 他的网上路径为 我们就可以用?FileName= windows pdf来下载这个文件了 而且下载者无法看到这个文件实际下载路径的！在down asp中我们还可以设置下载文件是否需要登陆 判断下载的来源页是否为外部网站 从而可以做到防止文件被盗链  示例代码:<% From_url = Cstr(Request ServerVariables( HTTP_REFERER )) Serv_url = Cstr(Request ServerVariables( SERVER_NAME )) if mid(From_url len(Serv_url)) <> Serv_url then response write  非法链接！   防止盗链 response end end if if Request Cookies( Logined )=  then response redirect  /login asp   需要登陆！ end if Function GetFileName(longname) /folder /folder /file asp=>file asp while instr(longname / ) longname = right(longname len(longname) ) wend GetFileName = longname End Function Dim Stream Dim Contents Dim FileName Dim TrueFileName Dim FileExt Const adTypeBinary =   FileName = Request QueryString( FileName ) if FileName =   Then Response Write  无效文件名！  Response End End if FileExt = Mid(FileName  InStrRev(FileName   ) +  ) select Case UCase(FileExt) Case  ASP   ASA   ASPX   ASAX   MDB  Response Write  非法操作！  Response End End select Response Clear if lcase(right(FileName ))= gif  or lcase(right(FileName ))= jpg  or lcase(right(FileName ))= png  then Response ContentType =  image/*   对图像文件不出现下载对话框 else Response ContentType =  application/ms download  end if Response AddHeader  content disposition   attachment; filename=  & GetFileName(Request QueryString( FileName )) Set Stream = server createObject( ADODB Stream ) Stream Type = adTypeBinary Stream Open if lcase(right(FileName ))= pdf  then  设置pdf类型文件目录 TrueFileName =  /the_pdf_file_s/ &FileName end if if lcase(right(FileName ))= doc  then  设置DOC类型文件目录 TrueFileName =  /my_D_O_C_file/ &FileName end if 

if lcase(right(FileName ))= gif  or lcase(right(FileName ))= jpg  or lcase(right(FileName ))= png  then TrueFileName =  /all_images_/ &FileName  设置图像文件目录 end if Stream LoadFromFile Server MapPath(TrueFileName) While Not Stream EOS Response BinaryWrite Stream Read(  *  ) Wend Stream Close Set Stream = Nothing Response Flush Response End %> cha138/Article/program/net/201311/11977

相关参考

知识大全 asp.net中利用ashx实现图片防盗链的原理分析

直接分析盗链原理看下面用watch截获的发送的数据GET/Imgashx?img=svn_workgifHTTP/Accept:*/*Referer:AcceptLanguage:zhcnUACPU:

知识大全 ASP隐藏下载地址及防盗代码

ASP隐藏下载地址及防盗代码  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！　　以下为引用的内容&l

知识大全 ASP.NET防盗链演示代码

ASP.NET防盗链演示代码  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！　　<%@WebH

知识大全 .htaccess图片防盗链

有朋友会问怎么创建htaccess文件呢在win下是不可以的我们得借助其它系统直接新建一个htaccess文件然后保存到网站要目录就OK了htaccess图片防盗链有朋友会问怎么创建htaccess文

知识大全 ASP.NET MVC和代码隐藏文件

ASP.NETMVC和代码隐藏文件  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！　　ASPNETM

知识大全 asp.net获取控制台应用程序路径

　　获取当前程序文件的路径也算是一个比较常见的需求比如我有一个文件connxml位于exe的同一目录在运行时需要从中读取一些设置信息　　stringstr=ProcessGetCurrentProce

知识大全 nginx实现防盗链配置方法介绍

有些朋友觉得防盗链就是防止图片其实有很多东西要进行防盗链了下面我来介绍在nginx中实现防盗链配置方法有对图片防盗链与下载资源等防盗链配置假设网站域名是编辑nginxconf在区域添加如下内容&nbs

知识大全 破解防盗链图片的php函数

　　现在很多网站和论坛的图片都在使用防盗链技术既然有防盗链那么肯定就有破解防盗链的方法啦下面小编就来为你提供一个破解防盗链图片的php函数不过只支持jpg和gif哦如果想支持多种图处格式大家可以做下修

知识大全 怎样用DOS命令查看隐藏文件

怎样用DOS命令查看隐藏文件？  以下文字资料是由(本站网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！怎样用DOS命令查看隐藏

知识大全 rewrite 技术实现 Apache 防盗链

rewrite技术实现Apache防盗链  以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！rewrit