Any way to tell input inactivity?

[Rico]

Hello,

I have an application that I'd like to have logout automatically after a
certain period of inactivity. Is there any way via vb to tell how long the
keyboard and mouse have been inactive?

Thanks!

[Haim]

Hi,
1) You can use in "Detail_MouseMove" this event implement any time that
the mouse move, for the keyboard you shall use KeyPress event.
2) You can use in "Form_Timer" event , this event will implement method
or process by the time that you'll determine, You shall set the
interval timer (Form.TimerInterval = TimeOut in millisecond), I think
you can set it till 1 hour, but I tried it till 10 minute and it's
worked, and if it will not work so, you can create function that count
the till you'r necessary time. *** If you need to stop this event so,
you need to set the interval to 0.
***Summary:
In "Detail_MouseMove" and "<Control>_KeyPress" event you can write:
Form.TimerInterval = <TimeOut>.
Any movement with the mouse or any key tapping the timer will update.

Hope I Helped, Haim Rubin.

[Rico]

Hi Haim,

I should have probably added that I don't want to write a lot of code in
each form. There has to be some sort of system variable that keeps track of
the inactivity. How are screen savers triggered?

Rick
"Haim" <Ha********@gmail.com> wrote in message
news:11*********************@e56g2000cwe.googlegro ups.com...

Hi,
1) You can use in "Detail_MouseMove" this event implement any time that
the mouse move, for the keyboard you shall use KeyPress event.
2) You can use in "Form_Timer" event , this event will implement method
or process by the time that you'll determine, You shall set the
interval timer (Form.TimerInterval = TimeOut in millisecond), I think
you can set it till 1 hour, but I tried it till 10 minute and it's
worked, and if it will not work so, you can create function that count
the till you'r necessary time. *** If you need to stop this event so,
you need to set the interval to 0.
***Summary:
In "Detail_MouseMove" and "<Control>_KeyPress" event you can write:
Form.TimerInterval = <TimeOut>.
Any movement with the mouse or any key tapping the timer will update.

Hope I Helped, Haim Rubin.

[Devonish]

Try the following link

http://support.microsoft.com/default...b;en-us;210297

Jim

*** Sent via Developersdex http://www.developersdex.com ***

[Rico]

Thanks!

"Devonish" <no*****@nowhere.com> wrote in message
news:9K***************@news.uswest.net...

Try the following link

http://support.microsoft.com/default...b;en-us;210297

Jim

*** Sent via Developersdex http://www.developersdex.com ***

[Norm Cook]

http://vbnet.mvps.org/code/system/getlastinputinfo.htm

"Rico" <r c o l l e n s @ h e m m i n g w a y . c o m> wrote in message
news:mtSWf.21266$%H.3552@clgrps13...

Hi Haim,

I should have probably added that I don't want to write a lot of code in
each form. There has to be some sort of system variable that keeps track of the inactivity. How are screen savers triggered?

Rick
"Haim" <Ha********@gmail.com> wrote in message
news:11*********************@e56g2000cwe.googlegro ups.com...

Hi,
1) You can use in "Detail_MouseMove" this event implement any time that
the mouse move, for the keyboard you shall use KeyPress event.
2) You can use in "Form_Timer" event , this event will implement method
or process by the time that you'll determine, You shall set the
interval timer (Form.TimerInterval = TimeOut in millisecond), I think
you can set it till 1 hour, but I tried it till 10 minute and it's
worked, and if it will not work so, you can create function that count
the till you'r necessary time. *** If you need to stop this event so,
you need to set the interval to 0.
***Summary:
In "Detail_MouseMove" and "<Control>_KeyPress" event you can write:
Form.TimerInterval = <TimeOut>.
Any movement with the mouse or any key tapping the timer will update.

Hope I Helped, Haim Rubin.

[Haim]

Hi Rico,

The 'Detail_Mouse_Move' event work on whole form the problem is when
you using in lot of text boxes so, if you'r , it is inefficiently to
write a double code.
If the problem was on pure VB6 so, you could resolve it by create an
array of text boxes and write the code on 'KeyPress' event which
according to all text boxes but, regretfully on access you can not
create an array of controls.

Regard, Haim Rubin.