Saturday, July 31, 2004

TechNet Scripts: Determining Local Time on a Computer

TechNet Scripts: Determining Local Time on a Computer: "Determining Local Time on a Computer

Description
Reports the local time on a computer.
For more information about the Win32_LocalTime class used in this script, click here.
Supported Platforms
Windows XPYes
Windows Server 2003Yes
Windows 2000No
Windows NT 4.0No
Windows 98No

Script Code
strComputer = '.'
Set objWMIService = GetObject('winmgmts:\\' & strComputer & '\root\cimv2')
Set colItems = objWMIService.ExecQuery('Select * from Win32_LocalTime')
For Each objItem in colItems
Wscript.Echo 'Day: ' & objItem.Day
Wscript.Echo 'Day Of the Week: ' & objItem.DayOfWeek
Wscript.Echo 'Hour: ' & objItem.Hour
Wscript.Echo 'Milliseconds: ' & objItem.Milliseconds
Wscript.Echo 'Minute: ' & objItem.Minute
Wscript.Echo 'Month: ' & objItem.Month
Wscript.Echo 'Quarter: ' & objItem.Quarter
Wscript.Echo 'Second: ' & objItem.Second
Wscript.Echo 'Week In the Month: ' & objItem.WeekInMonth
Wscript.Echo 'Year: ' & objItem.Year
Next"

No comments: