vbscript
WMIクエリ
サーチ…
前書き
VBScriptは、WMI(Windows Management Instrumentation)にローカルおよびリモートPCに関するさまざまな重要情報を問い合わせることができます。 WMIクエリを使用して、PCの名前の抽出、画面解像度の取得、ユーザーとユーザー名に関する情報の取得、プロセスに関する重要な情報の抽出、コアシステム設定の変更などのさまざまなタスクを実行できます。
以下は、WMIクエリを使用して特定のタスクを実行するいくつかの例です。
ローカルPCの名前を抽出する
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
このコードは、実行されたPCの名前をエコーします。
プロセスのインスタンス数の取得
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."
アクティブモニターの画面解像度を取得する
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
ライセンスを受けた CC BY-SA 3.0
所属していない Stack Overflow