PC herunterfahren, wenn nach x Min nicht eingeloggt wurde

Mein PC startet Wochentags automatisch um Backups zu machen. Normalerweise komme ich kurz darauf und logge mich ein. Gibt es eine Möglichkeit, daß sich der PC von alleine herunterfahrt, falls ich nicht komme und mich einlogge? Also daß sich der PC automatisch herunterfährt, wenn 60 Minuten nach dem ochfahren sich niemand einloggt.

OS: WinXP mit aktuellem SP

tia

Ruhezustand über die Energieeinstellungen oder shutdown.exe über Scheduler.

über die energieeinstellungen ist keine alternative, da ich durchaus auch mal eine gute stunde weg bin, deswegen aber den pc nicht abdrehen will.

geplanter task mit vbscript klingt sehr gut. dummerweise habe ich aber genau gar keine ahnung davon.

das wäre nett

ich hab mir schon ein bischen vbscript angeschaut. sieht ja recht einfach aus. aber das bringt mir nix, wenn ich keine ahnung habe, wie die funktionen heißen, die ich brauche

zum runterfahren hab ich was gefunden, aber wie überprüfe ich, ob jemand eingeloggt ist?

Code:

strComputer = "."
Set objWMIService = GetObject_
    ("winmgmts:{impersonationLevel=impersonate,(Shutdown)}\\" & _
        strComputer & "\root\cimv2")

Set colOperatingSystems = objWMIService.ExecQuery _
    ("Select * from Win32_OperatingSystem")
 
For Each objOperatingSystem in colOperatingSystems
    objOperatingSystem.Win32Shutdown(1)
Next

hier hätte ich noch was gefunden, das alle eingeloggten user ausgibt. vielleicht hilft dir das was un du kannst es zusammenstückeln

Code:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 

Set colComputer = objWMIService.ExecQuery _
    ("Select * from Win32_ComputerSystem")
 
For Each objComputer in colComputer
    Wscript.Echo "Logged-on user: " & objComputer.UserName
Next

edit zum x-ten male
ich löse es einfacher: ich starte den pc in der nacht und fahr ihn automatisch wieder runter. ich hoffe mal, das funzt