Stream binær data fra database (ADO)

Jeg har svært ved at få ADODB objectet til at læse mine BLOB data fra MySQL database:

:::: kode :::::
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1 'binary
objStream.Open fromDB("data").Value <-- ! Læsning !

lSize = objStream.size

Response.AddHeader "Content-Disposition", "inline; filename=""" & Replace(Request.querystring("name"),"""","\\""") & """"
Response.AddHeader "Content-Length", lSize

chunksize = 8192
NumberofBlocks = int(lSize / chunksize)

For lBlocks = 1 To NumberofBlocks
    If Response.IsClientConnected = False Then Exit For
    Response.BinaryWrite objStream.Read(chunksize)
    Response.Flush
Next
if NumberofBlocks*chunksize < lSize then
    Response.BinaryWrite objStream.Read(lSize - (NumberofBlocks*chunksize))
    Response.Flush
end if
:::: /kode :::::

Jeg kan (såfremt data er få bytes) bruge Response.BinaryWrite... men da vi snakker om 10-15 MB er der brug for en buffered metode til at streame data til brugeren...

nogen ide om hvad jeg kan gøre ?