Espero y esto te ayude en algo:
el codigo guarda en una tabla una imagen .gif asi como su nombre y tamaño
<%
GloConnectionString=DRIVER={MySQL ODBC 3.51 Driver};SERVER=123.456.789.100;DATABASE=mysqldatabase;UID=sampleuser;PWD=12345;OPTION=16427
Dim conn ''conexion
Dim rs 'recordset
Dim mystream 'Stream
set conn = Server.createObject("ADODB.Connection")
conn.ConnectionString = GloConnectionString
conn.CursorLocation = 3
conn.Open
Set rs = Server.createObject("ADODB.Recordset")
Set mystream = Server.createObject("ADODB.Stream")
mystream.Type = 1 'adTypeBinary stream de tipo binario
rs.Open "SELECT * FROM files WHERE 1=0", conn,3,3 ' adOpenStatic y adLockOptimistic
rs.AddNew
mystream.Open
mystream.LoadFromFile "c:\imagen.gif"
rs!file_name = "imagen.gif"
rs!file_size = mystream.size
rs!file = mystream.read
rs.Update
mystream.Close
rs.Close
conn.Close
%>