Discussion :

[Guillaume 78]

Et bien malheureusement il n'y a pas d'évenement sur l'objet Application

Par contre ce que tu peux faire c'est utilisé un formulaire qui reste ouvert toute la durée de l'application (par exemple un menu général) et sur l'évenement UnLoad() du dit formulaire, tu vides tes tables.

Autre solution, tu détermines quand tu peux vider les tables. Par exemple, si tu remplit une table temporaire sur l'ouverture d'un état en vue de son impression, tu peux libérer cette table sur la fermeture de cet état.

Bonjour,

cette reponse m'interesse : je souhaiterai vider 2 tables temporaires à la fermeture d'un état, mais sans avoir de message d'avertissement.

Comment rentrer cette information dans les propriétés du dit état?

Merci pour les informations
Guillaume

[Pierre Fauconnier]

Bonjour

Il faudrait voir dans les options d'Access pour décocher les messages de confirmation sur les requêtes action.

[Gabout]

Bonjour,

Je ne vois pas la difficulté (sauf si je n'ai pas tout compris)

Code :

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

1
2
3
4
5
6
Private Sub Report_Close()
   DoCmd.SetWarnings False
   DoCmd.RunSQL "delete * from Table1"
   DoCmd.RunSQL "delete * from Table2"
   DoCmd.SetWarnings True
End Sub

A+

[Invité]

Bonjour

Où regarder la FAQ Access et faire une recherche http://access.developpez.com/faq/?page=SQL#Warning

@ Pierre : Personnellement, je préfère garder tous les messages, et utiliser la méthode de la FAQ pour les contrôler.

C'est une histoire de goût

Edit : Grillé par Gabout, mais au moins j'ai pu donner mon avis.

Starec

[Pierre Fauconnier]

Bonjour Gabout et Starec,

J'aime bien la méthode de Gabout...

Je la trouvais parfois fastidieuse lorsqu'il y a de nombreuses requêtes action, mais sur le fond, sa technique est plus sûre, et à tout le moins plus contrôlable, que la mienne. Je la remets au goût du jour chez moi (ce n'est pas pour deux lignes de code...)

Merci et bon dimanche

[Jeannot45]

Je rejoins tout à fait Gabout et maintenant Pierre sur la méthode en prenant garde de bien réactiver systématiquement dès que je ressort de la procédure.

Bon dimanche

[Jack78960]

Salut à tous,
moi, j'aime bien la solution qui ne donne aucub message d'erreur

Code :

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

1
2
   currentdb.execute "delete * from Table1"
   currentdb.execute "delete * from Table2"

[Invité]

Starec a raison pour ne pas supprimer les messages d'avertissement qui peuvent découler d'une erreur.
Néanmoins c'est vrai aussi que quand on lance une procédure de suppression , de mise à jour ou de requête union , les messages d'avertissement Microsoft n'ont pas lieu d'apparaître au niveau de l'utilisateur, et dans ce cas la fonction "DoCmd.SetWarnings False" est la bienvenue à condition de la remettre à True juste après.