Download og ikke blot åbn video (en asp fejl-meddelse?)

jeg har søgt lidt rundt omkring for at finde et download script sådan at brugerne på min side kan download wmv-videoer og ikke blot åbne dem...

Jeg har fundet følgende scirpt på siden: http://www.magik.dk/da/articles/1/


<%
Dim objStream, strFile, strFileType
Const adTypeBinary = 1

' Filen vi vil sende til brugeren
strFile = "test.doc"

' Filens MIME type
strFileType = "application/msword"

' Åbner stream
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open

' Fortæller ADODB.Stream at indholdet er i binært format
objStream.Type = adTypeBinary

' Henter filen ind i vores stream
objStream.LoadFromFile(Server.MapPath(strFile))

' Sender en header til browseren
Response.AddHeader "content-disposition","attachment; filename=" & strFile

' Fortæller browseren om vores MIME type
Response.ContentType = strFileType

' Skriver filens indhold ud til brugeren
Response.BinaryWrite(objStream.Read)

Response.Flush()
objStream.Close()
Set objStream = Nothing
%>



Det ser jo ud til at være lige det jeg mangler men! Den kommer med følgende fejl:


Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/video_script/downloadtest.asp, line 15

System message, messageid = 0x800401f3



Linie 15 er følgende:
Set objStream = Server.CreateObject("ADODB.Stream")

Hvad går der galt? Eller er der nogle der har et andet eller bedre script?

Skal bruge det i dag - smider ekstra point i, for hurtigt (virkende) svar!