Date de validité

Résolu
FONGBE Messages postés 147 Date d'inscription   Statut Membre Dernière intervention   -  
FONGBE Messages postés 147 Date d'inscription   Statut Membre Dernière intervention   -
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

Réponse 1 / 1
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonsoir, c'est quoi la date de validité d'une base de données Access?
0
FONGBE Messages postés 147 Date d'inscription   Statut Membre Dernière intervention  
 
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 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > FONGBE Messages postés 147 Date d'inscription   Statut Membre Dernière intervention  
 
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 147 Date d'inscription   Statut Membre Dernière intervention  
 
quel serait donc ce code vba, aidez moi
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > FONGBE Messages postés 147 Date d'inscription   Statut Membre Dernière intervention  
 
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 147 Date d'inscription   Statut Membre Dernière intervention  
 
Merci je vais tester. mais le test je copie la base. merci beaucoup
0

Discussions similaires

Smartbox comment prolonger une date de coffret
Jenn -
Xileh -

3 réponses
Prolongation de la validité de ma smartbox
coucou -
georges97 -

3 réponses
je cherche la date et le lieu de naissance d une personne
country -
bg62 -

2 réponses
smartbox périmée
Annie -
evelyne -

24 réponses
MFG pas encore arrivée
kkwtanne -
brucine -

2 réponses