【发布时间】:2014-03-30 20:30:38
【问题描述】:
我有一个经典的 ASP 网站,它需要允许用户下载一个大文件(CSV,20 mb)。该文件存储在 www 根文件夹之外。我在 Stackoverflow 和其他网站上找到了一些代码示例,它们以块的形式发送文件但无法使其工作。 IE和chrome都报错“找不到这个网页”。
这是我拥有的 asp 文件的全部代码。我做错了什么?
<%@ LANGUAGE=VBScript %>
<%
s_getFile "D:\Data\Dev", "laser2.csv", "laser2"
Sub s_getFile(sPath, sfilename, sBaseName)
Response.Buffer = False
Server.ScriptTimeout = 30000
Response.ContentType = "application/octet-stream"
Response.AddHeader "Content-Disposition", "attachment; filename=" & sfilename
Set adoStream = CreateObject("ADODB.Stream")
adoStream.Open()
adoStream.Type = 1
adoStream.LoadFromFile(sPath & "\" & sBaseName)
iSz = adoStream.Size
Response.AddHeader "Content-Length", iSz' may be required
chunk = 2048
For i = 1 To iSz \ chunk
If Not Response.IsClientConnected Then Exit For
Response.BinaryWrite adoStream.Read(chunk)
Next
If iSz Mod chunk > 0 Then
If Response.IsClientConnected Then
Response.BinaryWrite adoStream.Read(iSz Mod chunk)
End If
End If
adoStream.Close
Set adoStream = Nothing
Response.End
End Sub
%>
【问题讨论】:
-
您能否提供一些有关您的环境、操作系统、IIS 版本等的信息?
标签: asp-classic