Win xp autom. herunterfahren ohne Adminrechte
ich suche nach einer möglichkeit zeitgesteuert rechner einfach hinunterzufahren. wichtig ist das benutzer nicht als admin angemeldet ist. mit psshutdown oder shutdown von winxp bin ich nicht weiter gekommen
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 60643
Url: https://administrator.de/contentid/60643
Ausgedruckt am: 26.11.2024 um 03:11 Uhr
10 Kommentare
Neuester Kommentar
Versuch es doch mal über folgenden Weg, kopiere dir nachfolgendes Script in eine Textdatei und ändere sie dann von .txt in .vbs. Danach die Datei aufrufen.
Mal sehen was passiert!
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
Mir fällt da grad noch was ein, bei neueren Rechnern kann man eine Shutdown Zeit im BIOS hinterlegen. Vielleicht geht das bei deinem auch?
Mal sehen was passiert!
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
Mir fällt da grad noch was ein, bei neueren Rechnern kann man eine Shutdown Zeit im BIOS hinterlegen. Vielleicht geht das bei deinem auch?
Stimmt,
mein Fehler!
Hier die neue Version:
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.shutdown()
NEXT
mein Fehler!
Hier die neue Version:
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.shutdown()
NEXT
Merkwürdig!
Einen hab ich noch, versuchs mal hiermit:
http://www.philognosie.net/tip/283/ew.zip
Das ist genau das was du suchst!
Einen hab ich noch, versuchs mal hiermit:
http://www.philognosie.net/tip/283/ew.zip
Das ist genau das was du suchst!