Серый форум — WSH: определение даты установки операционной системы

Re: WSH: определение даты установки операционной системы

null@example.com (Rumata) — Sun, 10 Nov 2013 16:01:29 +0000

...
new Date(raw * 1000)

Re: WSH: определение даты установки операционной системы

null@example.com (greg zakharov) — Sun, 10 Nov 2013 09:04:47 +0000

Альтернативный вариант:

with (new ActiveXObject('WScript.Shell')) {
  var raw = RegRead('HKLM\\SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\InstallDate');
  with (new Date(1970, 0, 1)) {
    WScript.echo(new Date(setSeconds(getSeconds() + raw)));
  }
}

WSH: определение даты установки операционной системы

null@example.com (The gray Cardinal) — Fri, 07 Jul 2006 15:25:53 +0000

Set dtmConvertedDate = CreateObject("WbemScripting.SWbemDateTime")
strComputer = "CompName"
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
    ("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
    dtmConvertedDate.Value = objOperatingSystem.InstallDate 
    dtmInstallDate = dtmConvertedDate.GetVarDate
    Wscript.Echo "Install Date: " & dtmInstallDate
Next

Данный скрипт можно считать дополнением к статье Рецепты WMI: сбор сведений о конфигурации операционной системы и установленном программном обеспечении. Объект "WbemScripting.SWbemDateTime" применяется для приведения даты в удобочитаемый вид.
P.S. Скрипт прислал MoonRabbit.