La Web del Programador: Comunidad de Programadores
 
    Pregunta:  7409 - EDITAR IMáGENES EN VB 6.0 DESDE ACCES´97
Autor:  Sergio Espino
Hola:
Tengo una duda concreta que es la siguiente:
¿ como relaciono una foto desde una base Acces 97 para ser editada en una aplicación VB ?.
En mi intento hice lo siguiente:
1) Cree un campo "foto" de tipo Objeto OLE dentro de una tabla Acces llamada datos_cli.
2) En VB generé un formulario para capturar un objeto OLE que debería ser la foto cargada en el campo de la tabla Acces.

El código para editar es el siguiente:

Dim dbsclientes As Database
Dim rstClientes As Recordset
Set dbsclientes = OpenDatabase("c:\mi visual basic\clientes.mdb")
Set rstClientes = dbsclientes.OpenRecordset("datos_cli", dbOpenTable)
With rstClientes
.Index = "CEDULA"
.Seek "=", ABMClientes.txtCédula
ABMClientes.txtNombre = !Nombre
ABMClientes.txtEdad = !Edad

'*************************
ABMClientes.OLE1 = !foto ´
'*************************

' El programa al ejecutarse da error aqui, y dice que NO 'COINCIDEN LOS TIPOS, lo cual no lo entiendo ya que ambos 'son mapas de bits, o sea, el que está declarado en la base 'de datos(foto) y el campo del formulario(ABMClietes.OLE1)

End With
rstClientes.Close
dbsclientes.Close

  Respuesta:  cesar Burgos
Estimado sergio:
creo que la solucion es almacenando el nombre de la imagen (foto1.bmp) con formato jpg, bmp, o el que soporta el picture o image y para visualizar lo cargas al objeto que desees, y tienes mas dudas avisame para enviarte un ejemplo.