有没有办法使用vbscript检查服务的状态?我想为每种可能的服务状态编写一个函数:
链接
任何帮助都将是伟大的。我已经编写了一个检查服务是否停止的函数:
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
Windows管理规范
- Azevedo