Reboot a computer if nobody is logged in

Well this might help

http://www.pscode.com/vb/scripts/ShowCode.asp?txtCodeId=55828&lngWId=1

it is a link to a project that you can dowload and i bet with a few ulterations of the code you can come up with
the one you want i can't check the code since i don't have a network nor 2 PC :(

so if it comes handy do let me know :D

hopefully you will find your answer

'Add this to a module declerations
'''''''''''''''''''''

Option Explicit

Private Declare Sub GetCursorPos Lib "user32.dll" (lpPoint As POINTAPI)
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
Private Type POINTAPI
X As Integer
Y As Integer
End Type
Private posOld As POINTAPI
Private posNew As POINTAPI
Public Function InputCheck() As Boolean
    Dim i As Integer
    Call GetCursorPos(posNew)
    If ((posNew.X <> posOld.X) Or (posNew.Y <> posOld.Y)) Then
        posOld = posNew
        InputCheck = True
        Exit Function
     End If
 Dim Twaarde As Integer
 For Twaarde = 32 To 126
   InputCheck = CBool(GetAsyncKeyState(Asc(Chr$(Twaarde))))
   If InputCheck Then
    Exit For
    End If
 Next
End Function


ADD 1 TIMER
'Add this to form_declerations
'''''''''''''''''''''''

Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 30000 'when you want to check

End Sub

Private Sub Timer1_Timer()
Debug.Print
If InputCheck = True Then
Debug.Print "user is logged on and active"

Else

If InputCheck = False Then
Debug.Print "no logged on user"
'reboot system code here
End If
End If

End Sub

'Just to remind you that you might not want to check every 30 seconds, instead you might want to check every 5 - 10 minutes, just like a screen saver.