Visual Basic - INSERTAR IMAGEN EN TABLA

hola, necesito saber como puedo insertar una imagen en una base de datos de access desde un programa en Vb. He probado con los commodialog y no me deja ¿Alguna solución?

Creo recordar que hay una dirección www.somser.com, en la cual hay bastantes trucos sobre
esto echale un vistazo.
Saludos

aqui te doy esta rutina que baje de la pagina del guille
sirve para meter una imagen aun campo de una base de datos, el campo tiene qyue ser del tipo OLE en Access

Public Sub GuardarBinary(campoBinary As Field, unPicture As Image)
'Guardar el contenido del Picture en el campo de la base
Dim i As Integer
Dim Fragment As Integer, Fl As Long, Chunks As Integer

'
'NOTA:
' El recordset debe estar preparado para Editar o Añadir
'

'Guardar el contenido del picture en un fichero temporal
SavePicture unPicture.Picture, "pictemp"

'Leer el fichero y guardarlo en el campo
DataFile = FreeFile
Open "pictemp" For Binary Access Read As DataFile
Fl = LOF(DataFile) ' Longitud de los datos en el archivo
If Fl = 0 Then Close DataFile: Exit Sub

Chunks = Fl \ conChunkSize
Fragment = Fl Mod conChunkSize
ReDim Chunk(Fragment)

Get DataFile, , Chunk()
campoBinary.AppendChunk Chunk()
ReDim Chunk(conChunkSize)
For i = 1 To Chunks
Get DataFile, , Chunk()
campoBinary.AppendChunk Chunk()
Next i
Close DataFile

'Ya no necesitamos el fichero, así que borrarlo
On Local Error Resume Next
If Len(Dir$("pictemp")) Then
Kill "pictemp"
End If
Err = 0
End Sub

saludos
isidroalmaguer