Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Access » Imagen OLE

Access - Imagen OLE

Volver
Nuevo Tema
<<>>
 
Vista:

Imagen OLE

Publicado por Leonardo (10 intervenciones) el 24/07/2003 07:06:47
Hola, tengo en mi tabla un campo que es una imagen OLE, que cambia en cada registro, lo que intento hacer es que cuando doy click en un botón me inserte esa imagen (imagen1) en ese registro, y cuando doy click en otro boton me cambie la otra imagen (imagen2) en ese registro. Cómo puedo hacer esto desde el código.
Espero me puedan ayudar.
Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Imagen OLE

Publicado por Alejandro (4142 intervenciones) el 02/05/2023 19:17:14
Para insertar una imagen OLE en un registro desde un botón, puedes utilizar el siguiente código en el evento "Al hacer clic" del botón:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub btnInsertarImagen1_Click()
    'Obtener el registro actual
    Dim rs As Recordset
    Set rs = Me.RecordsetClone
    rs.Bookmark = Me.Bookmark
 
    'Insertar imagen 1 en el campo OLE de la tabla
    rs.Edit
    rs!CampoImagen.OLETypeAllowed = acOLEEmbedded
    rs!CampoImagen.LoadFromFile "ruta de la imagen1"
    rs.Update
 
    'Actualizar el formulario
    Me.Refresh
End Sub

De manera similar, para cambiar la imagen OLE en un registro desde otro botón, puedes utilizar el siguiente código:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub btnCambiarImagen_Click()
    'Obtener el registro actual
    Dim rs As Recordset
    Set rs = Me.RecordsetClone
    rs.Bookmark = Me.Bookmark
 
    'Cambiar la imagen en el campo OLE de la tabla
    rs.Edit
    rs!CampoImagen.OLETypeAllowed = acOLEEmbedded
    rs!CampoImagen.LoadFromFile "ruta de la imagen2"
    rs.Update
 
    'Actualizar el formulario
    Me.Refresh
End Sub

Recuerda cambiar "CampoImagen" por el nombre del campo OLE de tu tabla y "ruta de la imagen1" y "ruta de la imagen2" por las rutas de las imágenes que deseas insertar o cambiar.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar