Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Access pour raymond roulette souris

pour raymond roulette souris

7 réponses
Avatar
lou
bonjour j'ai resolu le probleme du RUNTIME c'est parfait mais voici que se
présente un nouveau probleme

j'explique
sur un formulaire normal c'est a dire je l'ouvre et je le ferme avec la
commande docmd.close ici le code

' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing
fontionne tres bien plus de variable ACCESS se ferme tres bien (vérifié
dans fin de tache)

mais dans un formulaire chargé en caché !
je l'ouvre puis je le referme avec
DoCmd.OpenForm ("FACTclientSF"), acNormal, , , , acHidden


si je quite la base ACCESS ne se referme pas correctement (vérifié dans fin
de tache)
c'est normal la procedure suivante ne marche pas sur fermeture puisque
effectivement le formulaire n'est pas fraiment ferme
' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing

j'ai essayé de la placer sur perte de focus etc etc ça ne marche pas

aurais-tu une idée sur ce que je pourrais faire pour que cela fonctionne
aussi avec des formulaires en caché
je signale que je quite la base avec le form principal et que plusieurs sont
toujours cachés

j'esperes que c'est assez clair ?

merci pour ton aide
lou
Signaler un problème avec ce contenu

7 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jessy Sempere [MVP]
Bonjour

essais en rajouter le code suivant juste avant de quitter la base :

http://access.jessy.free.fr/index.html?Menu=4&Page=CloseAllForm

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"lou" a écrit dans le message news:
4003fa92$0$1160$
bonjour j'ai resolu le probleme du RUNTIME c'est parfait mais voici que
se

présente un nouveau probleme

j'explique
sur un formulaire normal c'est a dire je l'ouvre et je le ferme avec la
commande docmd.close ici le code

' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing
fontionne tres bien plus de variable ACCESS se ferme tres bien (vérifié
dans fin de tache)

mais dans un formulaire chargé en caché !
je l'ouvre puis je le referme avec
DoCmd.OpenForm ("FACTclientSF"), acNormal, , , , acHidden


si je quite la base ACCESS ne se referme pas correctement (vérifié dans
fin

de tache)
c'est normal la procedure suivante ne marche pas sur fermeture puisque
effectivement le formulaire n'est pas fraiment ferme
' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing

j'ai essayé de la placer sur perte de focus etc etc ça ne marche pas

aurais-tu une idée sur ce que je pourrais faire pour que cela fonctionne
aussi avec des formulaires en caché
je signale que je quite la base avec le form principal et que plusieurs
sont

toujours cachés

j'esperes que c'est assez clair ?

merci pour ton aide
lou




Avatar
lou
j'ai déjà une procédure du meme type


'While Forms.Count <> 0 'Ferme tout les formulaires
'DoCmd.Close acForm, Forms(0).Name
'Wend

j'ai aussi essayé la tienne
Function CloseAllForm()

Dim intForm As Integer
For intForm = 0 To Forms.Count - 1
DoCmd.Close acForm, Forms(0).Name, acSaveYes
Next

End Function

j'ai aussi essayé de le fermer individuellement

le tout bien sur avant de quiter la base

mais ça ne marche toujours pas

les variables sont toujours actives

autre idée?

Un grand merci

lou


"Jessy Sempere [MVP]" a écrit dans le message de
news:bu0vim$i4h$
Bonjour

essais en rajouter le code suivant juste avant de quitter la base :

http://access.jessy.free.fr/index.html?Menu=4&Page=CloseAllForm

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"lou" a écrit dans le message news:
4003fa92$0$1160$
bonjour j'ai resolu le probleme du RUNTIME c'est parfait mais voici
que


se
présente un nouveau probleme

j'explique
sur un formulaire normal c'est a dire je l'ouvre et je le ferme avec
la


commande docmd.close ici le code

' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing
fontionne tres bien plus de variable ACCESS se ferme tres bien
(vérifié


dans fin de tache)

mais dans un formulaire chargé en caché !
je l'ouvre puis je le referme avec
DoCmd.OpenForm ("FACTclientSF"), acNormal, , , , acHidden


si je quite la base ACCESS ne se referme pas correctement (vérifié dans
fin

de tache)
c'est normal la procedure suivante ne marche pas sur fermeture puisque
effectivement le formulaire n'est pas fraiment ferme
' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing

j'ai essayé de la placer sur perte de focus etc etc ça ne marche pas

aurais-tu une idée sur ce que je pourrais faire pour que cela
fonctionne


aussi avec des formulaires en caché
je signale que je quite la base avec le form principal et que plusieurs
sont

toujours cachés

j'esperes que c'est assez clair ?

merci pour ton aide
lou








Avatar
Raymond [mvp]
C'est très clair mais je t'aurais répondu comme jessy (juste pour le copier)
ou comme tu l'as fait.
à la fermeture de la base, normalement tous les formulaires reçoivent
l'ordre de fermeture. les événement doivent se succéder dans cet ordre.
Libération - Désactivé - Fermer
Si aucun contrôle du formulaire n'est actif, l'événement Perte focus se
produit aussi pour le formulaire après l'événement Libération mais avant
l'événement Désactivé.
ne jamais tester perte focus car il est aléatoire.
je l'aurais mis sur close ou unload.
peux-tu-placer des points d'arrêt sur toutes ces fonctions de fin de
formulaire pour vérifier si tu passes bien dessus? unload, close désactivé
et libération.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"lou" a écrit dans le message de
news:40041c05$0$6084$
j'ai déjà une procédure du meme type


'While Forms.Count <> 0 'Ferme tout les formulaires
'DoCmd.Close acForm, Forms(0).Name
'Wend

j'ai aussi essayé la tienne
Function CloseAllForm()

Dim intForm As Integer
For intForm = 0 To Forms.Count - 1
DoCmd.Close acForm, Forms(0).Name, acSaveYes
Next

End Function

j'ai aussi essayé de le fermer individuellement

le tout bien sur avant de quiter la base

mais ça ne marche toujours pas

les variables sont toujours actives

autre idée?

Un grand merci

lou


Avatar
lou
j'ai placé des points d'arrêt et aussi des msgbox sur toutes ces fonctions
de fin de
formulaire pour vérifier si ça passait bien dessus? unload, close désactivé
et libération.

et bien ça passe partout donc ça veux dire que le form se ferme bien mais
alors pourquoi il ne libere pas les var qui sont juste avant la fermeture

tres bonne question pour un champion !
je deviens fou
lou

"Raymond [mvp]" a écrit dans le message de
news:%
C'est très clair mais je t'aurais répondu comme jessy (juste pour le
copier)

ou comme tu l'as fait.
à la fermeture de la base, normalement tous les formulaires reçoivent
l'ordre de fermeture. les événement doivent se succéder dans cet ordre.
Libération - Désactivé - Fermer
Si aucun contrôle du formulaire n'est actif, l'événement Perte focus se
produit aussi pour le formulaire après l'événement Libération mais avant
l'événement Désactivé.
ne jamais tester perte focus car il est aléatoire.
je l'aurais mis sur close ou unload.
peux-tu-placer des points d'arrêt sur toutes ces fonctions de fin de
formulaire pour vérifier si tu passes bien dessus? unload, close désactivé
et libération.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"lou" a écrit dans le message de
news:40041c05$0$6084$
j'ai déjà une procédure du meme type


'While Forms.Count <> 0 'Ferme tout les formulaires
'DoCmd.Close acForm, Forms(0).Name
'Wend

j'ai aussi essayé la tienne
Function CloseAllForm()

Dim intForm As Integer
For intForm = 0 To Forms.Count - 1
DoCmd.Close acForm, Forms(0).Name, acSaveYes
Next

End Function

j'ai aussi essayé de le fermer individuellement

le tout bien sur avant de quiter la base

mais ça ne marche toujours pas

les variables sont toujours actives

autre idée?

Un grand merci

lou






Avatar
Raymond [mvp]
Donc là il faut voir le formulaire sous les yeux.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"lou" a écrit dans le message de
news:400431ef$0$16679$
j'ai placé des points d'arrêt et aussi des msgbox sur toutes ces fonctions
de fin de
formulaire pour vérifier si ça passait bien dessus? unload, close
désactivé

et libération.

et bien ça passe partout donc ça veux dire que le form se ferme bien mais
alors pourquoi il ne libere pas les var qui sont juste avant la
fermeture


tres bonne question pour un champion !
je deviens fou
lou

"Raymond [mvp]" a écrit dans le message de
news:%
C'est très clair mais je t'aurais répondu comme jessy (juste pour le
copier)

ou comme tu l'as fait.
à la fermeture de la base, normalement tous les formulaires reçoivent
l'ordre de fermeture. les événement doivent se succéder dans cet ordre.
Libération - Désactivé - Fermer
Si aucun contrôle du formulaire n'est actif, l'événement Perte focus se
produit aussi pour le formulaire après l'événement Libération mais avant
l'événement Désactivé.
ne jamais tester perte focus car il est aléatoire.
je l'aurais mis sur close ou unload.
peux-tu-placer des points d'arrêt sur toutes ces fonctions de fin de
formulaire pour vérifier si tu passes bien dessus? unload, close
désactivé


et libération.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"lou" a écrit dans le message de
news:40041c05$0$6084$
j'ai déjà une procédure du meme type


'While Forms.Count <> 0 'Ferme tout les formulaires
'DoCmd.Close acForm, Forms(0).Name
'Wend

j'ai aussi essayé la tienne
Function CloseAllForm()

Dim intForm As Integer
For intForm = 0 To Forms.Count - 1
DoCmd.Close acForm, Forms(0).Name, acSaveYes
Next

End Function

j'ai aussi essayé de le fermer individuellement

le tout bien sur avant de quiter la base

mais ça ne marche toujours pas

les variables sont toujours actives

autre idée?

Un grand merci

lou










Avatar
4B Ingenierie
bonjour,

Tu peux utiliser la solution suivante
http://www.lebans.com/mousewheelonoff.htm

Pas de subclassing et pas de dll ou ocx à registrer pour désactiver la
molette de souris

Cordialement

Dominique
www.everproduct.com

"lou" a écrit dans le message de news:
4003fa92$0$1160$
bonjour j'ai resolu le probleme du RUNTIME c'est parfait mais voici que
se

présente un nouveau probleme

j'explique
sur un formulaire normal c'est a dire je l'ouvre et je le ferme avec la
commande docmd.close ici le code

' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing
fontionne tres bien plus de variable ACCESS se ferme tres bien (vérifié
dans fin de tache)

mais dans un formulaire chargé en caché !
je l'ouvre puis je le referme avec
DoCmd.OpenForm ("FACTclientSF"), acNormal, , , , acHidden


si je quite la base ACCESS ne se referme pas correctement (vérifié dans
fin

de tache)
c'est normal la procedure suivante ne marche pas sur fermeture puisque
effectivement le formulaire n'est pas fraiment ferme
' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing

j'ai essayé de la placer sur perte de focus etc etc ça ne marche pas

aurais-tu une idée sur ce que je pourrais faire pour que cela fonctionne
aussi avec des formulaires en caché
je signale que je quite la base avec le form principal et que plusieurs
sont

toujours cachés

j'esperes que c'est assez clair ?

merci pour ton aide
lou




Avatar
lou
probleme resolu merci a tous porr votre aide

lou

"4B Ingenierie" a écrit dans le message de
news:
bonjour,

Tu peux utiliser la solution suivante
http://www.lebans.com/mousewheelonoff.htm

Pas de subclassing et pas de dll ou ocx à registrer pour désactiver la
molette de souris

Cordialement

Dominique
www.everproduct.com

"lou" a écrit dans le message de news:
4003fa92$0$1160$
bonjour j'ai resolu le probleme du RUNTIME c'est parfait mais voici
que


se
présente un nouveau probleme

j'explique
sur un formulaire normal c'est a dire je l'ouvre et je le ferme avec
la


commande docmd.close ici le code

' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing
fontionne tres bien plus de variable ACCESS se ferme tres bien
(vérifié


dans fin de tache)

mais dans un formulaire chargé en caché !
je l'ouvre puis je le referme avec
DoCmd.OpenForm ("FACTclientSF"), acNormal, , , , acHidden


si je quite la base ACCESS ne se referme pas correctement (vérifié dans
fin

de tache)
c'est normal la procedure suivante ne marche pas sur fermeture puisque
effectivement le formulaire n'est pas fraiment ferme
' clsMouseWheel.SubClassUnHookForm
' Set clsMouseWheel.Form = Nothing
' Set clsMouseWheel = Nothing

j'ai essayé de la placer sur perte de focus etc etc ça ne marche pas

aurais-tu une idée sur ce que je pourrais faire pour que cela
fonctionne


aussi avec des formulaires en caché
je signale que je quite la base avec le form principal et que plusieurs
sont

toujours cachés

j'esperes que c'est assez clair ?

merci pour ton aide
lou