Bonjour

Nouveau sur ce forum, je découvre le VBScript et WMI. J'ai testé sur plusieurs PC un script pour obtenir le n° de série physique du disque dur. Le script me renvoie soit un sérial soit rien. Je pensais que tous les disques durs avaient un n° de série physique ?. J'ai fait peut être une erreur dans le script ou alors il n'est pas complet :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Set oSh=CreateObject("WScript.Shell")
sDisk=Split(oSh.ExpandEnvironmentStrings("%systemroot%"),":")(0)
nHD=Asc(sDisk)-Asc("C")
Set oBoot=GetObject("winmgmts:/root/cimv2:" & _
    "Win32_PhysicalMedia.Tag='\\.\PHYSICALDRIVE" & nHD & "'")
WScript.Echo Trim(oBoot.SerialNumber)
Pour le n° de série de la carte mère, je rencontre le même problème. Le scrips renvoie ou non une information.

En fait je souhaite obtenir un ID unique (DD, carte mère...) pour mettre en place une protection logicielle simple et moins contraignante que le n° de série volume du disque dur.

Quelqu'un peut-il m'aider ?

Avec mes remerciements.
Cordialement