Afficher la date de démarrage d’un serveur Windows en VBScript

Ce script VBS vous permettra de connaître la date de reboot d’un système Windows distant. Idéal donc pour savoir depuis combien de temps tourne une machine ou si le reboot que vous aviez programmé à bien eu lieu.

Le script WMI intègre un Inputbox qui vous permet de choisir le serveur à explorer.

Créez un fichier ScriptWMI.vbs à l’aide d’un éditeur de texte et insérez le code suivant:

strComputer = inputbox( "Nom du serveur", "Input" )
Set objWMIService = GetObject _
("winmgmts:\\" & strComputer & "\root\cimv2")
Function WMIDateStringToDate(dtmBootup)
WMIDateStringToDate = CDate(Mid(dtmBootup, 5, 2) & "/" & _
Mid(dtmBootup, 7, 2) & "/" & Left(dtmBootup, 4) _
& " " & Mid (dtmBootup, 9, 2) & ":" & _
Mid(dtmBootup, 11, 2) & ":" & Mid(dtmBootup,13, 2))
End Function
Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")
For Each objOS in colOperatingSystems
dtmBootup = objOS.LastBootUpTime
dtmLastBootupTime = WMIDateStringToDate(dtmBootup)
Wscript.Echo "Le système est actif depuis le " & dtmLastBootupTime
Next

Double-cliquez sur le fichier nouvellement créé pour exécuter le script.

Indiquez le nom du système local ou distant:

La date du dernier démarrage apparait: