zoukankan      html  css  js  c++  java
  • chopping file while sending it via asp response.binary write

    chopping file while sending it via asp response.binary write
    hi everyone. i use asp to send files to users to prevent hotlinking and i
    always used following code



    Response.ContentType="video/3gpp"
    response.addheader "Content-Disposition", "attachment;filename="& file
    & ";"
    Set objStream = Server.CreateObject("ADODB.Stream")
    objStream.Open
    objStream.Type = 1
    objStream.LoadFromFile "c:\my.file"
    Response.BinaryWrite objStream.Read
    objStream.Close
    Set objStream = Nothing



    none of the files bigger than 4 mb. but today i have read read following
    (couple posts below)





    Sub SendFileToResponse(FilePath, FileName)

    Const clChunkSize = 1048576 ' 1MB

    Dim oStream, i
    Response.Buffer = False

    Response.ContentType = "application/octet-stream"
    Response.AddHeader "Content-Disposition", _
    "attachment; Filename=" & FileName

    Set oStream = Server.CreateObject("ADODB.Stream")
    oStream.Type = 1 ' Binary
    oStream.Open
    oStream.LoadFromFile FilePath

    For i = 1 To oStream.Size \ clChunkSize
    Response.BinaryWrite oStream.Read(clChunkSize)
    Next
    If (oStream.Size Mod clChunkSize) <0 Then
    Response.BinaryWrite oStream.Read(oStream.Size Mod
    clChunkSize)
    End If
    oStream.Close

    End Sub




    so my question is which one is better and more efficient? in my case only
    mobile phones used to download and i am not sure if copping files could
    couse problem.
  • 相关阅读:
    字符串练习
    python基础
    熟悉常用的Linux操作
    大数据概述
    递归下降分析程序
    自动机
    词法语法分析1
    关于我对编译原理的理解
    6小时学会TypeScript入门实战教程(大地)
    kotlin
  • 原文地址:https://www.cnblogs.com/MaxWoods/p/943324.html
Copyright © 2011-2022 走看看