Use the Win32_TimeZone class and check the value of the Description property. Set wmiService = GetObject( “Winmgmts:root\cimv2″ ) Set items = wmiService.ExecQuery( “Select * from Win32_TimeZone” ) For Each item in items Print “Description: ” & item.Description Print “Daylight Name: ” & item.DaylightName Print “Standard Name: ” & item.StandardName Next

To convert WMI dates to FILETIME or VT_DATE format or to parse the date into component year, month, day, hours, and so on, you must write your own code. Set dtmInstallDate = CreateObject( “WbemScripting.SWbemDateTime” ) Set wmiService = GetObject( “Winmgmts:root\cimv2″ ) Set os = wmiService.ExecQuery( “Select * from Win32_OperatingSystem” ) For Each itemOS in os …

Continue reading »