Automatisk download virker ikke?

Nu ved jeg ikke lige om jeg har forstået det rigtigt, men prøv under linjen
Response.ContentType = "image/jpg" (mener iøvrigt det hedder image/jpeg ??)
at tilføje denne linje:
Response.AddHeader "content-disposition", "attachment;filename=" & strFileSpec

Må man tillade sig at spørge, om det kunne bruges til noget? :)

sorry har ikke været ved computeren.
Jeg tester det i morgen!

den fil der skal downloades bliver stadig filer.asp som jeg sender fra. hvis jeg vælger åben fra nuværende placering så kommer billedet bare frem i IE, i stedet for man kan downloade det...

Prøv at ændre contenttype til "application/octet-stream"...

stadig samme problem.

Men jeg fandt dette i et andet spg.
<%
filename = server.mappath("filer/" & request.querystring("filenavn"))
Set objStream = Server.CreateObject("ADODB.Stream")
  objStream.Open
  Const adTypeBinary = 1
  objStream.Type = adTypeBinary
  objStream.LoadFromFile Replace(filename,"/","\") 
  Select Case right(filename,3)
        Case "asf"
            ContentType = "video/x-ms-asf"
        Case "avi"
            ContentType = "video/avi"
        Case "doc"
            ContentType = "application/msword"
        Case "zip"
            ContentType = "application/zip"
        Case "xls"
            ContentType = "application/vnd.ms-excel"
        Case "gif"
            ContentType = "image/gif"
        Case "jpg", "jpeg"
            ContentType = "image/jpeg"
        Case "wav"
            ContentType = "audio/wav"
        Case "mp3"
            ContentType = "audio/mpeg3"
        Case "mpg", "mpeg"
            ContentType = "video/mpeg"
        Case "rtf"
            ContentType = "application/rtf"
        Case "htm", "html"
            ContentType = "text/html"
        Case "asp"
            ContentType = "text/asp"
        Case Else
            'Handle All Other Files
            ContentType = "application/octet-stream"
        End Select
  Response.ContentType = ContentType
  Response.AddHeader "content-disposition", "attachment;filename=" & filename
 
  Response.BinaryWrite objStream.Read
  %>

Her får jeg igen kun muligheden for at downloade filer.asp, og kan så downloade den som en html fil. Denne bliver dog downloadet som den skal...

Det er meget mystisk!

hmm... prøv at få udskrevet filename før linjen med addheader - eller prøv evt at erstatte den med en fast værdi fx "test.fil" for at tjekke om det er der, den er gal. Det kan være, at filename ikke må have sti til filen med...

Stadig det samme problem, også selvom jeg skriver en fil der ikke findes på serveren...

så har jeg fået testet noget på min egen maskine:

<%
Response.Expires = -1

Dim filename
Dim shortfn

shortfn = request.querystring("filnavn")
filename = server.mappath("filer/" & shortfn)

Set objStream = Server.CreateObject("ADODB.Stream")
  objStream.Open
  Const adTypeBinary = 1
  objStream.Type = adTypeBinary
  objStream.LoadFromFile Replace(filename,"/","\") 
  Response.AddHeader "Content-Disposition", "attachment;filename=" & shortfn
  Select Case right(filename,3)
          Case "asf"
              ContentType = "video/x-ms-asf"
          Case "avi"
              ContentType = "video/avi"
          Case "doc"
              ContentType = "application/msword"
          Case "zip"
              ContentType = "application/zip"
          Case "xls"
              ContentType = "application/vnd.ms-excel"
          Case "gif"
              ContentType = "image/gif"
          Case "jpg", "jpeg"
              ContentType = "image/jpeg"
          Case "wav"
              ContentType = "audio/wav"
          Case "mp3"
              ContentType = "audio/mpeg3"
          Case "mpg", "mpeg"
              ContentType = "video/mpeg"
          Case "rtf"
              ContentType = "application/rtf"
          Case "htm", "html"
              ContentType = "text/html"
          Case "asp"
              ContentType = "text/asp"
          Case Else
              'Handle All Other Files
              ContentType = "application/octet-stream"
  End Select

  Response.ContentType = ContentType

 
  Response.BinaryWrite objStream.Read
%>

prøv lige denne side:
http://ellebaek.dyndns.dk/exp/upload/filer.asp

så prøv når du trykker på filen for at downloade den, at se hvilken fil du kan downloade...

Så prøv at trykke åben fra nuværende placering, så kommer den rigtige fil frem...

Jeg forstår det ikke. Det er med den kode du skrev.

har du bemærket ændringen med "shortfn" efter Response.AddHeader "Content-Disposition"....
Hvis jeg kigger på, hvad der står i http-headeren siger den nemlig
Content-Disposition: attachment;filename=C:\WINDOWS\Skrivebord\hjemmesider\exp\upload\filer\asp.jpg

hvilket kunne tyde på at det er hele den mappede path til "asp.jpg" den får...

prøv nu....

Nu har jeg rettet det tilbage...!

nu skriver den "/filer/asp.jpg" i headeren...

Prøv at kontrollere disse linjer:
---
Dim filename
Dim shortfn

shortfn = request.querystring("filnavn")
filename = server.mappath("filer/" & shortfn)

--- samt denne ---
Response.AddHeader "Content-Disposition", "attachment;filename=" & shortfn
---

Det lader til, det er vigtigt, at det kun er selve filnavnen, der er i variablen "shortfn" og ikke nogen sti på...

nu skulle den være der...!

jeps, den kører også herfra :)

virker det som det skal...?

jeps, jeg får lov til at gemme hhv. "bootlog.txt", "netvaerk.txt" og "asp.jpg"

hmm....


Jeg får kun lov til at gemme filer.asp.

Hvilken IE benytter du..?

6.0.2800 - prøv at åbne et nyt browservindue - eller først helt lukke IE og så åbne en ny...

jeg har kun ie5.5 kan måske have noget med det at gøre.

Jeg skal desværre på ferie i morgen, men vender tilbage så snart jeg kommer hjem, så henter jeg den nyeste version og ser om det virker...

Er det i orden?

yep... det kan muligvis også være et spørgsmål om din cache... har en løsning et sted, kan prøve at se om jeg kan finde den frem i mellemtiden

det ville være lækkert..!

er ude for idag, men drop en kommentar, når du er tilbage :)

Det gør jeg. Men der går nok en 10 dages tid inden jeg kommer hjem...

som lovet ville jeg prøve at finde noget til at hjælpe mod cachen...
Det er fundet på ActiveDeveloper: http://activedeveloper.dk/julekalender/julegaver/nocache.asp.

Koden som skal sættes ind forrest i dokumentet (og slet linjen med Response.Expires = -1) er:

Response.Expires = 0
Response.Expiresabsolute = DateAdd("d", -2, Now())
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "private"

Ellers gå ind i dine internetindstillinger og fjern alle "midlertidige internet filer" :)

nu har jeg prøvet mig frem med en IE der var nyere end den jeg ellers har benyttet, og der virker det som det skal...

Så derfor siger jeg mange tak for hjælpen...
Og undskyld den lange svartid fra min side...

Mvh. Jens!

Takker for point :) - og det var så lidt, er glad for det kom til at virke :)