Date de validité

Résolu/Fermé
FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024 - 2 févr. 2018 à 15:33
FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024 - 13 févr. 2018 à 19:38
bonjour, j'ai une base de données Access. je souhaite programmer la date de validité de la base de données Access. Merci

1 réponse

yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
3 févr. 2018 à 23:35
bonsoir, c'est quoi la date de validité d'une base de données Access?
0
FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024
12 févr. 2018 à 10:07
Bonjour, la date de validité, c'est une date d'expiration, une date à partir de laquelle la base ne fonctionne plus. tout comme les version démo des logiciels. il y a des moments le client dit qu'il va essayer la base pendant 2 semaines alors je souhaite que après les 2 semaines la base se plante.
0
yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476 > FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024
12 févr. 2018 à 14:55
si tu as du code VBA dans cette base, tu peux bricoler quelque chose pour que le code refuse de fonctionner, ou même nettoie la base, après une date déterminée.
0
FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024
12 févr. 2018 à 18:41
quel serait donc ce code vba, aidez moi
0
yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476 > FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024
Modifié le 12 févr. 2018 à 19:23
exemple de code, qui ferme la base dès le 12 février 2018:
Public Function autostop()
If Now() > DateSerial(2018, 2, 12) Then
    Application.CloseCurrentDatabase
End If
End Function

Tu peux créer une macro appelée AutoExec qui va appeler cette fonction.
Sache toutefois qu'un utilisateur averti peut facilement contourner cette protection.
Ceci terminera Access, ce qui est un peu plus agressif:
Public Function autostop()
If Now() > DateSerial(2018, 2, 12) Then
    Application.Quit
End If
End Function

Sois prudent avant de tester cela, tu risques de rendre ta base inutilisable, :-)
0
FONGBE Messages postés 149 Date d'inscription samedi 5 novembre 2016 Statut Membre Dernière intervention 7 mars 2024
13 févr. 2018 à 19:38
Merci je vais tester. mais le test je copie la base. merci beaucoup
0