1: create a text file with your servers (or PCs) at c:\scripts\servers.txt, place each Windows system in the txt file on a separate line
server001
server002
server003
server002
server003
2: copy the following script to s-uptime.vbs
'===============================================================================================================
' Quick and Dirty Script to confirm last boot time of server
'
' Requires a text file of your servers (or any windows systems) at c:\scripts\servers.txt - alter as you see fit
'
' 10/23/08 - dhcollier.com
'===============================================================================================================
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile ("c:\scripts\servers.txt", ForReading)
Do While Not objFile.AtEndOfStream
strComputer = objFile.ReadLine
set objWMIDateTime = CreateObject("WbemScripting.SWbemDateTime")
set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
set colServer = objWMI.InstancesOf("Win32_OperatingSystem")
for each objServer in colServer
objWMIDateTime.Value = objServer.LastBootUpTime
Wscript.Echo strComputer & " Last Boot Time: " & objWMIDateTime.GetVarDate
next
Loop
objFile.Close
' Quick and Dirty Script to confirm last boot time of server
'
' Requires a text file of your servers (or any windows systems) at c:\scripts\servers.txt - alter as you see fit
'
' 10/23/08 - dhcollier.com
'===============================================================================================================
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile ("c:\scripts\servers.txt", ForReading)
Do While Not objFile.AtEndOfStream
strComputer = objFile.ReadLine
set objWMIDateTime = CreateObject("WbemScripting.SWbemDateTime")
set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
set colServer = objWMI.InstancesOf("Win32_OperatingSystem")
for each objServer in colServer
objWMIDateTime.Value = objServer.LastBootUpTime
Wscript.Echo strComputer & " Last Boot Time: " & objWMIDateTime.GetVarDate
next
Loop
objFile.Close
3: Run your script for output to the console (if cscript is not your default script processor you will be bombarded with wscript pop-up windows, so instead run this script at a cmd prompt > cscript s-uptime.vbs) Output should look like this:
server001 Last Boot Time: 10/23/2008 6:51:32 PM
server002 Last Boot Time: 10/23/2008 6:42:08 PM
server003 Last Boot Time: 10/23/2008 11:49:15 AM
server002 Last Boot Time: 10/23/2008 6:42:08 PM
server003 Last Boot Time: 10/23/2008 11:49:15 AM
No comments:
Post a Comment