For Programmers: Free Programming Magazines  


Home > Archive > ASP > December 2004 > prompt "Save as" dialog for image









You are viewing an archived Text-only version of the thread. To view this thread in it's original format and/or if you want to reply to this thread please [click here]

 

Author prompt "Save as" dialog for image
dave

2004-11-19, 3:55 am

Hi there
I'm trying to force save as dialogue using this code in download.asp..but
when it runs it prompts for download.asp to save or open.

code snippet (from aspfaq.com)

Response.ContentType = "application/x-unknown" ' arbitrary
fn = "wallpaper_1_1.jpg"
Response.write "<br>" & Server.MapPath("wallpaper") & "<br>"
FPath = Server.MapPath("wallpaper") & fn
Response.AddHeader "Content-Disposition","attachment; filename=" & fn

Set adoStream = CreateObject("ADODB.Stream")
adoStream.Open()
adoStream.Type = 1
adoStream.LoadFromFile(FPath)
Response.BinaryWrite adoStream.Read()
adoStream.Close
Set adoStream = Nothing


I want this page to prompt save image option, not page itself.

Any help would be appreciated!!!


Ray Costanzo [MVP]

2004-11-19, 3:55 am

Are you accessing the page via http? Like, you're going to
http://localhost/download.asp as opposed to C:\Inetpub\wwwroot\download.asp?

Ray at work


"dave" <forged@foo.netREMOVE> wrote in message
news:%232ZC2QdzEHA.2804@TK2MSFTNGP15.phx.gbl...
> Hi there
> I'm trying to force save as dialogue using this code in download.asp..but
> when it runs it prompts for download.asp to save or open.
>
> code snippet (from aspfaq.com)
>
> Response.ContentType = "application/x-unknown" ' arbitrary
> fn = "wallpaper_1_1.jpg"
> Response.write "<br>" & Server.MapPath("wallpaper") & "<br>"
> FPath = Server.MapPath("wallpaper") & fn
> Response.AddHeader "Content-Disposition","attachment; filename=" & fn
>
> Set adoStream = CreateObject("ADODB.Stream")
> adoStream.Open()
> adoStream.Type = 1
> adoStream.LoadFromFile(FPath)
> Response.BinaryWrite adoStream.Read()
> adoStream.Close
> Set adoStream = Nothing
>
>
> I want this page to prompt save image option, not page itself.
>
> Any help would be appreciated!!!
>
>



dave

2004-11-19, 3:55 am

yes
i m accessling thru http:
http://localhost/download.asp
and its asking me open, save,cancel options
dave

"Ray Costanzo [MVP]" <my first name at lane 34 dot commercial> wrote in
message news:Ofg8BWdzEHA.1300@TK2MSFTNGP14.phx.gbl...
> Are you accessing the page via http? Like, you're going to
> http://localhost/download.asp as opposed to

C:\Inetpub\wwwroot\download.asp?
>
> Ray at work
>
>
> "dave" <forged@foo.netREMOVE> wrote in message
> news:%232ZC2QdzEHA.2804@TK2MSFTNGP15.phx.gbl...
download.asp..but[color=darkred]
>
>



Ray Costanzo [MVP]

2004-11-19, 3:55 am

Do you have an On Error Resume Next? Well, regardless, a couple of changes
will be necessary.

When you Response.write FPath, did you notice that there was no \ between
the directory name and the filename? You'll need that. Also, make sure you
do not leave the Response.Write code in there when you get this working.
Try this code:

Response.ContentType = "application/x-unknown" ' arbitrary
fn = "wallpaper_1_1.jpg"
'Response.write "<br>" & Server.MapPath("wallpaper") & "<br>"
FPath = Server.MapPath("wallpaper") & "\" & fn
Response.AddHeader "Content-Disposition","attachment; filename=" & fn

Set adoStream = CreateObject("ADODB.Stream")
adoStream.Open()
adoStream.Type = 1
adoStream.LoadFromFile(FPath)
Response.BinaryWrite adoStream.Read()
adoStream.Close
Set adoStream = Nothing

Ray at home

"dave" <forged@foo.netREMOVE> wrote in message
news:eQbeeqdzEHA.1652@TK2MSFTNGP11.phx.gbl...
> yes
> i m accessling thru http:
> http://localhost/download.asp
> and its asking me open, save,cancel options
> dave
>
> "Ray Costanzo [MVP]" <my first name at lane 34 dot commercial> wrote in
> message news:Ofg8BWdzEHA.1300@TK2MSFTNGP14.phx.gbl...
> C:\Inetpub\wwwroot\download.asp?
> download.asp..but
>
>



dave

2004-11-19, 3:55 am

yeh man, it worked
thanx for help
dev

"Ray Costanzo [MVP]" <my first name at lane 34 dot commercial> wrote in
message news:egtV0kezEHA.3588@TK2MSFTNGP14.phx.gbl...
> Do you have an On Error Resume Next? Well, regardless, a couple of

changes
> will be necessary.
>
> When you Response.write FPath, did you notice that there was no \ between
> the directory name and the filename? You'll need that. Also, make sure

you
> do not leave the Response.Write code in there when you get this working.
> Try this code:
>
> Response.ContentType = "application/x-unknown" ' arbitrary
> fn = "wallpaper_1_1.jpg"
> 'Response.write "<br>" & Server.MapPath("wallpaper") & "<br>"
> FPath = Server.MapPath("wallpaper") & "\" & fn
> Response.AddHeader "Content-Disposition","attachment; filename=" & fn
>
> Set adoStream = CreateObject("ADODB.Stream")
> adoStream.Open()
> adoStream.Type = 1
> adoStream.LoadFromFile(FPath)
> Response.BinaryWrite adoStream.Read()
> adoStream.Close
> Set adoStream = Nothing
>
> Ray at home
>
> "dave" <forged@foo.netREMOVE> wrote in message
> news:eQbeeqdzEHA.1652@TK2MSFTNGP11.phx.gbl...
>
>



dave

2004-11-19, 3:55 am

just one question
how do i make this code to work with most common all browser
dev

"Ray Costanzo [MVP]" <my first name at lane 34 dot commercial> wrote in
message news:egtV0kezEHA.3588@TK2MSFTNGP14.phx.gbl...
> Do you have an On Error Resume Next? Well, regardless, a couple of

changes
> will be necessary.
>
> When you Response.write FPath, did you notice that there was no \ between
> the directory name and the filename? You'll need that. Also, make sure

you
> do not leave the Response.Write code in there when you get this working.
> Try this code:
>
> Response.ContentType = "application/x-unknown" ' arbitrary
> fn = "wallpaper_1_1.jpg"
> 'Response.write "<br>" & Server.MapPath("wallpaper") & "<br>"
> FPath = Server.MapPath("wallpaper") & "\" & fn
> Response.AddHeader "Content-Disposition","attachment; filename=" & fn
>
> Set adoStream = CreateObject("ADODB.Stream")
> adoStream.Open()
> adoStream.Type = 1
> adoStream.LoadFromFile(FPath)
> Response.BinaryWrite adoStream.Read()
> adoStream.Close
> Set adoStream = Nothing
>
> Ray at home
>
> "dave" <forged@foo.netREMOVE> wrote in message
> news:eQbeeqdzEHA.1652@TK2MSFTNGP11.phx.gbl...
>
>



Ray Costanzo [MVP]

2004-11-19, 3:55 am

Do you have evidence that suggests that it doesn't?

Ray at home

"dave" <forged@foo.netREMOVE> wrote in message
news:OGiw5rezEHA.3004@TK2MSFTNGP10.phx.gbl...
> just one question
> how do i make this code to work with most common all browser
> dev



dave

2004-11-19, 3:55 am

no..but
"Ray Costanzo [MVP]" <my first name at lane 34 dot commercial> wrote in
message news:#by4mefzEHA.2016@TK2MSFTNGP15.phx.gbl...
> Do you have evidence that suggests that it doesn't?
>
> Ray at home
>
> "dave" <forged@foo.netREMOVE> wrote in message
> news:OGiw5rezEHA.3004@TK2MSFTNGP10.phx.gbl...
>
>



dave

2004-11-19, 3:55 am

no but
http://www.aspfaq.com/show.asp?id=2161
in last lines of articles says u might have to change addheader lines to get
correct filename...
thts wht puzzling me
dave

"Ray Costanzo [MVP]" <my first name at lane 34 dot commercial> wrote in
message news:#by4mefzEHA.2016@TK2MSFTNGP15.phx.gbl...
> Do you have evidence that suggests that it doesn't?
>
> Ray at home
>
> "dave" <forged@foo.netREMOVE> wrote in message
> news:OGiw5rezEHA.3004@TK2MSFTNGP10.phx.gbl...
>
>



themask

2004-12-22, 5:42 pm

thank u all
Sponsored Links







Also available: Server administration forum archive | Web Design forum archive | Software forum archive | Hardware reviews archive

Copyright 2008 codecomments.com