В том, что Вы передаёте процедуре StartOrStopService() пустое значение в аргументе Action.
Сдаётся мне, что этого:
Код:
WScript.CreateObject("WbemScripting.SWbemLocator").ConnectServer(".", "root\cimv2").Get("Win32_Service.Name='Hamachi2Svc'").StartService
Вам будет достаточно для запуска службы, если имя «Hamachi2Svc» — правильное.