Arresta, riavvia, disconnetti nello Start Screen

0
381

download (6)Per avere i collegamenti di spegnimento, riavvio e disconnessione a portata di clic sullo Start Screen, incolliamo il seguente codice nel Blocco note di Windows:

set WshShell = WScript.CreateObject(“WScript.Shell”)
strStartMenu = WshShell.SpecialFolders(“StartMenu”)
set oShellLink = WshShell.CreateShortcut(strStartMenu & “Shutdown.lnk”)
oShellLink.TargetPath = “%systemroot%System32shutdown.exe”
oShellLink.Arguments = “-s -t 0″
oShellLink.WindowStyle = 1
oShellLink.IconLocation = “%systemroot%System32shell32.dll,27″
oShellLink.Description = “Shutdown Computer (Power Off)”
oShellLink.WorkingDirectory = “%systemroot%System32”
oShellLink.Save
Set oShellLink = Nothing
set oShellLink = WshShell.CreateShortcut(strStartMenu & “Log Off.lnk”)
oShellLink.TargetPath = “%systemroot%System32shutdown.exe”
oShellLink.Arguments = “-l”
oShellLink.WindowStyle = 1
oShellLink.IconLocation = “%systemroot%System32shell32.dll,44″
oShellLink.Description = “Log Off (Switch User)”
oShellLink.WorkingDirectory = “%systemroot%System32”
oShellLink.Save
Set oShellLink = Nothing
set oShellLink = WshShell.CreateShortcut(strStartMenu & “Restart.lnk”)
oShellLink.TargetPath = “%systemroot%System32shutdown.exe”
oShellLink.Arguments = “-r -t 0″
oShellLink.WindowStyle = 1
oShellLink.IconLocation = “%systemroot%System32shell32.dll,176″
oShellLink.Description = “Restart Computer (Reboot)”
oShellLink.WorkingDirectory = “%systemroot%System32”
oShellLink.Save
Set oShellLink = Nothing
Wscript.Echo “Created Shutdown, Restart and Log Off buttons”

Salviamolo, successivamente rinominiamone l’estensione in .vbs e facciamo doppio clic sul file appena creato. Nello Start Screen compariranno i 3 collegamenti di spegnimento, riavvio e disconnessione. Per ulteriore comodità si possono aggiungere alla barra delle applicazioni cliccando le relative tile con il tasto destro del mouse e scegliendo la voce in basso aggiungi alla barra delle applicazioni.