WhoKilledKenny
MIS
Found that I was having issues with TZEDIT. Used to following script to enumerate 2000 servers and noticed that TZEDIT reported the proper dates, yet the properties of the win32_TimeZone class where conflicting. Eventhough TZEDIT reported the new dates, the server didn't sping ahead in test until I change the TZSetting in the reqistry.
Here is the script hope it help out... If you show your DayLight Month as "4" and Standard Month as "10" your DST is no set for the time change.
Code provided to help...
Here is the script hope it help out... If you show your DayLight Month as "4" and Standard Month as "10" your DST is no set for the time change.
Code:
'* FileName: DSTcheck.vbs
'*=============================================================================
'* Script Name: [DSTcheck.vbs]
'* Created: [03/07/2007]
'* Author: Jesse Hamrick
'* Company: *************************
'* Email: *************************
'* Web: *************************
'* Reqrmnts:
'* Keywords:
'*=============================================================================
'* Purpose: Script enumerates Daylight Savings Settings on Windows 2000,
'* Windows 2003, and Windows XP systems. Reads computer names
'* from a text file (into and array) using carriage return as the
'* separator. To run this script create a file called server.txt
'* and enter the names of each computer you wish to enumerate.
'*=============================================================================
'*=============================================================================
'* DECLARE VARIABLES
'*=============================================================================
On Error Resume Next
Const HKEY_LOCAL_MACHINE = &H80000002
Const ForReading = 1
Dim objFSO
Dim objTextFile
Dim objWMIService
Dim strComputer
Dim arrComputers
Dim objItem
Dim colItems
'*=============================================================================
'* Code
'*=============================================================================
'Section 1: Reads the Servers.txt file created by the Engineer and creates
'an Array.
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile _
("c:\Server.txt", ForReading)
strText = objTextFile.ReadAll
arrComputers = Split(strText, VbCrLf)
objTextFile.Close
For Each strComputer In arrComputers
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
If Err <> 0 Then
WScript.Echo strComputer & " - " & Err.Description & VbCrLf
Err.Clear
Else
Set colItems = objWMIService.ExecQuery("Select * from Win32_TimeZone")
For Each objItem In colItems
WScript.Echo strComputer
'Wscript.Echo "Daylight Bias: " & objItem.DaylightBias
'Wscript.Echo "Daylight Day: " & objItem.DaylightDay
Wscript.Echo "Daylight Day of Week: " & objItem.DaylightDayOfWeek & ". 0=Sunday"
Wscript.Echo "Daylight Hour: " & objItem.DaylightHour & " AM"
'Wscript.Echo "Daylight Millisecond: " & objItem.DaylightMillisecond
'Wscript.Echo "Daylight Minute: " & objItem.DaylightMinute
WScript.Echo "Daylight Month: " & objItem.DaylightMonth & ". 1=Janurary"
WScript.Echo "Daylight Name: " & objItem.DaylightName
'Wscript.Echo "Daylight Second: " & objItem.DaylightSecond
'Wscript.Echo "Daylight Year: " & objItem.DaylightYear
Wscript.Echo "Description: " & objItem.Description
'Wscript.Echo "Setting ID: " & objItem.SettingID
'Wscript.Echo "Standard Bias: " & objItem.StandardBias
'Wscript.Echo "Standard Day: " & objItem.StandardDay
Wscript.Echo "Standard Day of Week: " & objItem.StandardDayOfWeek
Wscript.Echo "Standard Hour: " & objItem.StandardHour & " AM"
'Wscript.Echo "Standard Millisecond: " & objItem.StandardMillisecond
'Wscript.Echo "Standard Minute: " & objItem.StandardMinute
Wscript.Echo "Standard Month: " & objItem.StandardMonth
'Wscript.Echo "Standard Name: " & objItem.StandardName
'Wscript.Echo "Standard Second: " & objItem.StandardSecond
'Wscript.Echo "Standard Year: " & objItem.StandardYear
WScript.Echo VbCrLf
'Set colItems = Nothing
Next
End If
Next
'*=============================================================================
'* END OF SCRIPT: [DSTcheck.vbs]
'*=============================================================================
Code provided to help...