BellaOnline Forums Computers ASP Force download script

I've followed the directions for the Force Download Dialog box but I receive an error message:

Internet Explorer was not able to open this Internet site. The requested site is either unavailable or cannot be found. Please try again later.


Microsoft suggested I remove the AddHeader line which I did. (more documentation here )

I'm still receiving the same error. I'm very new to ASP and the little html I know is self-taught. Any assistance would be greatly appreciated!

40 views and no responses???

Sorry about that. for some reason, I do not get a notification when a new post is placed. this is being worked out. With that said....

What is the error you are getting?

Thanks, Chris!

I've been testing this with a .doc file. The dialog box opens but when I try to 'save' I receive the error: "Internet Explorer was not able to open this Internet site. The requested site is either unavailable or cannot be found. Please try again later."

If I choose open, I receive the error: "Internet Explorer cannot download file.doc from xpressassistant.com. The requested site is either unavailable or cannot be found. Please try again later."

I don't know if it matters but I'm using shared windows hosting thru godaddy, running asp.net 2.0. Previously I had asp 1.1 but received the same errors.

Also, I have a data file specific to my client's software. It has a .bku extension. When I try to download or open that file, I receive the following:

" <font face="Arial" size=2>
<p>ADODB.Stream</font> <font face="Arial" size=2>error '800a0bba'</font>
<p>
<font face="Arial" size=2>File could not be opened.</font>
<p>
<font face="Arial" size=2>/filedownloader.asp</font><font face="Arial" size=2>, line 38</font>"

what happens on line 38 of filedownloader.asp?

asp.net is different than asp, you probably have asp1.1 AND asp.net 2.0

This is the script as written by Chris:

<%
'=======================
'Define the names of your functions
'=======================
Dim Stream
Dim Contents
Dim FileName
Dim FileExt
Const adTypeBinary = 1
'=======================
'Get the actual file name from the URL that is passed to the browser
'=======================
FileName = request.querystring("filename") 'Get the name from the URL
'=======================
'GIVE AN ERROR MESSAGE IF THE URL IS EMPTY
'=======================
if FileName = "" Then
response.write "Filename Not specified."
response.end
end if
'=======================
'prevent access to certain files
'=======================
FileExt = Mid(FileName, InStrRev(FileName, ".") + 1)
select case UCase(FileExt)
Case "ASP", "ASA", "ASPX", "ASAX", "MDB"
response.write "You cannot access these file types."
response.end
end select
'=======================
'Start the download process if all is good
'=======================
response.clear
response.contentType = "application/octet-stream"
response.addheader "content-disposition", "attachment; filename=" & FileName
set stream = server.CreateObject("ADODB.Stream")
stream.type = adTypeBinary
stream.open
stream.LoadFromFile Server.MapPath("/files") & FileName
while not stream.EOS
response.BinaryWrite Stream.Read(1024 * 64)
wend
stream.Close
Set stream = Nothing
response.Flush
response.End
%>

So, if asp.net is different does that mean that this script won't execute properly? If so, do you think you could point me in the direction of a script that will work? I really appreciate the assistance.....I've received no response from Chris.

Just fell across this article on Forcing a Download. I really wish to be able to give an option to download a video I have stored on my site. Here are the conditions of my site:
download.asp is stored in folder ipod
videos are stored in ipod/videos/download
when I visit: ipod/download.asp?filename=ClockInOutEnglish_Subs.m4v to download ClockInOutEnglish_Subs.m4v, I get the following:Here is the code I'm using:

I also had problems with this script. I was able to get it mostly working but calling the filename just would now work.. only if I put the actual filename in the server.mappath part. I just could not get it to work with a mappath and then the & FileName part. Drove me mad as it is a nice script and others I have found did not include the file exclusions.

I finally cracked it as below.. on the line

stream.LoadFromFile Server.MapPath("/files") & FileName

I set it thus..

stream.LoadFromFile Server.MapPath(FileName)

Now it works perfectly!

Thanks for the script.. altho it had me tearing what is left of my hair out!

Neil

Hi!

I had the same problems with this and I'm very new to asp, so was completely lost! Neil's solution solved it for me, however I really wanted the files in a separate folder from the asp page. I got round this by replacing

stream.LoadFromFile Server.MapPath("/files") & FileName

with

stream.LoadFromFile Server.MapPath("/files" & FileName)

This works too!

Thanks Neil

Sue