[Résolu][Base] Sauvegarder avant de fermer l'appli

[Mong38]

Bonjour,
J'ai créé une petite appli avec un formulaire menu qui ouvre divers formulaires de saisie, rapports et mises à jour de données. J'ai ajouté un bouton pour fermer le menu et revenir à Base. Pour éviter à l'utilisateur des manips risquées (et à moi des heures de réparation) je veux aussi un bouton pour fermer complètement, et l'appli et Libre Office.

J'ai donc associé une macro avec l'instruction ThisDatabaseDocument.close(True) à mon bouton. Ça ferme bien, mais sans sauvegarder les éventuelles modifs de présentation ou de structure. Il y a sûrement un truc... que je n'ai pas trouvé.
Merci de m'éclairer

[micmac]

Bonjour,

Pour être aidé efficacement par les bénévoles de ce forum, veuillez fournir les éléments suivants :
1. publier le code de la macro exposant le problème
2. joindre votre base : Comment joindre un fichier. Pensez à dépersonnaliser le fichier à joindre.

[Jeff]

Bonjour et bienvenue,

À tout hasard, en l'absence de fichier joint : viewtopic.php?t=61779&hilit=ThisDatabaseDocument+close

Lire le fil jusqu'au bout, y'a une correction à effectuer.

A +

[Mong38]

Merci, mais il n'a pas vraiment de code à montrer: la macro de fermeture ne comprend pour l'instant que cette seule instruction ThisDatabaseDocument.close(True).

Et si la base est bien fermée, les modifications éventuelles apportées aux formulaires, requêtes et autres objets ne sont pas sauvegardées. Il faudrait au moins que Libre Office demande, ou bien insérer une instruction de sauvegarde avant la fermeture. Pour dire autrement: quel serait l'équivalent ooBasic de la méthode save en VB, qui enregistrerait la totalité de la base?

[Mong38]

Ok autant pour moi, la réponse était trop simple, je cherchais avec les mauvais mots-clefs. Voici donc le code tout bête pour sauvegarder puis fermer.

Code : Tout sélectionner

Sub FermetureBase
	Fermer_form_menu
	With ThisDatabaseDocument
		.store
		.close(True)
	End with
End Sub 

Merci pour votre attention, lorsque mon projet sera raisonnablement fini je le partagerai volontiers en entier.