Using an Access database called db1.mdb with a table Table1 and 
a field Field1 of the OLE type. 
This is the Visual Basic code for storing an image :-

Dim a() As Byte, b As String, c, i, l, r 

    Open "image.gif" For Binary As 1 
    l = LOF(1) 
    b = Space(l) 
    Get #1, , b 
    Close 1 
    ReDim a(l) 
    For i = 0 To l - 1 
        a(i) = CByte(Asc(Mid(b, i + 1, 1))) 
    Next i 
    Set c = CreateObject("ADODB.Connection") 
    c.Open "driver={Microsoft Access Driver (*.mdb)};dbq=db1.mdb" 
    Set r = CreateObject("ADODB.RecordSet") 
    r.Open "SELECT * FROM Table1", c, 2, 2 
    If r.EOF Then 
        r.addnew 
    End If 
    r(0) = a 
    r.Update 
    r.Close

This is the ASP code for retrieving the image :-

    <% 
    Response.Buffer = true 
    Response.Clear 
    Response.Expires = 0 
    Response.ContentType = "image/gif" 
    Set c = Server.CreateObject("ADODB.Connection") 
    c.Open "driver={Microsoft Access Driver *.mdb)};dbq=\inetpub\wwwroot\db1.mdb" 
    Set r = CreateObject("ADODB.RecordSet") 
    r.Open "SELECT * FROM Table1", c, 2, 2 
    Response.BinaryWrite r(0) 
    r.close 
    Response.End 
    %>

The only assumption is that the length of the image is not longer than the maximum variable size. 
Otherwise the chunk-method should be used.