Binäre Dateien zum Download anbieten

Hallöchen zusammen!
Verstehe nicht ganz, warum ich die Fehlermeldung: die Datei kann nicht geöffnet werden (800a0bba) bekomme.
Der Pfad ist in Ordnung, mit einer textdatei (text/plain) funktioniert es auch.
Mag mal jemand einen Blick auf meinen Code werfen?
Response.Buffer = TRUE
Response.Clear
Response.Expires = 0
Response.ContentType = "application/octet-stream"

Response.AddHeader "Content- Disposition","attachment;filename="&strFileName
Response.Charset="UTF-8"
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = adTypeBinary
objStream.Open
objStream.LoadFromFile(strMyPath)
Response.BinaryWrite
objStream.Read(objStream.Size)
objStream.Close
Set objStream = Nothing
Response.Flush

Habe ich da etwas übersehen?
In der endgültigen Version sollen GPS-Dateien für Navigationssysteme heruntergeladen werden können, meine Tests führe ich allerdings mit Zip-Dateien durch (sind doch aber auch binäre Daten, oder?)

Danke für die Hilfe!
:(
 

Neue Beiträge

Zurück