Ich nutze den unten angehängten Code - ist nicht grossartig anders, aber
einen Versuch ist es wohl wert. Übrigens: der komische MimeType, der
eigentlich keiner ist, hat sich als bester Kompromis querbeet über alle
Browser und Betriebssysteme bewährt.
' --- jetzt geht es aber tatsächlich los
Response.Buffer = True
Response.Clear
Response.Expires = 0
Response.ContentType = "Download-Datei"
Response.AddHeader "Content-Disposition","attachment; filename=" &
GetFileName(sFile)
Set oStream = CreateObject("ADODB.Stream")
oStream.Type = adTypeBinary
oStream.Open
oStream.LoadFromFile Server.MapPath(sFile)
Response.BinaryWrite oStream.Read(oStream.Size)
oStream.Close
Set oStream = Nothing
Response.Flush
Response.End
--
Viele Grüße
Hubert Daubmeier
_______________________________________________
Coffeehouse Mailingliste, Postings senden an:
[EMAIL PROTECTED]
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/coffeehouse
