Download pdf

Hej exp.dk :)

Jeg skal lave et "force download"-script til pdf filer. Mine pdf filer ligger udenfor root, så stien bliver skjult, da det er meningen der skal være en tæller på, hvor mange gange en fil er blevet hentet.

Det kører for så vidt også fint nok, men jeg får en fejl, når jeg prøver at åbne en pdf som jeg har downloadet. Jeg har en idé om at det måske kan være noget ContentType, men jeg er ikke helt sikker. Håber i kan hjælpe ;)

Her kommer fejlen i acrobat reader:

Adobe Reader could not open 'XXXXX.pdf' because it is either not a supported file type or because the file has been damaged (for example, it was sent as an email attachment and wasn't correctly decoded)

Mit script ser sådan her ud:

If inStr(Request.ServerVariables("HTTP_USER_AGENT"),"MSIE")>0 Then
  Response.ContentType = "application/x-download"
Else
  Response.ContentType = "application/octet-stream"
End If
Response.AddHeader "content-disposition","attachment; filename=" & fileName
Set FStream = Server.CreateObject("ADODB.Stream")
FStream.Open()
FStream.Type = 1
FStream.LoadFromFile(filePath&filename)
Response.BinaryWrite FStream.Read()
FStream.Close
Set FStream = Nothing
Response.End