如何通过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