Afficher le numéro de série d’un serveur distant en VBScript



Ce petit script très pratique vous permet de récupérer le numéro de série d’une machine sous Windows très facilement.

On Error Resume Next
strComputer = inputbox( "Nom du serveur", "Input" )
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_BIOS",,48)
For Each objItem in colItems
Wscript.Echo "SerialNumber: " & objItem.SerialNumber
Next

WMI Scripting

March 2007 · Rangé dans Scripting

Dans le même esprit ...


Commentaires

4 Responses to “Afficher le numéro de série d’un serveur distant en VBScript”

  1. Fred24 on April 5th, 2007 12:40 pm

    Pratique ! Merci ;-)

  2. Fleurdumal on May 11th, 2007 12:55 pm

    bonjour,
    Il ne se passe rien lorsque je lance le script
    merci !

  3. nuloop on May 11th, 2007 12:58 pm

    Vérifies bien que WMI est installé et démarré sur le serveur distant. Il n’y est pas de base sur les serveurs NT4.

  4. Fleurdumal on May 12th, 2007 1:01 pm

    Super ca fonctionne merci ! J’ai juste redémarré ce service sur mon serveur en w2k.

Déposez votre commentaire