Download fra database

Jeg vil gerne lave et script, hvor man kan downloade filer gemt i en database.

Jeg har følgende, som dog kun gøre at filen bliver udkrevet. Det vil sige, at hvis der er gemt et billede bliver det vist.

Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.open \"Driver={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"db.mdb\")
SQL = \"SELECT * FROM docs WHERE (id =\" & Request(\"ID\")*1 & \")\"
Set Record = Server.CreateObject(\"adodb.recordset\")
Record.Open SQL, Conn, 2, 3
If Not Record.EOF Then
Response.ContentType = \"application/octet-stream\"
Response.AddHeader \"Content-Disposition\", \"filename=\" & Record(\"name\")
Response.BinaryWrite Record(\"sbinary\")
End if

Jeg vil gerne have at der kommer en \"gem som\" boks op.