如何通过VB脚本启动Windows服务？

Question

如何通过VB脚本启动Windows服务？

我尝试使用以下代码启动Mysql服务

test.vbs：

service="MySQL55"
Set wmi = GetObject("winmgmts://./root/cimv2")
qry = "SELECT * FROM Win32_Service WHERE Name='" & service & "'"
For Each s In wmi.ExecQuery(qry)
s.StartService
Next

但是这段代码没有启动mysql服务。

Answer 1

假设该服务实际上名为“MySQL55”，请检查StartService的返回值：

For Each s In wmi.ExecQuery(qry)
  rc = s.StartService
  WScript.Echo s.Name & ": " & rc
Next