是否可以使用 vbscript 检查服务状态?我希望为每种可能的服务状态提供一个功能: LINK 任何帮助都会很棒。我确实编写了一个函数来检查服务是否停止:
Public Function IsServiceStop(ByVal serviceName)
On Error Resume Next
Dim objServices, service
Set oWmiService = GetObject("winmgmts:\\.\root\cimv2")
Set objServices = oWmiService.ExecQuery("Select * from Win32_Service where Name='" & serviceName & "'")
For Each service In objServices
IsServiceStop = (service.Started = False)
Exit Function
Next
IsServiceStop = True
On Error Goto 0
End Function
最佳答案
如有疑问,请阅读 documentation 。您所需要做的就是检查服务对象的 State
属性:
serviceName = "..."
Set wmi = GetObject("winmgmts://./root/cimv2")
state = wmi.Get("Win32_Service.Name='" & serviceName & "'").State
WScript.Echo state
关于service - 如何使用vbscript检查服务状态?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/21074223/