This code successfully reboots my '95 and '98 machines but it does nothing when I run it on an NT box.
What change do I make or what code do I use to make it reboot my NT box?
Private Const EWX_REBOOT As Long = 2
Private Declare Function ExitWindowsEx Lib "user32" (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long
Private Sub Timer1_Timer()
If Time = "5:16:30 AM" Then
lngResult = ExitWindowsEx(EWX_REBOOT, 0&)