vbscript
Query WMI
Ricerca…
introduzione
VBScript può interrogare Windows Management Instrumentation (WMI) per varie informazioni vitali relative al PC locale e remoto. Possiamo utilizzare le query WMI per eseguire varie attività come estrarre il nome del PC, ottenere la risoluzione dello schermo, ottenere informazioni su utente e nome utente, estrarre informazioni vitali su qualsiasi processo, modificare le impostazioni principali del sistema, ecc.
Di seguito sono riportati alcuni esempi che utilizzano le query WMI per eseguire attività specifiche.
Estrazione del nome del PC locale
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSettings = objWMIService.ExecQuery _("Select * from Win32_ComputerSystem")
For Each objComputer in colSettings
wscript.echo objComputer.Name
Next
Questo codice farà eco al nome del PC in cui è stato eseguito.
Ottenere il numero di istanze di qualsiasi processo
strComputer = "."
instances = 0
processName = "chrome.exe"
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcess = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objProcess in colProcess
If objProcess.Name = processName Then instances = instances + 1
Next
wscript.echo "Process - "&processName&" has "&instances&" instances running."
Ottenere la risoluzione dello schermo del monitor attivo
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_DesktopMonitor",,48)
For Each objItem in colItems
WScript.Echo "ScreenHeight: " & objItem.ScreenHeight
WScript.Echo "ScreenWidth: " & objItem.ScreenWidth
Next
Modified text is an extract of the original Stack Overflow Documentation
Autorizzato sotto CC BY-SA 3.0
Non affiliato con Stack Overflow