Compactage base depuis programme en cours

Au lancement de l’application, avant la connexion avec les données le programme vérifie si il y a des connexions existantes sur les données, pour ce faire présence de fichier(s) fichier Données.ldb, si ce fichier est présent, cela signifie que la base est utilisée ===> pas de compactage, le programme démarre normalement.

Si personne n’est connecté sur Données.mdb, le programme vérifie alors que la base n'est pas en cours de compactage, si le fichier DonnéesTmp.mdb est présent ceci signifie qu'elle est en cours de compactage ==> exit du programme avec un message indiquant à l’utilisateur de se reconnecter dans quelques secondes (le compactage est très rapide).

Si la base n’est pas en cours de compactage, le programme vérifie si il y a déjà eu un compactage aujourd’hui, (la procédure vérifie la présence sur le serveur (répertoire où sont les données) qu’il n’y a pas de fichier texte nommé JJMMAAAA, si ce fichier est présent le compactage a déjà été fait ===> pas de compactage, le programme démarre normalement.

En résumé si je suis le premier de la journée et qu’il n’y a personne de connecté, le programme lance le compactage.

Après le compactage la procédure créée un fichier nommé JJMMAAAA dans le répertoire où sont stockées les données Données.mdb, ceci permet de déposer un flag lisible à chaque lancement de programme, ceci afin de ne lancer qu’un compactage dans la journée.

Ces modules sont lancés depuis la macro « CompactageMacro » cette macro est lancée avant l’autoexec, pour cela il faut indiquer dans la chaine de commande /x /CompactageMacro.