当前位置:中国站长下载文章中心网页编程.NET编程 → 在ASP.NET中跟踪和恢复大文件下载

在ASP.NET中跟踪和恢复大文件下载

减小字体 增大字体 作者:不详  来源:不详  发布时间:2006-8-14 9:42:59
     HttpHandler类:ZIPHandler
  
    在ASP.NET中映射了.zip扩展名之后,客户端每次向服务器请求.zip文件的时候,IIS调用ZipHandler类的ProcessRequest方法(见下载代码)。
  
    ProcessRequest方法首先建立自定义的FileInformation类(见下载代码)的一个实例,它封装了下载的状态(例如进行中、被中断了等等)。示例把download.zip示例文件的路径硬编码到代码中了。如果把这段代码应用于你自己的应用程序,需要修改它来打开被请求的文件。
  
  
  
  ' 使用objRequest检测请求了哪个文件,用该文件打开objFile。
  ' 例如objFile = New Download.FileInformation(<完整文件名>)
  objFile = New Download.FileInformation( _
  objContext.Server.MapPath("~/download.zip"))
  
  
  
    接下来,程序使用描述的HTTP头信息(如果请求提供了头信息)执幸幌盗械难橹ぜ觳椤K衙恐旨觳槎挤庾霸谛⌒退接泻校绻橹こ晒Φ幕熬头祷豑rue。如果某个验证检查失败了,响应会立即终止,并发送适当的StatusCode值。
  
  
  
  If Not objRequest.HttpMethod.Equals(HTTP_METHOD_GET) Or Not
  objRequest.HttpMethod.Equals(HTTP_METHOD_HEAD) Then
   ' 目前只支持GET和HEAD方法
   objResponse.StatusCode = 501 ' 没有执行
  ElseIf Not objFile.Exists Then
   ' 无法找到被请求的文件
   objResponse.StatusCode = 404 ' 没有找到
  ElseIf objFile.Length > Int32.MaxValue Then
   ' 文件太大了
   objResponse.StatusCode = 413 ' 请求实体太大
  ElseIf Not ParseRequestHeaderRange(objRequest, alRequestedRangesBegin, alRequestedRangesend, _
  objFile.Length, bIsRangeRequest) Then
   ' Range请求中包含无用的实体
   objResponse.StatusCode = 400 ' 无用的请求
  ElseIf Not CheckIfModifiedSince(objRequest,objFile) Then
   ' 实体没有被修改过
   objResponse.StatusCode = 304 ' 没有被修改过
  ElseIf Not CheckIfUnmodifiedSince(objRequest,objFile) Then
   ' 实体在上次被请求的日期之后被修改过
   objResponse.StatusCode = 412 ' 预处理失败
  ElseIf Not CheckIfMatch(objRequest, objFile) Then
   ' 实体与请求不匹配
   objResponse.StatusCode = 412 ' 预处理失败
  ElseIf Not CheckIfNoneMatch(objRequest, objResponse,objFile) Then
   ' 实体的确与none-match请求匹配。
   ' 响应代码位于CheckIfNoneMatch函数中
  Else
   ' 初步检查成功
  
  
  
    这些初步检查的函数中的ParseRequestHeaderRange(见下载代码)检查客户端是否请求了文件范围(这意味着是一个局部下载)。如果被请求的范围是无效的(无效范围指超越文件大小或包含不合理数字的范围数值),该方法把bIsRangeRequest设置为True。如果请求了范围,CheckIfRange方法会验证IfRange头信息。
  
    如果被请求的范围是有效的,代码会计算响应信息的大小。如果客户端请求了多个范围,响应信息大小的数值会包含多部分头部信息长度的数值。
  
    如果不能确定某个发送的头部信息值,程序将把这个下载请求作为最初请求而不是部分下载来处理,从文件的顶部开始发送一个新的下载流。
  
  
  
  If bIsRangeRequest AndAlso CheckIfRange(objRequest, objFile) Then
   ' 这是范围请求
   ' 如果Range数组包含多个实体,它还是一个多部分范围请求
   bMultipart = CBool(alRequestedRangesBegin.GetUpperBound(0)>0)
   ' 进入每个范围来获取整个响应长度
   For iLoop = alRequestedRangesBegin.GetLowerBound(0) To alRequestedRangesBegin.GetUpperBound(0)
    ' 内容的长度(这个范围的)
    iResponseContentLength += Convert.ToInt32(alRequestedRangesend( _
  iLoop) - alRequestedRangesBegin(iLoop)) + 1
    If bMultipart Then
     ' 如果是多部分范围请求,计算出将发送的中间头信息的长度
     iResponseContentLength += MULTIPART_BOUNDARY.Length
     iResponseContentLength += objFile.ContentType.Length
     iResponseContentLength += alRequestedRangesBegin(iLoop).ToString.Length
     iResponseContentLength += alRequestedRangesend(iLoop).ToString.Length
     iResponseContentLength += objFile.Length.ToString.Length
     ' 49是多部分下载中换行和其它必要的字符的长度
     iResponseContentLength += 49
    End If
   Next iLoop
  
   If bMultipart Then
    ' 如果是多部分范围请求,
    ' 我们还必须计算出将发送的最后一个中间头信息的长度
    iResponseContentLength +=MULTIPART_BOUNDARY.Length
    ' 8 是破折号和换行符的长度
    iResponseContentLength += 8
   Else
    ' 不是多部分下载,因此我们必须说明初始HTTP头信息的响应范围
    objResponse.AppendHeader( HTTP_HEADER_CONTENT_RANGE, "bytes " & _
    alRequestedRangesBegin(0).ToString & "-" & _
    alRequestedRangesend(0).ToString & "/" & _
    objFile.Length.ToString)
    'End If
    ' 范围响应
    objResponse.StatusCode = 206 ' 局部响应
   Else
    ' 这不是范围请求,或者被请求的范围实体ID与当前的实体ID不匹配,
    ' 因此开始新的下载
    ' 指明文件完成部分的大小等于内容的长度
    iResponseContentLength =Convert.ToInt32(objFile.Length)
    ' 返回正常的OK状态
    objResponse.StatusCode = 200
   End If
   ' 接下来服务器必须发送几个重要的响应头信息,例如内容长度、Etag、和文件的内容类型:
   ' 把内容长度写入响应
   objResponse.AppendHeader( HTTP_HEADER_CONTENT_LENGTH,iResponseContentLength.ToString)
   ' 把最后修改日期写入响应
   objResponse.AppendHeader( HTTP_HEADER_LAST_MODIFIED,objFile.LastWriteTimeUTC.ToString("r"))
   ' 告诉客户端软件我们接受了范围请求
   objResponse.AppendHeader( HTTP_HEADER_ACCEPT_RANGES,HTTP_HEADER_ACCEPT_RANGES_BYTES)
   ' 把文件的实体标签写入响应(用引号括起来)
   objResponse.AppendHeader(HTTP_HEADER_ENTITY_TAG, """" & objFile.EntityTag & """")
   ' 把内容类型写入响应
   If bMultipart Then
    ' 多部分消息有这种特殊的类型
    ' 在例子中文件实际的mime类型在以后才写入响应
    objResponse.ContentType = MULTIPART_CONTENTTYPE
   

[1] [2]  下一页