Visual Basic - apagar/reiniciar en red

hola tengo varios ordenadores conectados en red y necesito apagarlos o reiniciarlos desde un solo ordenador tengo este codigo en el form
Private Sub Command1_Click()
InitiateSystemShutdown "\\MYPC", "The system is Shutting Down", 30, True, True
End Sub

Private Sub Command2_Click()
AbortSystemShutdown "\\MYPC"
End Sub
y este en el modulo :
Public Declare Function InitiateSystemShutdown Lib "advapi32.dll" Alias _
"InitiateSystemShutdownA" (ByVal lpMachineName As String, ByVal lpMessage _
As String, ByVal dwTimeout As Long, ByVal bForceAppsClosed As Long, ByVal _
bRebootAfterShutdown As Long) As Long

Public Declare Function AbortSystemShutdown Lib "advapi32.dll" Alias "AbortSystemShutdownA" (ByVal lpMachineName As String) As Long
pero no hace nada alguien me podria indicarme que esta mal o si alguien sabe otro codigo se lo agradeceria para reiniciaro apagar otro ordenador de la red se lo agradeceria.

Una idea descabellada que tengo, es tener un residente en cada memoria que este checando anlgun archivo en otras maquinas, si en ese archivo tu escribes reiniciar, que se reinicie las maquinas que lo lean, es algo facil, espero que te sirva, nos vemos.