Saved by the Mouse

Sorry to beat a dead mouse, but I installed Stephen Lebans' MWHook
application, and although it works great to prevent the page from scrolling,
my form can still scroll through records which causes a premature save if the
wheel accidently turns a notch.

I only imported the one module, modMouseHook, and placed the OFF code into
the Load event of the opening form.

Is there more I need to do to disable navigation as well? I've read many
other postings that recommend this as a cure, but unfortunately I'm still
plagued by the mouse. Please help!

--
Message posted via http://www.accessmonster.com

I'm sure that Stephen will reply to your question in due course.

However, in the mean time: what exactly do you mean? You say that it
"works great to prevent the page from scrollng", but then you say that
the form "can still scroll through records ... if the wheel turns ...".

So personally, I'm not sure what you actually mean. Does his code stop
the wheel working, or not stop it working?

TC (MVP Access)
http://tc2.atspace.com

TC,

I can spin the wheel and it will not scroll my form up or down (I'm still
able to do that with the bar which is fine), however all my fields still
scroll through the records, and this of course triggers a save which I don't
want (I've got a separate button for saving).

See either of the two following posts - one says it works, the other still
has same navigation problem---

"Mouse Wheel Causes Form to Save?"
S. D. - 07-28-2003 11:17

"I've gone to Lebans and read through the posts on the mouse wheel."
NotIT - 05-11-2005 09:48

TC wrote:
I'm sure that Stephen will reply to your question in due course.

However, in the mean time: what exactly do you mean? You say that it
"works great to prevent the page from scrollng", but then you say that
the form "can still scroll through records ... if the wheel turns ...".

So personally, I'm not sure what you actually mean. Does his code stop
the wheel working, or not stop it working?

TC (MVP Access)
http://tc2.atspace.com

--
Message posted via http://www.accessmonster.com

prosfora via AccessMonster.com wrote:


I can spin the wheel and it will not scroll my form up or down

Ok, I understand that.


(I'm still able to do that with the bar which is fine),

Ok, I understand that, assuming that "the bar" means, the vertical
scrollbar on the right hand side of the form.


however all my fields still scroll through the records, and this of course triggers a save which I don't want (I've got a separate button for saving).

"All my fields still scroll through the records"? Sorry, I'm not sure
that I understand that. Do you mean, that if you press Tab or Return
from the last field in the current record, it tries to go to the next
record, and therefore, tries to save any unsaved changes to the current
record? If so:

(1) You can stop that by setting the form's Cycle property to "Current
Record", and

(2) If you need to make some checks, about he data in the current
record, before the user saves the record, you *should not* put those
checks in any button code. You should put them in the BeforeUpdate
event of the form. That evetnt will fire regardless of /how/ the user
tries to save the current record: by pressing your button, or moving on
to the next record, or by any other means.


See either of the two following posts

Sorry, no-one has time to search through previous posts. Each post must
be self-contained. That's the way to get the most answers.

Cheers,
TC (MVP Access)
http://tc2.atspace.com

TC,

"All my fields still scroll through the records" means as you turn the
mousewheel, you scroll through the records. Each click of the wheel changes
the fields to the next or previous record, depending which direction you turn
it-------

TC wrote:
I can spin the wheel and it will not scroll my form up or down

Ok, I understand that.

(I'm still able to do that with the bar which is fine),

Ok, I understand that, assuming that "the bar" means, the vertical
scrollbar on the right hand side of the form.

however all my fields still scroll through the records, and this of course triggers a save which I don't want (I've got a separate button for saving).

"All my fields still scroll through the records"? Sorry, I'm not sure
that I understand that. Do you mean, that if you press Tab or Return
from the last field in the current record, it tries to go to the next
record, and therefore, tries to save any unsaved changes to the current
record? If so:

(1) You can stop that by setting the form's Cycle property to "Current
Record", and

(2) If you need to make some checks, about he data in the current
record, before the user saves the record, you *should not* put those
checks in any button code. You should put them in the BeforeUpdate
event of the form. That evetnt will fire regardless of /how/ the user
tries to save the current record: by pressing your button, or moving on
to the next record, or by any other means.

See either of the two following posts

Sorry, no-one has time to search through previous posts. Each post must
be self-contained. That's the way to get the most answers.

Cheers,
TC (MVP Access)
http://tc2.atspace.com

--
Message posted via http://www.accessmonster.com

Ok, so you are using Stephen Lebans' code, but it *does not* stop
the mouse wheel from working?

Is that what you are saying?

TC (MVP Access)
http://tc2.atspace.com

Did you follow the instructions and copy the MouseWheelHook.DLL into the
proper folder?

Post the code you have in your form's Load event.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.


"prosfora via AccessMonster.com" u19813@uwe wrote in message
news:5e3ac3588ac8a@uwe...
TC,

"All my fields still scroll through the records" means as you turn the
mousewheel, you scroll through the records. Each click of the wheel
changes
the fields to the next or previous record, depending which direction you
turn
it-------

TC wrote:
I can spin the wheel and it will not scroll my form up or down

Ok, I understand that.

(I'm still able to do that with the bar which is fine),

Ok, I understand that, assuming that "the bar" means, the vertical
scrollbar on the right hand side of the form.

however all my fields still scroll through the records, and this of
course triggers a save which I don't want (I've got a separate button
for saving).

"All my fields still scroll through the records"? Sorry, I'm not sure
that I understand that. Do you mean, that if you press Tab or Return
from the last field in the current record, it tries to go to the next
record, and therefore, tries to save any unsaved changes to the current
record? If so:

(1) You can stop that by setting the form's Cycle property to "Current
Record", and

(2) If you need to make some checks, about he data in the current
record, before the user saves the record, you *should not* put those
checks in any button code. You should put them in the BeforeUpdate
event of the form. That evetnt will fire regardless of /how/ the user
tries to save the current record: by pressing your button, or moving on
to the next record, or by any other means.

See either of the two following posts

Sorry, no-one has time to search through previous posts. Each post must
be self-contained. That's the way to get the most answers.

Cheers,
TC (MVP Access)
http://tc2.atspace.com

--
Message posted via http://www.accessmonster.com

Stephen,

Here's the code that I placed into the Load event:

Private Sub Form_Load()
' Turn the MouseWheel Off
Dim blRet As Boolean
blRet = MouseWheelOFF
End Sub

I created a separate folder for this test on my desktop, wherein I placed
copies of both my mdb and the DLL.




Stephen Lebans wrote:
Did you follow the instructions and copy the MouseWheelHook.DLL into the
proper folder?

Post the code you have in your form's Load event.

TC,

[quoted text clipped - 42 lines]
TC (MVP Access)
http://tc2.atspace.com

--
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...forms/200604/1

Place a breakpoint on the End Sub line. Verify that blRet = TRUE. Let me
know.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.


"prosfora via AccessMonster.com" u19813@uwe wrote in message
news:5e49bd01fd4f6@uwe...
Stephen,

Here's the code that I placed into the Load event:

Private Sub Form_Load()
' Turn the MouseWheel Off
Dim blRet As Boolean
blRet = MouseWheelOFF
End Sub

I created a separate folder for this test on my desktop, wherein I placed
copies of both my mdb and the DLL.




Stephen Lebans wrote:
Did you follow the instructions and copy the MouseWheelHook.DLL into the
proper folder?

Post the code you have in your form's Load event.

TC,

[quoted text clipped - 42 lines]
TC (MVP Access)
http://tc2.atspace.com

--
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...forms/200604/1

Is this what you mean Stephen? If so, it still doesn't prevent scrolling
through the records---

Private Sub Form_Load()
' Turn the MouseWheel Off
Dim blRet As Boolean
blRet = MouseWheelOFF
blRet = True
End Sub

I also tried:

Private Sub Form_Load()
' Turn the MouseWheel Off
Dim blRet As Boolean
blRet = MouseWheelOFF(True)
End Sub

....and got Compile error message that sub or function is not defined

Stephen Lebans wrote:
Place a breakpoint on the End Sub line. Verify that blRet = TRUE. Let me
know.

Stephen,

[quoted text clipped - 19 lines]
TC (MVP Access)
http://tc2.atspace.com

--
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...forms/200604/1