bonjour, j'ai mis une date limite 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 même dans
les prochaines ouvertures du formulaire.
merci de votre aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
| bonjour, j'ai mis une date limite 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 même dans | les prochaines ouvertures du formulaire. | merci de votre aide | | Private Sub Form_Load() | TestMaxdate(120) | End Sub
C'est sur ouverture du form que tu doit faire le test ! Si le test n'est pas ok, tu annulle!
Private Sub Form_Open(Cancel As Integer) If TestMaxdate(120) then cancel = True end if End Sub
Si ta fonction renvoie True lorsque le date est dépassée, tu peux écrire plus simplement :
| bonjour, j'ai mis une date limite 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 même dans
| les prochaines ouvertures du formulaire.
| merci de votre aide
|
| Private Sub Form_Load()
| TestMaxdate(120)
| End Sub
C'est sur ouverture du form que tu doit faire le test !
Si le test n'est pas ok, tu annulle!
Private Sub Form_Open(Cancel As Integer)
If TestMaxdate(120) then
cancel = True
end if
End Sub
Si ta fonction renvoie True lorsque le date est dépassée,
tu peux écrire plus simplement :
| bonjour, j'ai mis une date limite 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 même dans | les prochaines ouvertures du formulaire. | merci de votre aide | | Private Sub Form_Load() | TestMaxdate(120) | End Sub
C'est sur ouverture du form que tu doit faire le test ! Si le test n'est pas ok, tu annulle!
Private Sub Form_Open(Cancel As Integer) If TestMaxdate(120) then cancel = True end if End Sub
Si ta fonction renvoie True lorsque le date est dépassée, tu peux écrire plus simplement :