get-RemoteHostTime.vbs
strComputer = "HOSTNAME.domain.com" Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * From Win32_OperatingSystem") For Each objItem In colItems strTime = objItem.LocalDateTime dtmTime = CDate(Mid (strTime, 9, 2) & ":" & Mid(strTime, 11, 2) & ":" & Mid(strTime, 13, 2)) dtmTime = CDate(dtmTime) WScript.Echo FormatDateTime(dtmTime, vbFormatLongTime) Next