Automatically Log off idle users

Originally Posted by NewtoAccess

Hi,
We have a shared Access 2000 database shared among many users within the company I work for.

many times, users open up the shared database and forget to close it.
So I cant even make modifications to it after work hours since users are logged in.

Is there a way to log off users after a long period of inactivity?

Let me know, thanks

Originally Posted by NewtoAccess

Hi,
We have a shared Access 2000 database shared among many users within the company I work for.

many times, users open up the shared database and forget to close it.
So I cant even make modifications to it after work hours since users are logged in.

Is there a way to log off users after a long period of inactivity?

Let me know, thanks

Originally Posted by NewtoAccess

I'll check out the website.
I do have a Mainform that links to other forms. Mainform always remains open even if other forms are being worked on.

I think I should put a timer on the MAINFORM. And then have countdown which alerts the user and gives them the option to reset timer or not.

How could I code this? And where on form should it be added? 'on current' ?

Originally Posted by NewtoAccess

This is what i have so far for sub routine action:

Sub IdleTimeDetected(ExpiredMinutes)
Dim Msg As String
strMsg = ""
strMsg = strMsg & "Application will CLOSE_"
strMsg = strMsg & "Click YES to continue working. Click NO to exit"
If MsgBox(strMsg, vbQuestion + vbYesNo, "No Activity detected") = vbYes Then
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Else
Application.Quit A_SAVE
delayTimer = 10000
Application.Quit A_SAVE
End If

MsgBox Msg, 48
End Sub

Originally Posted by NewtoAccess

OK. I'll update the commands.
Still though, I want application to autoclose.

So if VBYesNo no button selected within 10 seconds, then I want app to proceed with closing anyway.

How can this be accomplished?

Originally Posted by NewtoAccess

OK. I'll update the commands.
Still though, I want application to autoclose.

So if VBYesNo no button selected within 10 seconds, then I want app to proceed with closing anyway.

How can this be accomplished?

Originally Posted by puppydogbuddy

Yes, but there is debate on the best way to accomplish it. Here is a link to Microsoft's way:

ACC: How to Detect User Idle Time or Inactivity
http://support.microsoft.com/?id=128814

Originally Posted by FishVal

It cannot be accomplished in any way with msgbox.
While msgbox is active no events will be triggered in any form.

You should create your own form with warning message, Yes No buttons and timer.

Good Luck.

Originally Posted by puppydogbuddy

FishVal,
If I understood correctly NewtoAccess wants the system administrator to have the last say before shutdown.. NewtoAccess requested (see below) a "no" response to trigger the application exit 10 seconds after it is clicked, which is what the above code does.

<<<<<<So if VBYesNo no button selected within 10 seconds, then I want app to proceed with closing anyway.>>>>>>

Originally Posted by FishVal

I'm curious whether you've tested the code.
I've checked that while MsgBox is active no Timer event will be triggered, no code will run asynchronously.
No such a problem with special form. In this case there are two opportunities:
1) to handle timer event from this warning form
2) to handle timer event from the IdleUser detecting form (somewhat more sophisticated)
Good luck.

Originally Posted by puppydogbuddy

FishVal,
I don't follow you. My suggested code runs only if the response to the message to the MsgBox is "No", so the MsgBox is no longer active at that point.

Originally Posted by FishVal

Sorry. Maybe I've not got a point. Lets straight it.
The logic is:
1. to detect idle user situation
2. to warn the user about db closing
2.1. User confirms quit -> quit
2.2. User denies quit -> restart idle timer
2.3. User doesn't respond within a definite time period -> quit

Am I right?
If so, MsgBox will be helpless in p. 2.3.

Originally Posted by puppydogbuddy

FishVal,
OK, In writing my code, I understood NewToAccess to mean he wanted the ability to click the "no" button on the message box before actually following through with the shutdown of the application. If that is the case my code works, If that is not the case, and he wants the shutdown to occur without having to click the "no" button, then your scenario would be correct.

Originally Posted by puppydogbuddy

NewtoAccess,
the Form module simply means the code behind a form (e.g. your idleTimeDected form) as opposed to a standard module or macro. You need to decide how you want the code to work before proceeding.

Originally Posted by Proaccesspro

pretty much as descibed on the MS support site. After a set amount of idle time, I would like the user to automatically logged-off

Originally Posted by Proaccesspro

I followed the directions on the MS support page. I put this code in the ON FOCUS EVENT

Private Sub Form_GotFocus()
Sub IdleTimeDetected(ExpiredMinutes)
Dim Msg As String
Msg = "No user activity detected in the last "
Msg = Msg & ExpiredMinutes & " minute(s)!"
MsgBox Msg, 48


End Sub


Not sure what to expect......How does the detectidletime form get focus?? Is there a macro I must write so that the form is constantly running in the background?