Imprimir página | Cerrar ventana

Refrescar formulario tras eliminar registro

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=85719
Fecha de impresión: 29/Marzo/2024 a las 00:21


Tema: Refrescar formulario tras eliminar registro
Publicado por: Juan
Asunto: Refrescar formulario tras eliminar registro
Fecha de publicación: 04/Enero/2021 a las 07:59
Buenos días y felíz 2021 a tod@s
No sé si se podrá hacer, espero que sí ya que en Access casi todo es posible. Lo que quiero es que después de eliminar un registro de un formulario me actualice el mismo mediante un Requery o un Refresh al pulsar "Si" en el mensaje que sale pidiendo seguir con la eliminación del registro.
El código es el que facilita Access para eliminar registros y es el siguiente:

Private Sub Comando192_Click()
On Error GoTo Err_Comando192_Click
    DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord
Exit_Comando192_Click:
    Exit Sub
Err_Comando192_Click:
    MsgBox Err.Description
    Resume Exit_Comando192_Click    
End Sub.

Solicito ayuda
Muchas gracias


-------------
jj



Respuestas:
Publicado por: Mihura
Fecha de publicación: 04/Enero/2021 a las 08:36
Hola Juan,

Quita el mensaje de confirmación automático de Access, créatelo tú manualmente y ponle un me.requery detrás del borrado del registro.




-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: Juan
Fecha de publicación: 04/Enero/2021 a las 10:18
Hola Mihura
Antes de crear mi propio mensaje de voz con condiciones (que me va a llevar un tiempo, creo que largo),he probado con dejar solamente este código:

Private Sub Comando34_Click()
   DoCmd.RunCommand acCmdSelectRecord
    DoCmd.RunCommand acCmdDeleteRecord
Me.Form.Requery
End Sub

Y cual ha sido mi sorpresa que al ejecutarle sigue saliendo el mensaje opcional para eliminar el registro o no y al decir que "sí", lo elimina y refresca el formulario. Es decir no haría falta poner mensaje de voz adicional alguno.



-------------
jj


Publicado por: Juan
Fecha de publicación: 04/Enero/2021 a las 10:37
Hola de nuevo
Siguen las sorpresas (para mí, por supuesto) me explico:
Tengo un formulario principal donde hay un botón para eliminar registros (con el código expuesto )
En él hay un subformulario con su botón de eliminación de registros con el mismo código 
Pues bien, cuando ejecuto el código en el formulario, elimina el registro y no sale mensaje alguno, pero cuando ejecuto el del subformulario sale el mensaje tal como decía en la comunicación anterior


-------------
jj


Publicado por: Mihura
Fecha de publicación: 04/Enero/2021 a las 10:38
Te había entendido que lo querías hacer en el mismo mensaje, ... y ese mensaje es automático de Access y no es modificable.

Pero la acción a ejecutar en cualquier caso es el Me.requery.




-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: Juan
Fecha de publicación: 04/Enero/2021 a las 15:55
Hola Mihura
Me habías entendido bien, aunque no descartaba cualquier otra solución. Como ves el asunto resuelto, me quedo con la duda de esas "sorpresas" que he comentado.
Muy agradecido Mihura y a todos cuantos os habéis interesado por ayudarme.
Podéis quitar el hilo


-------------
jj



Imprimir página | Cerrar ventana