復制代碼代碼如下:
'執行方法：直接雙擊vbs文件 或者 通過cmd.exe 下 cscript.exe "指定腳本的路徑"
'利用Vbs腳本實現 顯示系統服務里表
'Creator ： Eric1991 Date: 2013-11-1 0:25
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "//" & strComputer & "/root/cimv2")
Set colServices = objWMIService.ExecQuery("Select * from Win32_Service")
For Each objService in colServices
Wscript.Echo objService.DisplayName & "|" & objService.State
Next
