igor_andreev
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору SiaRain А руками человека ломает и колбасит сделать ярлык? Код: Set sh = CreateObject("WScript.Shell") DesktopPath = sh.SpecialFolders("Desktop") Set sc = sh.CreateShortcut(DesktopPath & "\Reboot.lnk") sc.TargetPath = sh.ExpandEnvironmentStrings("%windir%\system32\shutdown.exe") sc.Arguments = "-r -f -t 00" sc.WindowStyle = 7 sc.Hotkey = "F10" sc.IconLocation = sh.ExpandEnvironmentStrings("%windir%\system32\shell32.dll,27") sc.Description = "Перезагрузить компьютер" sc.WorkingDirectory = sh.ExpandEnvironmentStrings("%windir%\system32") sc.Save | для logoff аналогично |