Código para insertar imagen. Pueden?

[tigereye]

Hola chicos!
Alguien podria darme el codigo para que desde un botón de comando pueda buscar un archivo de imágen e insertarla en una base de datos de Access desde una aplicación de Visual Basic 6. ES UN RETO! Yo sé que pueden, les agradeceré su respuesta.
Saludos a todos y les deseo mucho éxito para este año 2002.

[yayita1502]

Tenés que agregar un CommonDialog1 y un control de datos Data1 para trabajar con la base.

With CommonDialog1
.Filter = "Mapa de bits (*.BMP)|*.bmp| Archivos (*.JPG)|*.jpg|All files|*.*"
.DefaultExt = "BMP"
.ShowOpen
Data1 = .FileName
foto = LoadPicture(dataname)
End With

Espero que te sirva.