asp.net 文件防盗链

发布网友发布时间：2022-05-16 22:42

共2个回答

懂视网时间：2022-05-17 03:04

Step.1：创建文件 CustomHandler.cs，代码如下：
代码如下:
using System;
using System.Web;

namespace CustomHandler{
public class JpgHandler : IHttpHandler{
public void ProcessRequest(HttpContext context){
// 获取文件服务器端物理路径
string FileName = context.Server.MapPath(context.Request.FilePath);
// 如果UrlReferrer为空，则显示一张默认的禁止盗链的图片
if (context.Request.UrlReferrer.Host == null){
context.Response.ContentType = "image/JPEG";
context.Response.WriteFile("/error.jpg");
}else{
// 如果 UrlReferrer中不包含自己站点主机域名，则显示一张默认的禁止盗链的图片
if (context.Request.UrlReferrer.Host.IndexOf("yourdomain.com") > 0){
context.Response.ContentType = "image/JPEG";
context.Response.WriteFile(FileName);
}else{
context.Response.ContentType = "image/JPEG";
context.Response.WriteFile("/error.jpg");
}
}
}

public bool IsReusable{
get{ return true; }
}
}
}

Step.2 编译这个文件
代码如下:
csc /t:library /r:System.Web.dll CustomHandler.cs

Step.3 将编译好的 CustomHandler.dll 拷贝到站点的 Bin 目录下。
Step.4 在Web.Config 中注册这个Handler。
代码如下:

OK，诸位可以按步骤自行测试一下，这里就不赘述了。

热心网友时间：2022-05-17 00:12

http://www.xx.com/download/gindy.pdf，如果服务器没有作特别的*设置，我们就可以毫不费力的把它下载下来！当网站提供51windows.pdf下载时，怎么样才能让下载者无法得到他的实际路径呢！慢慢往下看。　　我们在管理网站文件时，可以把扩展名一样的文件放在同一个目录下，起一个比较特别名字，例如放pdf文件目录为the_pdf_file_s，把下面代码另存为down.ASP，他的网上路径为 http://www.xx.com/down.ASP，我们就可以用 http://www.xx.com/down.ASP?FileName=gindy.pdf来下载这个文件了，而且下载者无法看到这个文件实际下载路径的！在down.ASP中我们还可以设置下载文件是否需要登陆，判断下载的来源页是否为外部网站，从而可以做到防止文件被盗链。示例代码：<%From_url = Cstr(Request.ServerVariables("HTTP_REFERER"))Serv_url = Cstr(Request.ServerVariables("SERVER_NAME"))if mid(From_url,8,len(Serv_url)) <> Serv_url thenresponse.write "非法链接！" '防止盗链response.endend ifif Request.Cookies("Logined")="" thenresponse.redirect "/login.ASP" '需要登陆！end ifFunction GetFileName(longname)'/folder1/folder2/file.ASP=>file.ASPwhile instr(longname,"/")longname = right(longname,len(longname)-1)wendGetFileName = longnameEnd FunctionDim StreamDim ContentsDim FileNameDim TrueFileNameDim FileExtConst adTypeBinary = 1FileName = Request.QueryString("FileName")if FileName = "" ThenResponse.Write "gindy,无效文件名！"Response.EndEnd ifFileExt = Mid(FileName, InStrRev(FileName, ".") 1)Select Case UCase(FileExt)Case "ASP", "ASA", "ASPX", "ASAX", "MDB"Response.Write "非法操作！"Response.EndEnd SelectResponse.Clearif lcase(right(FileName,3))="gif" or lcase(right(FileName,3))="jpg" or lcase(right(FileName,3))="png" thenResponse.ContentType = "image/*" '对图像文件不出现下载对话框elseResponse.ContentType = "application/ms-download"end ifResponse.AddHeader "content-disposition", "attachment; filename=" & GetFileName(Request.QueryString("FileName"))Set Stream = server.CreateObject("ADODB.Stream")Stream.Type = adTypeBinaryStream.Openif lcase(right(FileName,3))="pdf" then '设置pdf类型文件目录TrueFileName = "/the_pdf_file_s/"&FileNameend if if lcase(right(FileName,3))="doc" then '设置DOC类型文件目录TrueFileName = "/my_D_O_C_file/"&FileNameend ifif lcase(right(FileName,3))="gif" or lcase(right(FileName,3))="jpg" or lcase(right(FileName,3))="png" thenTrueFileName = "/all_images_/"&FileName '设置图像文件目录end ifStream.LoadFromFile Server.MapPath(TrueFileName)While Not Stream.EOSResponse.BinaryWrite Stream.Read(1024 * 64)WendStream.CloseSet Stream = NothingResponse.FlushResponse.End%>