You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
14 lines
333 B
14 lines
333 B
on error resume next
|
|
set l = CreateObject ("WbemScripting.SwbemLocator")
|
|
set ns = l.Open ("root\cimv2")
|
|
ns.filter_ = Array ("Win32_service")
|
|
|
|
for each p in ns
|
|
WScript.Echo p.Path_.Path
|
|
next
|
|
|
|
set os = ns.ExecQuery ("select * from win32_process go select * from win32_service")
|
|
|
|
for each p in os
|
|
WScript.Echo p.Name
|
|
next
|