benjaminB

Idle User Logout from Programm

3 posts in this topic

#1 ·  Posted (edited)

Hello i got a Programm thats licensed by concurrent users. And my Users always forget to logout from the Programm.
All they need to do is Press F12

Im trying to script a Logoff Script:

when the User is 20 minutes Idle -> bring up the Programm Window -> Press F12 
the Script i got works kinda but if the Programm is not Running the Script is still pressing F12 all 20 Minutes of Idle.
Another 20 Minutes  later, it presses F12 again and the User is loged on.
If the User is logged of there is another Windows open called "Anmelden...".
Is it Possible to say: Only Count Idle if "Programmname" is Running
and if user is Loged dont press F12 again?

here is my Script
 

#include <Timers.au3>
#include <MsgBoxConstants.au3>

 

#include <Timers.au3>
#include <MsgBoxConstants.au3>

Global $iIdleTime = _Timer_GetIdleTime()

While 1
    $iIdleTime = _Timer_GetIdleTime()
      If $iIdleTime >= (1000 * 60 * 2) and Not WinActive("Anmelden...","") Then ;1000 = 1 Sekunde, (1000 * 60 * 20) = 20 Minuten
         AutoItSetOption("WinTitleMatchMode",2)
         WinActivate("Programmname")
         Send ("{F12}")
         Sleep(1000)
         $iIdleTime=0
      EndIf
WEnd


 

Edited by benjaminB

Share this post


Link to post
Share on other sites



Welcome to AutoIt and the forum!

Check for the existance of the window first:

#include <Timers.au3>
#include <MsgBoxConstants.au3>
Global $sWindowTitle = "Programmname"
Global $iIdleTime = _Timer_GetIdleTime()
While 1
    If WinExists($sWindowTitle) Then ; If window does not exist do nothing
        $iIdleTime = _Timer_GetIdleTime()
        If $iIdleTime >= (1000 * 60 * 2) And Not WinActive("Anmelden...", "") Then ;1000 = 1 Sekunde, (1000 * 60 * 20) = 20 Minuten
            AutoItSetOption("WinTitleMatchMode", 2)
            WinActivate($sWindowTitle)
            Send("{F12}")
        EndIf
    EndIf
    Sleep(1000)
WEnd

 


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

Thank you for the Quick Reply.

i will try that as soon as possible

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now