Многие, для выключения компьютера вызывают сочетанием клавиш Win+C чудо панель. Нажимают чудо кнопку параметры и выбирают выключение(завершение работы). Для планшетов это может быть не совсем удобно. Нужна плитка. Раз нужна, значит нужна, создаём плитку.
Нам потребуется скопировать нижеприведённый код в файл с именем например shutdown.vbs.
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 "Shutdown, Restart and Log Off buttons have been created. You can now pin them to the Start Screen of your Windows 8 computer (if they are not already there)."
После создания файла запустите его*.
Получаем вот такое сообщение:
И можем пользоваться нашими удобными кнопками.
* Не забудьте настроить проводник для отображения расширений файлов.
Комментариев: 5 RSS
1 виталий 01-03-2013 20:12
* Не забудьте настроить проводник для отображения расширений файлов.
БУДЬТЕ добры подскажите как это сделать
2 Admin 02-03-2013 12:34
Параметры папок, снимите галочку с "скрывать расширения для зарегистрированных файлов".
3 Lvbnhbq 03-03-2013 21:58
Не помогло
4 Bulat 02-05-2014 13:41
Это делается только на W8? Почему-то не получается на W8.1
5 Bulat 03-05-2014 07:37
Плитки работают для W8, а для W8.1 это не работает. Есть ли решение?