OVH Cloud OVH Cloud

Wmi

1 réponse
Avatar
berthelagrandepatte
Bonjour,

Je commence à lire initiation WMI disponible sur le site de microsoft et dès
le 1er script que j'ai executé sur mon poste, une erreur de syntaxe à Set
WbemSevices = GetObject("Winmgmts:\\" & strComputer) apparait.

Script Microsoft:

StrComputer = "." Car je l'essaie localement sur ma machine
Set WbemServices = GetObject("Winmgmts:\\" & strComputer)
Set WbemObjectSet = WbemServices.InstancesOF
("Win32_LogicalMemoryCOnfiguration")
For Each WbemObject In WbemObjectSet
Wscript.echo "Memoire Totale (Ko):" & WbemObject.TotalPhysicalMemory
Next

J'ai cherché sur d'autres sites et j'ai tjrs le même Pb. J'ai essayé
également en déclarant les variables pour un résultat identique.

Si vous savez, n'hésitez pas.

D'avance merci

1 réponse

Avatar
Stéphane [MS]
Bonjour,

La page de référence sur MSDN indique que cette classe n'est plus supportée
; il faut plutôt utiliser Win32_OperatingSystem. Il se peut que vous soyez
sur un système qui n'expose plus cette classe (Windows XP ?).

Cf.
http://windowssdk.msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_logicalmemoryconfiguration.asp

Sur Script Center :
======================================== strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2")

Set colSettings = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colSettings
Wscript.Echo "OS Name: " & objOperatingSystem.Name
Wscript.Echo "Version: " & objOperatingSystem.Version
Wscript.Echo "Service Pack: " & _
objOperatingSystem.ServicePackMajorVersion _
& "." & objOperatingSystem.ServicePackMinorVersion
Wscript.Echo "OS Manufacturer: " & objOperatingSystem.Manufacturer
Wscript.Echo "Windows Directory: " & _
objOperatingSystem.WindowsDirectory
Wscript.Echo "Locale: " & objOperatingSystem.Locale
Wscript.Echo "Available Physical Memory: " & _
objOperatingSystem.FreePhysicalMemory
Wscript.Echo "Total Virtual Memory: " & _
objOperatingSystem.TotalVirtualMemorySize
Wscript.Echo "Available Virtual Memory: " & _
objOperatingSystem.FreeVirtualMemory
Wscript.Echo "Size stored in paging files: " & _
objOperatingSystem.SizeStoredInPagingFiles
Next

Set colSettings = objWMIService.ExecQuery _
("Select * from Win32_ComputerSystem")

For Each objComputer in colSettings
Wscript.Echo "System Name: " & objComputer.Name
Wscript.Echo "System Manufacturer: " & objComputer.Manufacturer
Wscript.Echo "System Model: " & objComputer.Model
Wscript.Echo "Time Zone: " & objComputer.CurrentTimeZone
Wscript.Echo "Total Physical Memory: " & _
objComputer.TotalPhysicalMemory
Next

Set colSettings = objWMIService.ExecQuery _
("Select * from Win32_Processor")

For Each objProcessor in colSettings
Wscript.Echo "System Type: " & objProcessor.Architecture
Wscript.Echo "Processor: " & objProcessor.Description
Next

Set colSettings = objWMIService.ExecQuery _
("Select * from Win32_BIOS")

For Each objBIOS in colSettings
Wscript.Echo "BIOS Version: " & objBIOS.Version
Next
========================================
Cdlt
Stéphane



Bonjour,

Je commence à lire initiation WMI disponible sur le site de microsoft et dès
le 1er script que j'ai executé sur mon poste, une erreur de syntaxe à Set
WbemSevices = GetObject("Winmgmts:" & strComputer) apparait.

Script Microsoft:

StrComputer = "." Car je l'essaie localement sur ma machine
Set WbemServices = GetObject("Winmgmts:" & strComputer)
Set WbemObjectSet = WbemServices.InstancesOF
("Win32_LogicalMemoryCOnfiguration")
For Each WbemObject In WbemObjectSet
Wscript.echo "Memoire Totale (Ko):" & WbemObject.TotalPhysicalMemory
Next

J'ai cherché sur d'autres sites et j'ai tjrs le même Pb. J'ai essayé
également en déclarant les variables pour un résultat identique.

Si vous savez, n'hésitez pas.

D'avance merci