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
Please also mark the comments that contributed to the solution of the article
Content-Key: 60643
Url: https://administrator.de/contentid/60643
Printed on: April 24, 2024 at 01:04 o'clock
10 Comments
Latest comment
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!