OVH Cloud OVH Cloud

DATE

3 réponses
Avatar
erm1
Bonjour je voudrais faire que quand la date d'expiration se produit un mot
de passe est demandé à l'utilisateur si c'est le bon mot de passe alors mon
formulaire s'ouvre definitivement et il ne soit plus nécessaire dans les
prochaines ouverture du formulaire de rentrer un mot de passe

si ce n'est pas le bon l'application se ferme.j'ai déja un
début de code pouvez vous m'aidez à le terminer
merci
Public Function
DateExpirationApplication()
If Date >= DateSerial(2003, 05, 01) Then
MsgBox "La date d'expiration de l'application est dépassée",
vbExclamation
DoCmd.Quit
End If
End Function

3 réponses

Avatar
Hervé DUCARNE
Bonjour,
Tu peux procéder de plusieurs façons :
1/ créer une clé dans le registre.
2/ créer un fichier sur le disque
3/ mettre une valeur dans une table
J'en oublie certainement.

Le plus simple, je pense, c'est de créer un champ oui/non dans une table de
ta base, et au chargement du formulaire allez voir si le champ et sur oui ou
sur non (utilises la fonction dlookup).
Si c'est sur non, tu demandes le mot de passe, ensuite si le mot de passe
est bon tu mets le champ sur oui, s'il est sur oui, bah tu fais rien ;o)

Et voili voilou !

@+

"erm1" a écrit dans le message de
news:42729cf9$0$10659$
Bonjour je voudrais faire que quand la date d'expiration se produit un mot
de passe est demandé à l'utilisateur si c'est le bon mot de passe alors
mon

formulaire s'ouvre definitivement et il ne soit plus nécessaire dans les
prochaines ouverture du formulaire de rentrer un mot de passe

si ce n'est pas le bon l'application se ferme.j'ai déja un
début de code pouvez vous m'aidez à le terminer
merci
Public Function
DateExpirationApplication()
If Date >= DateSerial(2003, 05, 01) Then
MsgBox "La date d'expiration de l'application est dépassée",
vbExclamation
DoCmd.Quit
End If
End Function




Avatar
erm1
pourrais tu me dire le code à ecrire sur au chargement du formulaire allez
voir si le champ et sur oui ou sur non
merci
"Hervé DUCARNE" a écrit dans le message de news:
ub38%
Bonjour,
Tu peux procéder de plusieurs façons :
1/ créer une clé dans le registre.
2/ créer un fichier sur le disque
3/ mettre une valeur dans une table
J'en oublie certainement.

Le plus simple, je pense, c'est de créer un champ oui/non dans une table
de
ta base, et au chargement du formulaire allez voir si le champ et sur oui
ou
sur non (utilises la fonction dlookup).
Si c'est sur non, tu demandes le mot de passe, ensuite si le mot de passe
est bon tu mets le champ sur oui, s'il est sur oui, bah tu fais rien ;o)

Et voili voilou !

@+

"erm1" a écrit dans le message de
news:42729cf9$0$10659$
Bonjour je voudrais faire que quand la date d'expiration se produit un
mot
de passe est demandé à l'utilisateur si c'est le bon mot de passe alors
mon

formulaire s'ouvre definitivement et il ne soit plus nécessaire dans les
prochaines ouverture du formulaire de rentrer un mot de passe

si ce n'est pas le bon l'application se ferme.j'ai déja un
début de code pouvez vous m'aidez à le terminer
merci
Public Function
DateExpirationApplication()
If Date >= DateSerial(2003, 05, 01) Then
MsgBox "La date d'expiration de l'application est dépassée",
vbExclamation
DoCmd.Quit
End If
End Function








Avatar
Hervé DUCARNE
Re,

Comme je te l'ai dit avec la fonction dlookup.

If dlookup ("[ton_champ_oui_non]", "[ta_table_ou_est_ce_champ]")=yes then

Et voili voilou...

@+

"erm1" a écrit dans le message de
news:42765d05$0$18776$
pourrais tu me dire le code à ecrire sur au chargement du formulaire allez
voir si le champ et sur oui ou sur non
merci
"Hervé DUCARNE" a écrit dans le message de news:
ub38%
Bonjour,
Tu peux procéder de plusieurs façons :
1/ créer une clé dans le registre.
2/ créer un fichier sur le disque
3/ mettre une valeur dans une table
J'en oublie certainement.

Le plus simple, je pense, c'est de créer un champ oui/non dans une table
de
ta base, et au chargement du formulaire allez voir si le champ et sur
oui


ou
sur non (utilises la fonction dlookup).
Si c'est sur non, tu demandes le mot de passe, ensuite si le mot de
passe


est bon tu mets le champ sur oui, s'il est sur oui, bah tu fais rien ;o)

Et voili voilou !

@+

"erm1" a écrit dans le message de
news:42729cf9$0$10659$
Bonjour je voudrais faire que quand la date d'expiration se produit un
mot
de passe est demandé à l'utilisateur si c'est le bon mot de passe alors
mon

formulaire s'ouvre definitivement et il ne soit plus nécessaire dans
les



prochaines ouverture du formulaire de rentrer un mot de passe

si ce n'est pas le bon l'application se ferme.j'ai déja un
début de code pouvez vous m'aidez à le terminer
merci
Public Function
DateExpirationApplication()
If Date >= DateSerial(2003, 05, 01) Then
MsgBox "La date d'expiration de l'application est dépassée",
vbExclamation
DoCmd.Quit
End If
End Function