RebootMachine Example

Option Explicit

Sub Main

Dim intReturn As Integer 

 intReturn = Action2.RebootMachine

 If intReturn = 0 Then

  MsgBox "Reboot failed"

  MsgBox( Action2.GetLastError )

 End If

End Sub