Script pour récupérer numéros de série

Récemment j’ai eu besoin de pouvoir récupérer automatiquement les numéros de série des écrans connectés au poste de travail en environnement windows je précise tout de suite. Curieusement sur la toile, les scripts fleurissent plutôt pour avoir le numéro de l’UC ou encore du BIOS mais pour les écrans c’est beaucoup moins évident!

Difficulté supplémentaire , la plupart de mes postes de travail possèdent 2 écrans et parfois de marque hétérogène…

Pour m’inspirer, j’ai trouvé un site très intéressant qui possède une bonne base de scripts (bat,vbs,js…) qui remontent des infos sur le hardware de votre PC:

• sur le bios
• le CPU
• la mémoire
• sur les périph tels que lecteur CDROM
• les écrans
• etc…

…en s’appuyant sur le WMI.

Le wmi ?

Le WMI (windows management instrumentation) est une API gérant l’objet sur laquelle les scripts peuvent taper pour récupérer entre autres des infos des constructeurs.

Juste pour illustrer l’Architecture WMI:

Je sais bien que la mode est plutôt au langage de script Powershell mais pour un ancien comme moi le VisualBasicScript  fera largement l’affaire, en mode oldschool.

Le script peut être exécuté en utilisateur standard sous Windows Seven. Pour Windows 10 , je n’ai pas testé mais si vous le faites, je veux bien avoir des retours.

Le script de récupération des numéros de série des écrans

Rendons à Caesar ses lauriers, l’auteur de ce script serait Michael Baird. Je dis « serait » car l’auteur a pondu le script avant l’ère du github , des blogs etc… Donc pas de trace de publication officielle si ce n’est dans la source en commentaire.

‘based on script from cwashington.netreach.net, read_and_parse_monitor_edid_information.vbs
‘Original Author: Michael Baird

Le code est ICI à copier / coller dans un fichier renommé avec l’extension .vbs.

Personnellement , je l’ai adapté à mes besoins . Les informations (modèle et numero de serie des écrans) sont écrites directement dans un fichier « ecran.txt » créé dans le répertoire « c:\temp ».

Pour ce faire, il suffit de commenter la ligne 81 qui affiche les infos récupérées dans une popup.
Pour commenter en vbs, on utilise le guillemet simple appelé communément simple quote : ‘

'WScript.Echo strMsg

Puis on insère à la suite les lignes suivantes qui vont créer et écrire dans le fichier « c:\temp\ecran.txt » avec les infos du constructeur.

Const ForWriting = 2 
Dim fso, f

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile("c:\temp\ecran.txt", ForWriting,true)

f.write(strMsg) 

Après on peut envisager d’y inclure une fonction pour envoyer par mail les infos, mais ça fera l’objet d’un autre billet ^_^