OVH Cloud OVH Cloud

date d'expiration

1 réponse
Avatar
bonjour, j'ai mis une date d'expiration d'utilisation dans un formulaire, je
voudrais qu'à la date d'expiration une boite s'ouvre, et invite
l'utilisateur à entrer un mot de passe.
si celui -ci est bon le formulaire reste continuellement valide et desactive
la date d'expiration

merci de votre aide



Public Function DateExpirationApplication()
If Date >= DateSerial(2005, 12, 31) Then
MsgBox "La date d'expiration de l'application est dépassée", vbExclamation
DoCmd.Quit
End If
End Function

1 réponse

Avatar
Brubru
Bonjour,
Je ne suis pas sûr d'avoir compris ta question, mais d'après ton code, si la
date est dépassée tu ouvres simplement une boîte de dialogue et tu fermes
ton appli !
Tu saisis le mot de passe comment ?

Ce que je ferais, c'est ouvrir un formulaire de saisie de mot de passe et si
le mot de passe est bon c'est OK, sinon tu fermes l'appli....
--
BruBru