Neustart des Computers

Impressum

Verantwortlicher für die Seite und den Inhalt :

Gabriel Thiel

Trentinostraße 3 / 4 / 1

A - 2441 Mitterndorf an der Fischa

Österreich

Haftungsausschuss & Datenschutz

Impressum

Manchmal wird nach der Installation oder Veränderung bestimmter Einstellungen ein Neustart des Computers benötigt!

 

Mit Visual Basic Script wird dieser wie folgt ausgeführt:

 

Öffne einen Editor (z.B. Notepad++), füge folgenden Code ein und speichere diesen als restart.vbs

 

Dim ObjShell

Set ObjShell = CreateObject("WScript.Shell")
ObjShell = msgbox("Wollen Sie den Computer herunterfahren ?", +vbYesNo+vbExclamation, "")


If ObjShell = vbYes then

Set ShellObject = GetObject("winmgmts:{impersonationLevel=impersonate,(Shutdown)}").ExecQuery("select * from Win32_OperatingSystem where Primary=true")

For Each sys In ShellObject

Sys.Win32Shutdown 6

Next

End if

 

 

Quelle: de.wikibooks.org