Has a solution to this ever been discovered?

[Kevin_S]

Hi Gang,

I am posting this again because I figured that it was a worthy topic to bring up and I don't believe there has ever been an answer to this question.... ANYWHERE!

I have searched and searched and searched for a solution/Answer/Anything and found nothing.... I even posted on this in the recent past (See Here for Background) http://www.access-programmers.co.uk/forums/showthread.php?s=&threadid=48916&highlight=mouse+wheel
without success so... here goes...

Question: Is it possible to use the MouseWheel event in Access XP/2002 to eliminate the scrolling ability of the wheel while in form view??? I have tried the MS Access help suggestion snippet of code:

If Page = True then
'something
else
'something

But this doesn't work and I have searched in MS Knowledge base (They have nothing), tried examples posted in this forum (non-seemed to work except a few posts regarding A 97/2000 saying to create a .dll file) - But I was under the impression that this was the reason for the mousewheel event was put into XP in the first place - to eliminate the need to do these pretty drastic steps (considering Microsoft even states that you can make Access perminently unstable if you mess it up!!!)

Anyone know if there has ever been anyone to get the 'mousewheel' event to successfully trap the mouse wheel...?

 

[mrabrams2]

Here is one

This has worked for me for over a year now.
It works in Access 97, but I cannot tell you if it works in 98 +.

Michael

added 6-26-03:

Just to set the record straight, the Prevent Mouse Wheel solution, is credited to a gentleman named Andy (Accessman) from Indiana, with help from another nice guy from England named Rory. Both posted/worked on the code on another board a while ago.

*I will place a disclaimer in future sample databases.*

Thanks,
Michael

 

[Kevin_S]

Hi Michael,

I get a Run Time Error '53'
File Not Found: VBA332.dll

......

Has anyone ever tried the example posted here:

http://www.papwalker.com/

Its still not using the mousewheel event though....

 

[Vassago]

The sample posted by mrabrams2 works fine for me. Sounds like you may need to install additional components on your machine.

Why do you need to use the mousewheel event?

 

[ghudson]

mrabrams2's sample works for me and I am using Access 97 with Windows 98 at home. I will test it with Windows XP Pro when I get to work.

Kevin_S, what version of Windows are you using? There was a note in the Module2 about an extra step if you are not using Windows 98/2000.

 

[Kevin_S]

Vassago - I want to use the mousewheel event to trap the record scrolling ability of the wheel in form view. 2 of the current db's I'm developing are split fe/be with Access XP as the fe and SQL Server 2000 be. To increase performance I have based the forms on queries and I pass a record to the form based on the user's selection in a list box on the previous form. However, if the user scrolls with the wheel in the form view and then tries to close they get an ODBC call failed error message and then a bunch of sub-error and warnings because they are trying to save changes to a record that doesn't have a primary key.... Its not a huge deal to the integrity of the db because the filtered form wont allow records without primary keys - but it scares the (insert favorite word here) out the of uninformed user....

I wanted to use the mousewheel event to trap the scroll instead of other user created solutions because it is supposed to be the reason that event was put in there in the first place. As a matter of fact, in the help files it even describes the use of the event procedure to trap the scroll but I cannot get that to work and other posters I've read on this forum have also been unsuccessful in getting this to work.

ghudson - I am running Win 2000 with XP components (Access, Word, Excell, Powerpoint) - could the problem be that I also have MS Access 97 installed on the same machine...?

Thanks for the help!
Kev

 

[mission2java_78]

Vassago - I want to use the mousewheel event to trap the record scrolling ability of the wheel in form view. 2 of the current db's I'm developing are split fe/be with Access XP as the fe and SQL Server 2000 be. To increase performance I have based the forms on queries and I pass a record to the form based on the user's selection in a list box on the previous form. However, if the user scrolls with the wheel in the form view and then tries to close they get an ODBC call failed error message and then a bunch of sub-error and warnings because they are trying to save changes to a record that doesn't have a primary key.... Its not a huge deal to the integrity of the db because the filtered form wont allow records without primary keys - but it scares the (insert favorite word here) out the of uninformed user....

I wanted to use the mousewheel event to trap the scroll instead of other user created solutions because it is supposed to be the reason that event was put in there in the first place. As a matter of fact, in the help files it even describes the use of the event procedure to trap the scroll but I cannot get that to work and other posters I've read on this forum have also been unsuccessful in getting this to work.

ghudson - I am running Win 2000 with XP components (Access, Word, Excell, Powerpoint) - could the problem be that I also have MS Access 97 installed on the same machine...?

Thanks for the help!
Kev

I think office XP handles the mouse wheel event. MS posted a way how to do this but it did not work on my machine. There really isnt a solid solution since this event isn't an access 97 / 2k event. Some people might get it working with some neat API tricks.

Jon

 

[ghudson]

It works okay for me "as-is" with Windows XP Pro and Access 97. I even added commands buttons to manually turn off and on the mouse scrolling. I attached the file below.

 

[Kevin_S]

I'm still getting this error:

Run Time Error '53'
File Not Fopund: vba332.dll
.......................................................................

Does anyone know why I'm missing this reference and how I can get this reference added to my library...?

 

[mrabrams2]

I tried to attach the VBA332.DLL file (zipped) but seems that it is too large.

The VBA332.dll file should be found at:
C:\Program Files\Common Files\Microsoft Shared\VBA

Suggestion:
If it is not located there, try:
1- Do a search on your machine for the VBA332.DLL
2- Go to another machine or 2 and see if that person has it - copy and paste it to your machine

Other than that.... ??

Let us know.

Michael

 

[jrinbc]

RE: Mousewheel

This is one of the major failures that hasn't been addressed in Access, even though we have to keep up with 2K, 2002, and XP version compatibility issues in the meantime.

Forgive me if this was mention somewhere in the earlier posts or links...

There's an MSKB article on dealing with this--it involves winapi programming to do it: Microsoft Knowledge Base Article - 278379

Cheers,

jeff

 

[pleeson]

I don't know if you have found a solution to this but try looking up 'mousehook' in google. or go here

http://www.lebans.com/mousewheelonoff.htm

This involves some VB code (I can post if needed) and a dll file that goes in the winnt folder.

I have been using this for a while now it works a treat.

Paul