前段时间突然遇到了有些服务器在重新启动后,一些重要的服务却无法自动启动,造成服务器功能的不可用.最典型的就是exchange服务器所依赖的information store服务不能启动.
所以弄了个这个脚本,设置为计算机启动脚本,让计算机在重启后,启动所有类型为自动而没有启动的服务(也可以双击运行所有未启动的服务) ,适用于本地策略以及域策略.类型为vbs脚本
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colListOfServices = objWMIService.ExecQuery _
    ("Select * from Win32_Service Where State = 'Stopped' and StartMode = " _
        & "'Auto'")
For Each objService in colListOfServices
    objService.StartService()
Next