Anónimo
¿Me podrías ayudar?
HOLA! Bueno voy a tratar de explicar lo que necesito. Al ingresar al sistema necesito que me muerte un mensaje como: faltan 3 días para el vencimiento de una póliza. Eso lo logre colocando un subformulario en el menu general con todas las fechas de vencimiento, en evento al abrir coloque lo siguiente:
If Me!FvenPol = (Date) + 3 Then
MsgBox "FALTAN 3 DIAS PARA EL VENCIMIENTO DE UNA POLIZA"
Else
End If
FvenPol: es fecha de vencimiento de póliza
Mi problema es que solo me muestra un mensaje cuando faltan 3 días para el vencimiento de póliza del primer registro, osea si en otros registros faltan 3 días para la fecha de vencimiento no me manda el mensaje... ¿qué debería hacer? Desde ya muchas gracias!
If Me!FvenPol = (Date) + 3 Then
MsgBox "FALTAN 3 DIAS PARA EL VENCIMIENTO DE UNA POLIZA"
Else
End If
FvenPol: es fecha de vencimiento de póliza
Mi problema es que solo me muestra un mensaje cuando faltan 3 días para el vencimiento de póliza del primer registro, osea si en otros registros faltan 3 días para la fecha de vencimiento no me manda el mensaje... ¿qué debería hacer? Desde ya muchas gracias!
1 Respuesta
Respuesta de yescuder
1
Yo cambiaría el mensaje por una consulta que se ejecuta al abrir el sistema, dicha consulta me mostraría la lista de las pólizas a las cuales les faltan 3 días o menos para vencerse.