Gemme binær data i MSSQL database

Jeg vil gemme data binært i MSSQL - Kan nogen se hvad der er forkert. Jeg får fejl i den linjen med *FEJL*-markeringen.. ELLER hvis nogen har noget andet kode som kan bruges. Jeg vil gemme .pdf .doc .xls mv.. og jeg har læst på msdn at "image"-feltet kan bruges til at gemme det hele.

-------------------------------------
<%
Dim Connection, rs, stm
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open Application("Connection")
Set stm = Server.CreateObject("ADODB.Stream")
stm.Type = adTypeBinary
stm.Open
stm.LoadFromFile Request.Form("filename") *FEJL*: ADODB.Stream error '800a0bba'  File could not be opened.

strSQL = "Insert into [OPUS_Binary] ([filedata]) values("' & stm.Read & '")"
Set rs = Connection.Execute( strSQL )

rs.Close
stm.Close
Set rs = Nothing
Set stm = Nothing
%>
-------------------------------------

mvh subtile