Validar entrada de datos

Buenas Tardes, necesito su ayuda
Tengo un formulario an access que necesito que valide la entrada de datos para el campo1 por fecha por ejemplo; el usuario1 agrega información al campo1 el 01 dic y va a agregar el 05 de dic, pero no debe dejarlo hasta que agregue el 02, 03 y 04 de dic, lo mismo para el usuario2
Muchas gracias por su ayuda

1 respuesta

Respuesta
1
En el momento de saber la fecha elegida (por ejemplo campo1_afterupdate)
Haces:
---
if dcount ("*","tabla","campo1=#" & format(me.campo1-1,"mm-dd-yy") & "#" then
msgbox "fecha incorrecta"
Me. Campo1. Undo
Me. Campo1. Setfocus
end if
---
Gracias por su respuesta, por favor me podría ayudar con esto
¿Cómo válido al usuario?
Muchas gracias por su ayuda
Todo igual pero agregando el usuario, por ejemplo:
---
if dcount ("*","tabla","campo1=#" & format(me.campo1-1,"mm-dd-yy") & "# and usuario=" & me.usuario then
msgbox "fecha incorrecta para este usuario"
me.campo1.undo
me.campo1.setfocus
end if
---
Suponiendo que la fecha se introduce posteriormente al suario, claro. Si el usuario es posterior, el evento afterupdate a programar será el del usuario en lugar del de la fecha.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas