Calculate time logged on for that or a given day?

[mdwerne]

Hello,

I was hoping for a hint in the right direction.

I'd like to write an app that looks at the local computers Security Event Log for Logon/Logoff events for the current user and display the sum amount of time for that day that the user has been logged on. I'm trying to get a feel for how much time I spend on the computer. My wife says it's much more than I believe it to be. I'd like to programatically prove her wrong.

Suggestions of which AutoIt functions etc...that I should look at would be a huge help.

Do any builtin functions read the Security log directly? I could probably figure out something from there.

Thanks!

-Mike

P.S. It would be extra cool if I/it could monitor in real time.

Edited March 24, 2008 by mdwerne

[goldenix]

umm start counter & display it in the corner of the screen while you are behind PC.

Enable it by CTRL + numpadsub

Write seconds hours days in ini file so if you hit enable again it will continue counting.

Disable it by CTRL + numpadadd

[Squirrely1]

@mdwerne - It would be easier just to keep track of your uptime and store the information in an .ini file. Here is a script I found on the forums:

MsgBox(0, "PC Uptime, So far",PC_UPTIME())

Func PC_UPTIME()
    Local $day = ""
    Local $type = ""
    Local $hour = 0
    Local $min = 0
    Local $sec = 0
    Local $uptime
;
    $ret = DllCall("kernel32.dll", "long", "GetTickCount")
    If IsArray($ret) Then
        $msec = StringRight("00" & Mod($ret[0], 1000), 3)
        $uptime = Int($ret[0] / 1000)
        $sec = StringRight("00" & Mod($uptime, 60), 2)
        If $uptime >= 60 Then
            $uptime = Int($uptime / 60)
            $min = StringRight("00" & Mod($uptime, 60), 2)
            If $uptime >= 60 Then
                $uptime = Int($uptime / 60)
                $hour = StringRight("00" & Mod($uptime, 24), 2)
                If $uptime >= 24 Then; convert hours to days
                    $day = Int($uptime / 24)
                    $type = ""
                    If $day > 1 Then $type = "s"
                    $type = " Day" & $type & " "
                EndIf
            EndIf
        EndIf
        Return ($day & $type & $hour & ":" & $min & ":" & $sec)
    EndIf
EndFunc ;==>PC_UPTIME

Your script would read the .ini for other uptime today, store the value in a variable, wait to capture a shutdown event, add the uptime to that original value found in the .ini file. Your script would also have to capture a change of day, if you work past midnight.

[mdwerne]

@goldenix & Squirrely1

Thanks for the suggestions!

I also located the "_EventLog__Read" function.

Between them all I think I'm good-to-go.

-Mike