[amel27]

FunkyByte

...или через WMI:

Код:

Func _ServiceStart($sService, $sComputer = "localhost")
  Local $objWMI = ObjGet("winmgmts:\\" & $sComputer & "\root\cimv2")
  Local $sQuery = "Select * From Win32_Service Where Name Like '"& $sService &"'"
  Local $iRet, $colItems = $objWMI.ExecQuery($sQuery)
  For $objService In $colItems
    If $objService.State = "Stopped" Then
        $iRet = $objService.StartService($objService.Name)
        If $iRet=0 Then Return True
    ElseIf $objService.State = "Running" Then
        Return True
    EndIf
  Next
  Return False
EndFunc

Func _ServiceStop($sService, $sComputer = "localhost")
  Local $objWMI = ObjGet("winmgmts:\\" & $sComputer & "\root\cimv2")
  Local $sQuery = "Select * From Win32_Service Where Name Like '"& $sService &"'"
  Local $iRet, $colItems = $objWMI.ExecQuery($sQuery)
  For $objService In $colItems
    If $objService.State = "Running" Then
        $iRet = $objService.StopService($objService.Name)
        If $iRet=0 Then Return True
    ElseIf $objService.State = "Stopped" Then
        Return True
    EndIf
  Next
  Return False
EndFunc