Sección de códigos , trucos y ejemplos para visual basic

160 - Ejemplo para leer y grabar imagenes en un campo Ole con ADO

Este es un módulo de clase con un formulario que permite añadir y leer registros de un campo de tipo binario OLE utilizando ADO como conexión.

El ejemplo lo generé con el asistente de Visual basic para generar formualrios de datos " Data Form Wizard " el que está en el menú complementos.

El formulario de ejemplo es el siguiente:

vista del formulario de datos para leer y grabar gráficos e imágenes en campos de tipo OLE

Mediante la clase se puede Añadir, eliminar, actualizar etc. los registros

Para grabar una imagen se debe hacer de la siguiente forma:

Primero agregar mediante el correspondiente botón " Agregar " un nuevo registro, y luego utilizar el método Grabar_Imagen que se encuentra en la clase, pasándole la ruta del archivo, por ejemplo:

'GRaba la imagen en el campo OLE
Call objCliente.Grabar(.FileName)

Para leer la imagen mientras nos movemos por el recordset, no es necesario llamar a ningún método, ya que el control Picture está enlazado al campo Imagen, que es el campo de tipo Ole, en la propiedad DataField.

Nota: dentro de la clase, en el evento Initialize, está la sentencia sql que llena y abre el recordset y también la apertura de la base de datos con la cadena de conexión.

Descargar ejemplo

Recursos vb6 - enlaces relacionados

Enlaces con ejemplos sobre ado y vb 6.0

Buscar en Recursos vb