How to see system boot time

[megasound]

hi all

i want to make a test that ONLY displaying the system boot time
(windows systems only)
can someone help me ?

many many thanks in advance
menno

[KS-Soft Europe]

Could you confirm you really need system boot time and not system uptime? To display system boot time, you may use "Active script" test method ( http://www.ks-soft.net/hostmon.eng/mfra ... htm#script ) with the following script:

Code: Select all

Option Explicit

const statusAlive       = "Host is alive:"
const statusDead        = "No answer:"
const statusUnknown     = "Unknown:"
const statusNotResolved = "Unknown host:"
const statusOk          = "Ok:"
const statusBad         = "Bad:"
const statusBadContents = "Bad contents:"

dim objWMIService, colOperatingSystems, dtmBootup, dtmLastBootupTime, dtmSystemUptime, objOS

const strComputer = "."

FUNCTION performtest()


Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
    ("Select * from Win32_OperatingSystem")
 
For Each objOS in colOperatingSystems
    dtmBootup = objOS.LastBootUpTime
    dtmLastBootupTime = WMIDateStringToDate(dtmBootup)
    performtest = statusOk & dtmLastBootupTime
Next
End Function

 
Function WMIDateStringToDate(dtmBootup)
    WMIDateStringToDate = CDate(Mid(dtmBootup, 5, 2) & "/" & _
        Mid(dtmBootup, 7, 2) & "/" & Left(dtmBootup, 4) _
            & " " & Mid (dtmBootup, 9, 2) & ":" & _
                Mid(dtmBootup, 11, 2) & ":" & Mid(dtmBootup,13, 2))
End Function

Regards,
Max

[megasound]

many thanks ...this is working perfect
m