OVH Cloud OVH Cloud

Access 2003 - Desactiver molette

5 réponses
Avatar
Thierryx96
Bonjour,

Jai deja trouver de multiples solutions a ce probleme dans divers forums de
developeurs, qui proposent soient une solution avec dll soit la creation d'un
module. La solution qui m'interesse est la dll, mais elle ne semble pas
focntionner pour access 2003... Y'a t'il une solution avec dlll pour access
2003 ? ou elle ne concerne que access 2000...


Merci

Thierry

5 réponses

Avatar
Raymond [mvp]
Bonjour.

toutes les dll doivent fonctionner sous 2003. as-tu essayé celle-ci :
http://officesystem.access.free.fr/souris.htm

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


"Thierryx96" a écrit dans le message
de news:
Bonjour,

Jai deja trouver de multiples solutions a ce probleme dans divers forums
de
developeurs, qui proposent soient une solution avec dll soit la creation
d'un
module. La solution qui m'interesse est la dll, mais elle ne semble pas
focntionner pour access 2003... Y'a t'il une solution avec dlll pour
access
2003 ? ou elle ne concerne que access 2000...


Merci

Thierry


Avatar
Françoise Labis
Bonjour Raymond

J'ai suivi à la lettre les instructions sur ta page
http://officesystem.access.free.fr/souris.htm
mais à l'ouverture du formulaire, j'ai un message:
"Erreur d'exécution '500002'
Erreur définie par l'application ou par l'objet"
et à la fermeture:
"Erruer d'exécution '91':
Variable objet ou variable de bloc With non définie"

A la réouverure du formulaire, Access se plante.

Ce que j'ai fait:
j'ai copié le fichier rs_mousewheel.dll dans c:windowssystem32
puis je l'ai registré comme décrit
puis je l'ai référencé dans Access.

dans mon code, j'ai:

Option Compare Database

Private WithEvents clsMouseWheel As RS_MouseWheel.CMouseWheel

Private Sub Form_Load()
Set clsMouseWheel = New RS_MouseWheel.CMouseWheel
Set clsMouseWheel.Form = Me
clsMouseWheel.SubClassHookForm
End Sub

Private Sub Form_Close()
clsMouseWheel.SubClassUnHookForm
Set clsMouseWheel.Form = Nothing
Set clsMouseWheel = Nothing
End Sub

Private Sub clsMouseWheel_MouseWheel(Cancel As Integer)
Cancel = True
End Sub

Wondows XP Pro SP2, Office 2003, tout est à jour.
J'ai raté un step?
Françoise

"Raymond [mvp]" a écrit dans le message de
news:
Bonjour.

toutes les dll doivent fonctionner sous 2003. as-tu essayé celle-ci :
http://officesystem.access.free.fr/souris.htm

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


"Thierryx96" a écrit dans le
message de news:
Bonjour,

Jai deja trouver de multiples solutions a ce probleme dans divers forums
de
developeurs, qui proposent soient une solution avec dll soit la creation
d'un
module. La solution qui m'interesse est la dll, mais elle ne semble pas
focntionner pour access 2003... Y'a t'il une solution avec dlll pour
access
2003 ? ou elle ne concerne que access 2000...


Merci

Thierry






Avatar
Raymond [mvp]
passe en compilation et dis moi la ou les lignes en erreur.

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


"Françoise Labis" a écrit dans le message de
news: %
Bonjour Raymond

J'ai suivi à la lettre les instructions sur ta page
http://officesystem.access.free.fr/souris.htm
mais à l'ouverture du formulaire, j'ai un message:
"Erreur d'exécution '500002'
Erreur définie par l'application ou par l'objet"
et à la fermeture:
"Erruer d'exécution '91':
Variable objet ou variable de bloc With non définie"

A la réouverure du formulaire, Access se plante.

Ce que j'ai fait:
j'ai copié le fichier rs_mousewheel.dll dans c:windowssystem32
puis je l'ai registré comme décrit
puis je l'ai référencé dans Access.

dans mon code, j'ai:

Option Compare Database

Private WithEvents clsMouseWheel As RS_MouseWheel.CMouseWheel

Private Sub Form_Load()
Set clsMouseWheel = New RS_MouseWheel.CMouseWheel
Set clsMouseWheel.Form = Me
clsMouseWheel.SubClassHookForm
End Sub

Private Sub Form_Close()
clsMouseWheel.SubClassUnHookForm
Set clsMouseWheel.Form = Nothing
Set clsMouseWheel = Nothing
End Sub

Private Sub clsMouseWheel_MouseWheel(Cancel As Integer)
Cancel = True
End Sub

Wondows XP Pro SP2, Office 2003, tout est à jour.
J'ai raté un step?
Françoise

"Raymond [mvp]" a écrit dans le message
de news:
Bonjour.

toutes les dll doivent fonctionner sous 2003. as-tu essayé celle-ci :
http://officesystem.access.free.fr/souris.htm

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


"Thierryx96" a écrit dans le
message de news:
Bonjour,

Jai deja trouver de multiples solutions a ce probleme dans divers forums
de
developeurs, qui proposent soient une solution avec dll soit la creation
d'un
module. La solution qui m'interesse est la dll, mais elle ne semble pas
focntionner pour access 2003... Y'a t'il une solution avec dlll pour
access
2003 ? ou elle ne concerne que access 2000...


Merci

Thierry










Avatar
Françoise Labis
Tout d'abord encore merci de t'intéresser à mes petits problèmes

En compilant, j'ai aucune erreur.
En ouvrant le formulaire, le débogueur s'arrete sur la ligne **

Private Sub Form_Load()
** Set clsMouseWheel = New RS_MouseWheel.CMouseWheel
Set clsMouseWheel.Form = Me
clsMouseWheel.SubClassHookForm
End Sub

En fermant il s'arrete sur la ligne **
Private Sub Form_Close()
** clsMouseWheel.SubClassUnHookForm
Set clsMouseWheel.Form = Nothing
Set clsMouseWheel = Nothing
End Sub

Est ce que ca répond à ta question?

"Raymond [mvp]" a écrit dans le message de
news:
passe en compilation et dis moi la ou les lignes en erreur.

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


"Françoise Labis" a écrit dans le message de
news: %
Bonjour Raymond

J'ai suivi à la lettre les instructions sur ta page
http://officesystem.access.free.fr/souris.htm
mais à l'ouverture du formulaire, j'ai un message:
"Erreur d'exécution '500002'
Erreur définie par l'application ou par l'objet"
et à la fermeture:
"Erruer d'exécution '91':
Variable objet ou variable de bloc With non définie"

A la réouverure du formulaire, Access se plante.

Ce que j'ai fait:
j'ai copié le fichier rs_mousewheel.dll dans c:windowssystem32
puis je l'ai registré comme décrit
puis je l'ai référencé dans Access.

dans mon code, j'ai:

Option Compare Database

Private WithEvents clsMouseWheel As RS_MouseWheel.CMouseWheel

Private Sub Form_Load()
Set clsMouseWheel = New RS_MouseWheel.CMouseWheel
Set clsMouseWheel.Form = Me
clsMouseWheel.SubClassHookForm
End Sub

Private Sub Form_Close()
clsMouseWheel.SubClassUnHookForm
Set clsMouseWheel.Form = Nothing
Set clsMouseWheel = Nothing
End Sub

Private Sub clsMouseWheel_MouseWheel(Cancel As Integer)
Cancel = True
End Sub

Wondows XP Pro SP2, Office 2003, tout est à jour.
J'ai raté un step?
Françoise

"Raymond [mvp]" a écrit dans le message
de news:
Bonjour.

toutes les dll doivent fonctionner sous 2003. as-tu essayé celle-ci :
http://officesystem.access.free.fr/souris.htm

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


"Thierryx96" a écrit dans le
message de news:
Bonjour,

Jai deja trouver de multiples solutions a ce probleme dans divers
forums de
developeurs, qui proposent soient une solution avec dll soit la
creation d'un
module. La solution qui m'interesse est la dll, mais elle ne semble pas
focntionner pour access 2003... Y'a t'il une solution avec dlll pour
access
2003 ? ou elle ne concerne que access 2000...


Merci

Thierry














Avatar
Raymond [mvp]
c'est bon et pas bon. le form_close c'est normal.

essaie de re-registrer la dll par regsvr32.
reboote le pc.

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


"Françoise Labis" a écrit dans le message de
news:
Tout d'abord encore merci de t'intéresser à mes petits problèmes

En compilant, j'ai aucune erreur.
En ouvrant le formulaire, le débogueur s'arrete sur la ligne **

Private Sub Form_Load()
** Set clsMouseWheel = New RS_MouseWheel.CMouseWheel
Set clsMouseWheel.Form = Me
clsMouseWheel.SubClassHookForm
End Sub

En fermant il s'arrete sur la ligne **
Private Sub Form_Close()
** clsMouseWheel.SubClassUnHookForm
Set clsMouseWheel.Form = Nothing
Set clsMouseWheel = Nothing
End Sub

Est ce que ca répond à ta question?

"Raymond [mvp]" a écrit dans le message
de news:
passe en compilation et dis moi la ou les lignes en erreur.

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


"Françoise Labis" a écrit dans le message
de news: %
Bonjour Raymond

J'ai suivi à la lettre les instructions sur ta page
http://officesystem.access.free.fr/souris.htm
mais à l'ouverture du formulaire, j'ai un message:
"Erreur d'exécution '500002'
Erreur définie par l'application ou par l'objet"
et à la fermeture:
"Erruer d'exécution '91':
Variable objet ou variable de bloc With non définie"

A la réouverure du formulaire, Access se plante.

Ce que j'ai fait:
j'ai copié le fichier rs_mousewheel.dll dans c:windowssystem32
puis je l'ai registré comme décrit
puis je l'ai référencé dans Access.

dans mon code, j'ai:

Option Compare Database

Private WithEvents clsMouseWheel As RS_MouseWheel.CMouseWheel

Private Sub Form_Load()
Set clsMouseWheel = New RS_MouseWheel.CMouseWheel
Set clsMouseWheel.Form = Me
clsMouseWheel.SubClassHookForm
End Sub

Private Sub Form_Close()
clsMouseWheel.SubClassUnHookForm
Set clsMouseWheel.Form = Nothing
Set clsMouseWheel = Nothing
End Sub

Private Sub clsMouseWheel_MouseWheel(Cancel As Integer)
Cancel = True
End Sub

Wondows XP Pro SP2, Office 2003, tout est à jour.
J'ai raté un step?
Françoise

"Raymond [mvp]" a écrit dans le
message de news:
Bonjour.

toutes les dll doivent fonctionner sous 2003. as-tu essayé celle-ci :
http://officesystem.access.free.fr/souris.htm

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


"Thierryx96" a écrit dans le
message de news:
Bonjour,

Jai deja trouver de multiples solutions a ce probleme dans divers
forums de
developeurs, qui proposent soient une solution avec dll soit la
creation d'un
module. La solution qui m'interesse est la dll, mais elle ne semble
pas
focntionner pour access 2003... Y'a t'il une solution avec dlll pour
access
2003 ? ou elle ne concerne que access 2000...


Merci

Thierry