Discussion :

[Tortille]

Bonjour,

Je me demande s'il est possible de connaître la date et l'heure de la dernière modification intervenue dans la base de donnée, d'une part au niveau des données et d'autre part au niveau du reste (code, formulaire, rapport ...) ou bien de l'ensemble des deux.

Je ne peux pas me fier à la date qui est sur le disque car il suffit d'ouvrir et de fermer la base pour que la date change.

C'est pour savoir si une sauvegarde de la base est nécessaire à sa sortie, et du coup éviter d'avoir des sauvegardes en double sur le disque ou ailleurs.

Merci d'avance.

[titi95]

Bonjour

Tu peux récupérer les dates de modification des objets avec une requête sur la table MSysObjects

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT MSysObjects.DateUpdate, MSysObjects.Name
FROM MSysObjects;

Quant aux modifications des données des tables, j'utilise une table à 1 enregistrement qui sert à stocker toutes les infos de la base (version, date MAJ, ...) dans laquelle j'ai un champ Date DernièreModif pour chaque table concernée (quelques unes ! ),
et dans l'événement 'Avant MAJ' du formulaire concerné j'exécute une requête mise à jour de table qui met Now() dans le champ DernièreModif.
(il y a peut-être plus simple ? )

[Tortille]

merci titi95,

Mais la table MSysObjects.DateUpdate met à jour automatiquement certains Objects au simple fait d'ouvrir et fermer la base sans aucune modif, dans ces Objects il y a des tables.

Ca aurait été trop facile.

pour ta deuxième solution ok, mais faut rien oublier de noter, j'avais commencer, sur mes tables pour voir qui modifiait quoi, mais parfois des bugs aussi j'ai passé le code en remarque pour le moment et rendre ma base plus fiable.

Après avoir posté cette discussion, je me suis dit que je pourrais employer bêtement un programme qui trouve les doublons,
de cette manière :
Si ma base est identique avant et après ouverture c'est que aucun changement n'est intervenu, pas besoin de sauvegarder.

Et bien le fait d'ouvrir une base et de la fermer de suite change plein de lignes dans le fichier.accdb, on le voit avec le logiciel WinMerge.

Ce que le logiciel de recherche de doublons confirme, dans un dossier, la base plus la sauvegarde de la base sont des doublons,
j'ouvre et ferme la base, ce ne sont plus des doublons.

Pour une solution simple, je crois que c'est rappé.

Bien cordialement

[Thierry_PALLIER]

Bonjour.

Pour la date de modification:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CurrentProject.AllForms("Form1").DateModified

https://stackoverflow.com/questions/...es-queries-for
https://support.microsoft.com/en-us/...-incorrect-dat

Cdlt

[Tortille]

Merci Thierry pour les infos.

[titi95]

Bonjour

Mais la table MSysObjects.DateUpdate met à jour automatiquement certains Objects au simple fait d'ouvrir et fermer la base sans aucune modif, dans ces Objects il y a des tables

??? pas chez moi ; vérifié sur plusieurs bases. Et toi, tu as vraiment vérifié ?

Par ailleurs, DateModified et LastUpdated prennent leurs infos dans une table qui s'appelle... MSysObjects !

L'avantage de requêter sur cette table c'est que tu peux extraire ce que tu veux et trier (sur la date par exemple).
Par contre, il est préférable d'avoir des noms d'objets "standardisés" pour faciliter la requête.
C'est le cas dans toutes mes bases où les noms des tables commencent pat 't_', ceux des formulaires par 'f_'...

[Tortille]

Bonjour Titi95,

??? pas chez moi ; vérifié sur plusieurs bases. Et toi, tu as vraiment vérifié ?

Bien sûr j'ai vérifié, et même plusieurs fois, mais que sur ma base qui à un formulaire d'accueil qui s'ouvre à l'ouverture de la base.
Donc c'est toi qui a raison.
Je vais garder mon formulaire d'accueil en ouverture automatique dont je dois trouver une autre solution sans la table MSysObjects.

Je pensais comme je suis l'unique utilisateur de la base sur un seul ordi, à une autre solution pour les tables :

Comparer les tables à l'ouverture et à la fermeture pour détecter un changement de donnée, et si oui, avertir qu'une sauvegarde serait utile avant fermeture.

Pour les autres objets de la base je n'ai pas d'idée.

Bien cordialement.