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

Access - Mensaje de confirmación

Volver
Nuevo Tema
<<>>
 
Vista:

Mensaje de confirmación

Publicado por Angela Soto (87 intervenciones) el 19/02/2007 22:52:35
Hola a todos nuevamente:

Como puede hacer un mensaje de confirmación para un botón que me almacena los datos que ingreso en un formulario. El botón que me almacena los datos es un botón que muestra el codigo por defecto access, el codigo que muestra es el botón es:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub btnAceptar_Click()
On Error GoTo Err_btnAceptar_Click
 
 
    DoCmd.GoToRecord , , acNewRec
 
Exit_btnAceptar_Click:
    Exit Sub
 
Err_btnAceptar_Click:
    MsgBox Err.Description
    Resume Exit_btnAceptar_Click
 
End Sub

Como puedo agregarle aqui el mensaje para que el usuario confirme el almacenamiento de los datos en la tabla??

Muchas Gracias.
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

RE:Mensaje de confirmación

Publicado por The Emulator (146 intervenciones) el 20/02/2007 01:18:30
Hola

Usa la instruccion MsgBox la cual se puede usar para mostrar mensajes de informacion o para pregunrale algo al usuario en este caso mostrar un mensaje al usuario de que si quiere agregar el registro con dos posibles opciones Si o No, este seria el codigo modificado para lo que necesitas.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub btnAceptar_Click()
On Error GoTo Err_btnAceptar_Click
 
If MsgBox("Realmente desea agregar un registro?", vbQuestion + vbYesNo, "Pregunta") = vbYes Then
   DoCmd.GoToRecord , , acNewRec
End If
 
Exit_btnAceptar_Click:
Exit Sub
 
Err_btnAceptar_Click:
MsgBox Err.Description
Resume Exit_btnAceptar_Click
 
End Sub
Saludos
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