Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
François Picalausa
Bonjour/soir,
Le Script-o-matic permet de générer du script VBScript... celà permet d'avoir des exemples concrets: http://www.microsoft.com/technet/scriptcenter/tools/wmimatic.asp
En sélectionnant Win32_DesktopMonitor, les éléments intéressants sont: Wscript.Echo "DeviceID: " & objItem.DeviceID et éventuellement Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Ce qui donne le script suivant:
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_DesktopMonitor",,48) For Each objItem in colItems Wscript.Echo "DeviceID: " & objItem.DeviceID Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID Next
"Crevecoeur Jérôme" a écrit dans le message de news:%
Bonjour,
J'aimerais trouver soit par DMI soit par WMI le numéro de série du moniteur. Mais je ne trouve pas d'exemple concret.
Quelqu'un aurait-il une solution?
Bonjour/soir,
Le Script-o-matic permet de générer du script VBScript... celà permet
d'avoir des exemples concrets:
http://www.microsoft.com/technet/scriptcenter/tools/wmimatic.asp
En sélectionnant Win32_DesktopMonitor, les éléments intéressants sont:
Wscript.Echo "DeviceID: " & objItem.DeviceID
et éventuellement
Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Ce qui donne le script suivant:
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\" & strComputer & "rootcimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_DesktopMonitor",,48)
For Each objItem in colItems
Wscript.Echo "DeviceID: " & objItem.DeviceID
Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Next
Le Script-o-matic permet de générer du script VBScript... celà permet d'avoir des exemples concrets: http://www.microsoft.com/technet/scriptcenter/tools/wmimatic.asp
En sélectionnant Win32_DesktopMonitor, les éléments intéressants sont: Wscript.Echo "DeviceID: " & objItem.DeviceID et éventuellement Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Ce qui donne le script suivant:
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_DesktopMonitor",,48) For Each objItem in colItems Wscript.Echo "DeviceID: " & objItem.DeviceID Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID Next
"Crevecoeur Jérôme" a écrit dans le message de news:%
Bonjour,
J'aimerais trouver soit par DMI soit par WMI le numéro de série du moniteur. Mais je ne trouve pas d'exemple concret.
Quelqu'un aurait-il une solution?
Crevecoeur Jérôme
Merci François Tu es un chef !!! "François Picalausa" a écrit dans le message de news:
Bonjour/soir,
Le Script-o-matic permet de générer du script VBScript... celà permet d'avoir des exemples concrets: http://www.microsoft.com/technet/scriptcenter/tools/wmimatic.asp
En sélectionnant Win32_DesktopMonitor, les éléments intéressants sont: Wscript.Echo "DeviceID: " & objItem.DeviceID et éventuellement Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Ce qui donne le script suivant:
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_DesktopMonitor",,48) For Each objItem in colItems Wscript.Echo "DeviceID: " & objItem.DeviceID Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID Next
"Crevecoeur Jérôme" a écrit dans le message de news:% > Bonjour, > > J'aimerais trouver soit par DMI soit par WMI le numéro de série du > moniteur. Mais je ne trouve pas d'exemple concret. > > Quelqu'un aurait-il une solution?
Merci François
Tu es un chef !!!
"François Picalausa" <fpicalausa@chez.com> a écrit dans le message de
news:eOvwgyvzDHA.3496@TK2MSFTNGP11.phx.gbl...
Bonjour/soir,
Le Script-o-matic permet de générer du script VBScript... celà permet
d'avoir des exemples concrets:
http://www.microsoft.com/technet/scriptcenter/tools/wmimatic.asp
En sélectionnant Win32_DesktopMonitor, les éléments intéressants sont:
Wscript.Echo "DeviceID: " & objItem.DeviceID
et éventuellement
Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Ce qui donne le script suivant:
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\" & strComputer & "rootcimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_DesktopMonitor",,48)
For Each objItem in colItems
Wscript.Echo "DeviceID: " & objItem.DeviceID
Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Next
"Crevecoeur Jérôme" <bbbbc.aaaaa@libertysurf.fr> a écrit dans le
message de news:%23xOvpKrzDHA.1668@TK2MSFTNGP10.phx.gbl
> Bonjour,
>
> J'aimerais trouver soit par DMI soit par WMI le numéro de série du
> moniteur. Mais je ne trouve pas d'exemple concret.
>
> Quelqu'un aurait-il une solution?
Merci François Tu es un chef !!! "François Picalausa" a écrit dans le message de news:
Bonjour/soir,
Le Script-o-matic permet de générer du script VBScript... celà permet d'avoir des exemples concrets: http://www.microsoft.com/technet/scriptcenter/tools/wmimatic.asp
En sélectionnant Win32_DesktopMonitor, les éléments intéressants sont: Wscript.Echo "DeviceID: " & objItem.DeviceID et éventuellement Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID
Ce qui donne le script suivant:
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" & strComputer & "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_DesktopMonitor",,48) For Each objItem in colItems Wscript.Echo "DeviceID: " & objItem.DeviceID Wscript.Echo "PNPDeviceID: " & objItem.PNPDeviceID Next
"Crevecoeur Jérôme" a écrit dans le message de news:% > Bonjour, > > J'aimerais trouver soit par DMI soit par WMI le numéro de série du > moniteur. Mais je ne trouve pas d'exemple concret. > > Quelqu'un aurait-il une solution?