server 2003 & Download

[fosforo]

Ciao
Ho questo script che non funziona:

<%
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile Server.MapPath("miofile.wmv")
Response.AddHeader "Content-Disposition", "attachment; filename=" & "miofile.wmv"
Response.ContentType = "application/octet-stream"
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
%>


Purtroppo non funziona, non vorrei che siano i setup di IIS 2003 Sp2.
Suggerimenti??

Grazie a tutti.

[DarioN1]

messaggio di errore ?