Why won't my download ever end?

[Jerry Camel]

I thought I had finally figured out how to control the downloads from my page. I was having issues with large files, but after much research I came up with the following code. The download seems to proceed without issue, but never terminiates. The byte count stops incrementing, but the dowload dialog never closes. (Until I hit cancel.) What's keeping the download from ending properly? I'm pretty close to finishing this app - any help is greatly appreciated. Thanks.

Dim fStream As FileStream
Dim bytesToGo As Long
Dim bytesRead As Long
Dim byteBuffer(1048 576) As Byte

fStream = New FileStream("C:\ DepotRoot\" & e.CommandArgume nt(), FileMode.Open, _
FileAccess.Read , FileShare.Read)
bytesToGo = fStream.Length
Response.Buffer Output = False
Response.Clear( )
Response.ClearC ontent()
Response.ClearH eaders()
Response.Conten tType = "applicatio n/octet-stream"
Response.Append Header("Content-Disposition", "attachment ; filename=""" & _
dr("FileName") & """")
Response.Flush( )
While (bytesToGo > 0)
If (Response.IsCli entConnected) Then
bytesRead = fStream.Read(by teBuffer, 0, 1048576)
Response.Output Stream.Write(by teBuffer, 0, bytesRead)
Response.Flush( )
bytesToGo -= bytesRead
Else
bytesToGo = -1
End If
End While

Response.Flush( ) 'This is kinda redundant, but it was worth a shot.
fStream.Close() 'Close the stream on the server side.
Response.End() 'Shouldn't this tell the browser to stop trying to download?
Thanks again!

- Jerry

[Earl Teigrob]

WriteFile blows up when using very large files (500m+). It tries to buffer the entire file to the server before sending, gives no notice to the user, takes forever and finally crashed the server. A slight problem...
"Eric Lawrence [MSFT]" <e_********@hot mail.com> wrote in message news:O8******** ********@tk2msf tngp13.phx.gbl. ..
Any reason not to just use the WriteFile method?

--
Thanks,

Eric Lawrence
Program Manager
Assistance and Worldwide Services

This posting is provided "AS IS" with no warranties, and confers no rights.

"Jerry Camel" <rl*****@msn.co m> wrote in message news:uo******** ******@tk2msftn gp13.phx.gbl...
I thought I had finally figured out how to control the downloads from my page. I was having issues with large files, but after much research I came up with the following code. The download seems to proceed without issue, but never terminiates. The byte count stops incrementing, but the dowload dialog never closes. (Until I hit cancel.) What's keeping the download from ending properly? I'm pretty close to finishing this app - any help is greatly appreciated. Thanks.

Dim fStream As FileStream
Dim bytesToGo As Long
Dim bytesRead As Long
Dim byteBuffer(1048 576) As Byte

fStream = New FileStream("C:\ DepotRoot\" & e.CommandArgume nt(), FileMode.Open, _
FileAccess.Read , FileShare.Read)
bytesToGo = fStream.Length
Response.Buffer Output = False
Response.Clear( )
Response.ClearC ontent()
Response.ClearH eaders()
Response.Conten tType = "applicatio n/octet-stream"
Response.Append Header("Content-Disposition", "attachment ; filename=""" & _
dr("FileName") & """")
Response.Flush( )
While (bytesToGo > 0)
If (Response.IsCli entConnected) Then
bytesRead = fStream.Read(by teBuffer, 0, 1048576)
Response.Output Stream.Write(by teBuffer, 0, bytesRead)
Response.Flush( )
bytesToGo -= bytesRead
Else
bytesToGo = -1
End If
End While

Response.Flush( ) 'This is kinda redundant, but it was worth a shot.
fStream.Close() 'Close the stream on the server side.
Response.End() 'Shouldn't this tell the browser to stop trying to download?
Thanks again!

- Jerry

[Earl Teigrob]

When using Writefile, the entire file is cached to the server before the dialog box is displayed, which can take a long time on large files...(if the server does not crash, of course)
"Jerry Camel" <rl*****@msn.co m> wrote in message news:uw******** ********@TK2MSF TNGP10.phx.gbl. ..
The dialog seems to pop up pretty quickly. Why? Is that another known issue?

How do I get ahold of the "very messy and complex way"?

Jerry
"Earl Teigrob" <ea******@hotma il.com> wrote in message news:%2******** **********@TK2M SFTNGP11.phx.gb l...
Jerry,

If you solve this, it will be amazing. I spend days last week researching ths issue and read about developer teams spending months trying to get a solution, and finally did (but in a very messy and complex way). I hope you get it though...we will all be happy!!!

Earl

BTW, with the current solution you have so for, does the dowload dialog pop up to the client right away?

"Jerry Camel" <rl*****@msn.co m> wrote in message news:uo******** ********@tk2msf tngp13.phx.gbl. ..
I thought I had finally figured out how to control the downloads from my page. I was having issues with large files, but after much research I came up with the following code. The download seems to proceed without issue, but never terminiates. The byte count stops incrementing, but the dowload dialog never closes. (Until I hit cancel.) What's keeping the download from ending properly? I'm pretty close to finishing this app - any help is greatly appreciated. Thanks.

Dim fStream As FileStream
Dim bytesToGo As Long
Dim bytesRead As Long
Dim byteBuffer(1048 576) As Byte

fStream = New FileStream("C:\ DepotRoot\" & e.CommandArgume nt(), FileMode.Open, _
FileAccess.Read , FileShare.Read)
bytesToGo = fStream.Length
Response.Buffer Output = False
Response.Clear( )
Response.ClearC ontent()
Response.ClearH eaders()
Response.Conten tType = "applicatio n/octet-stream"
Response.Append Header("Content-Disposition", "attachment ; filename=""" & _
dr("FileName") & """")
Response.Flush( )
While (bytesToGo > 0)
If (Response.IsCli entConnected) Then
bytesRead = fStream.Read(by teBuffer, 0, 1048576)
Response.Output Stream.Write(by teBuffer, 0, bytesRead)
Response.Flush( )
bytesToGo -= bytesRead
Else
bytesToGo = -1
End If
End While

Response.Flush( ) 'This is kinda redundant, but it was worth a shot.
fStream.Close() 'Close the stream on the server side.
Response.End() 'Shouldn't this tell the browser to stop trying to download?
Thanks again!

- Jerry

[Malek]

did you try to use smaller chunks (I have used 2k chunks but I had low user
load and files not really getting over 70Mb)... maybe that could help. If
not, probably you should go with the dotnetjunkies method of using
ISAP+HttpHandle r

"Earl Teigrob" <ea******@hotma il.com> wrote in message
news:%2******** **********@TK2M SFTNGP09.phx.gb l...
WriteFile blows up when using very large files (500m+). It tries to buffer
the entire file to the server before sending, gives no notice to the user,
takes forever and finally crashed the server. A slight problem...
"Eric Lawrence [MSFT]" <e_********@hot mail.com> wrote in message
news:O8******** ********@tk2msf tngp13.phx.gbl. ..
Any reason not to just use the WriteFile method?

--
Thanks,

Eric Lawrence
Program Manager
Assistance and Worldwide Services

This posting is provided "AS IS" with no warranties, and confers no rights.

"Jerry Camel" <rl*****@msn.co m> wrote in message
news:uo******** ******@tk2msftn gp13.phx.gbl...
I thought I had finally figured out how to control the downloads from my
page. I was having issues with large files, but after much research I came
up with the following code. The download seems to proceed without issue,
but never terminiates. The byte count stops incrementing, but the dowload
dialog never closes. (Until I hit cancel.) What's keeping the download
from ending properly? I'm pretty close to finishing this app - any help is
greatly appreciated. Thanks.

Dim fStream As FileStream
Dim bytesToGo As Long
Dim bytesRead As Long
Dim byteBuffer(1048 576) As Byte

fStream = New FileStream("C:\ DepotRoot\" & e.CommandArgume nt(),
FileMode.Open, _
FileAccess.Read , FileShare.Read)
bytesToGo = fStream.Length
Response.Buffer Output = False
Response.Clear( )
Response.ClearC ontent()
Response.ClearH eaders()
Response.Conten tType = "applicatio n/octet-stream"
Response.Append Header("Content-Disposition", "attachment ; filename=""" & _
dr("FileName") & """")
Response.Flush( )
While (bytesToGo > 0)
If (Response.IsCli entConnected) Then
bytesRead = fStream.Read(by teBuffer, 0, 1048576)
Response.Output Stream.Write(by teBuffer, 0, bytesRead)
Response.Flush( )
bytesToGo -= bytesRead
Else
bytesToGo = -1
End If
End While

Response.Flush( ) 'This is kinda redundant, but it was worth a shot.
fStream.Close() 'Close the stream on the server side.
Response.End() 'Shouldn't this tell the browser to stop trying to
download?
Thanks again!

- Jerry