OVH Cloud OVH Cloud

Interdiction de quitter une appli

4 réponses
Avatar
Guillaume
Bonjour,
Je voudrais interdire les utilisateurs de quitter mon=20
application (sortir par le "X" event On close d=E9clench=E9)
tant que les erreurs ne sont pas totalement corrig=E9es.
J'utilise l'evenement On close
Merci de votre aide

4 réponses

Avatar
Raymond
Bonjour.

Tu peux supprimer l'affichage du "X" par une api très facilement.
voir : http://access.seneque.free.fr/supprimer_quitter.htm

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Guillaume" a écrit dans le message de
news:0bde01c37f43$7eed6790$
Bonjour,
Je voudrais interdire les utilisateurs de quitter mon
application (sortir par le "X" event On close déclenché)
tant que les erreurs ne sont pas totalement corrigées.
J'utilise l'evenement On close
Merci de votre aide
Avatar
Guillaume
Non, ce n'est pas cela, raymond !
Je voudrais garder le "X" pour fermer l'appli
et j'ai programmé l'evenement On Close de ma fiche
de sorte qu'il fasse un controle de coherence jusqu'à
ce qu'il n'y ait plus d'erreur. S'il rencontre des erreurs
dans mes test, je bloque la sortie de la fiche !

-----Message d'origine-----
Bonjour.

Tu peux supprimer l'affichage du "X" par une api très
facilement.

voir : http://access.seneque.free.fr/supprimer_quitter.htm

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Guillaume" a écrit dans le message
de

news:0bde01c37f43$7eed6790$
Bonjour,
Je voudrais interdire les utilisateurs de quitter mon
application (sortir par le "X" event On close déclenché)
tant que les erreurs ne sont pas totalement corrigées.
J'utilise l'evenement On close
Merci de votre aide

.



Avatar
Raymond
Bonjour.

il ne s'agit plus d'empêcher de fermer l'application mais un formulaire et
l'application.
Pour le formulaire l'événement on close ne retourne pas de valeur donc
inutilisable, il faut tester unload et il suffit de mettre cette fonction:
Private Sub Form_Unload(Cancel As Integer)
If Not Macondition Then Cancel = True
End Sub
pour que le formulaire ne se ferme pas tant que l'enregistrement n'est pas
bon.
Il suffit également de placer la propriété "bouton fermer" de ton formulaire
à non pour l'invalider pendant la saisie et le mettre à oui lorsque la
saisie est bonne pour gérer l'enfoncement par l'opérateur du bouton de
fermeture du formulaire.

mais ça ne suffit pas, car l'événement unload peut provenir justement d'une
demande de fermeture de l'application soit par l'opérateur soit par vba.
dans ce cas il est possible que plusieurs formulaires soient ouverts et
soient utiles au bon fonctionnement d'autres formulaires. Ce qui fait que
ton formulaire va resté ouvert mais tous les autres vont se fermer et tu
n'auras plus accès à certaines informations, peut-être, qui vont t'empêcher
de finir ta saisie. il faut quand même voir pour invalider ou non cette
sortie par le X de access.


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Guillaume" a écrit dans le message de
news:027001c37fbe$b8ca5f10$
Non, ce n'est pas cela, raymond !
Je voudrais garder le "X" pour fermer l'appli
et j'ai programmé l'evenement On Close de ma fiche
de sorte qu'il fasse un controle de coherence jusqu'à
ce qu'il n'y ait plus d'erreur. S'il rencontre des erreurs
dans mes test, je bloque la sortie de la fiche !
Avatar
Guillaume
Raymond, t'es génial !!!
MERCI !!!