Download tvang

Hej

Jeg kunne godt tænke mig at man på min sidde kan downloade en masse forskellige filer (doc, pdf, mp3, etc.). Problemet er bare at når man trykker på et link til en af disse filer, så bliver filen åbnet i browseren.

For at undgå dette har jeg prøvet med dette script:

<%
Option Explicit
Response.Expires = 0
Response.Buffer = TRUE
Response.AddHeader "Content-Disposition","attachment; filename=download.doc"
Response.AddHeader "Content-Description","ASP Generated Data"
Response.ContentType = "application/doc"

Dim vntStream, oMyObject

Set oMyObject = Server.CreateObject("MyObject.BinRead")
vntStream = oMyObject.readBinFile(server.mappath("download.doc"))

Response.BinaryWrite(vntStream)
Response.Flush
%>

Nu kommer der også som der skal en box frem hvori man har muligheden for at gemme filen på sin harddisk.
Problemet er bare at den fil som der bliver downloadet overhovdet ikke ligner den fil som det er meningen skal downlades.

Eks: Jeg har lavet doc. dokument hvori der stå "Hej med dig", og gemt det som download.doc. Den fil som bliver downloadet hedder det samme (downoad.doc) men indeholder følgende:

<font face="Arial" size=2>
<p>Server object</font> <font face="Arial" size=2>error 'ASP 0177 : 800401f3'</font>
<p>
<font face="Arial" size=2>Server.CreateObject Failed</font>
<p>
<font face="Arial" size=2>/vvc/download.asp</font><font face="Arial" size=2>, line 11</font>
<p>
<font face="Arial" size=2>Invalid class string


</font>
Er der nogen som kan fortælle mig hvad jeg gør galt, eller er der en anden måde man kan gøre det på..

På forhånd tak