Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 22/11/2011, 00h59   #1
Invité de passage
 
Inscription : février 2005
Messages : 4
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 4
Points : 1
Points : 1
Par défaut date d'expiration pour une application ACCESS

Salut;
j'ai trouvé dans l'un de vos code une fonction qui permet de Créer une date d'expiration pour une application :
Code :
1
2
3
4
If Date >= DateSerial(2003, 12, 31) Then
MsgBox "La date d\'expiration de l\'application est dépassée", vbExclamation
DoCmd.Quit
End If
mais si je change la date système l'application peut s'exécuter, je demande votre aide pour modifier ce code ainsi même si je change la date après l'exécution du code (la 1ère exécution) l'application ne démarre pas, j'ai essayé de faire appel à une variable booléenne mais cela n'a pas marché.
Abdel Illah est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/11/2011, 06h02   #2
Rédacteur/Modérateur
 
Avatar de Philippe JOCHMANS
 
Homme Philippe JOCHMANS
Développeur informatique
Inscription : mai 2005
Messages : 17 623
Détails du profil
Informations personnelles :
Nom : Homme Philippe JOCHMANS
Âge : 44
Localisation : France, Loir et Cher (Centre)

Informations professionnelles :
Activité : Développeur informatique
Secteur : Communication - Médias

Informations forums :
Inscription : mai 2005
Messages : 17 623
Points : 30 954
Points : 30 954
Envoyer un message via MSN à Philippe JOCHMANS Envoyer un message via Skype™ à Philippe JOCHMANS
Bonjour

La variable booléenne sera initialisée à chaque démarrage de l'application, donc cela n'est pas valable.

Par contre tu pourrais stocker une valeur dans une table et interroger celle-ci au démarrage.

Philippe
__________________
Détaillez vos questions, sinon vous aurez des réponses erronées et vous irez tout droit dans le et lisez les règles sinon
Si vous pensez commencer sans un livre, oublier : livres pour débuter
Vous pouvez consulter mes articles sur Access et PowerPoint
Le blog Office.

Inutile de m'envoyer un MP pour des questions techniques ou de me relancer , je n'y répondrais pas.
Philippe JOCHMANS est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 26/11/2011, 00h30   #3
Invité de passage
 
Inscription : février 2005
Messages : 4
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 4
Points : 1
Points : 1
Salut;
vous aviez raison, j'ai réussi à ne pas faire exécuter le programme après la date expiration, même si je change la date système en faisant appel à une table,
ce que j'aimerais bien faire est de verrouiller cette table contre la modification sauf par programme (VBA)
merci pour votre aide et à bientôt;
Abdel Illah est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 26/11/2011, 02h07   #4
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
ou tu peut aller voir mon tutoriel http://www.developpez.net/forums/d11...tivation-base/

comment créer un activation pour une base de donnée avec une date maximum ou un nombre maximum d'ouverture
__________________
Parfois il faut faire le tour d'une roche 10 fois avant de s'apercevoir quelle est ronde.
  • Si vous trouvé mon post intéressant, n'oubliez pas de voter coté inférieur droit du message. Merci
  • Si votre Post est indiquez le....
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 10
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 11h05.


 
 
 
 
Partenaires

Hébergement Web