| |
sheepz
Posts: 247
Score: 2
Joined: 3/17/2006
From: Riverside the 909s
Status: offline
|
well the easiest is to of course track it yourself by writing it down... if you want something more automated, you would need to have a logon script and log off script. because turning on "auditing logon events" only track successful and failed logon's not log offs. you could use something like this: logon script: put this in your "start menu" to simulate logon script TimeStampLogon = "Logged on: " & Date & " " & Time Const ForAppending = 8 strFileName = "Timesheet.txt" Set objFSO = CreateObject("Scripting.FileSystemObject") If Not objFSO.FileExists(strFileName) Then objFSO.CreateTextFile strFileName, True End If Set objAppend = objFSO.OpenTextFile(strFileName, ForAppending) objAppend.WriteLine TimeStampLogon objAppend.Close and something like this for a log off script: TimeStampLogOff = "Logged Off: " & Date & " " & Time Const ForAppending = 8 strFileName = "Timesheet.txt" Set objFSO = CreateObject("Scripting.FileSystemObject") If Not objFSO.FileExists(strFileName) Then objFSO.CreateTextFile strFileName, True End If Set objAppend = objFSO.OpenTextFile(strFileName, ForAppending) objAppend.WriteLine TimeStampLogOff objAppend.Close
|
|