Войти

Показать полную графическую версию : [решено] меню ПУСК


sov44
24-08-2011, 14:29
Коллега с SamForum ищет скрипт по раскрытию меню ПУСК из командной строки.
как открыть меню "пуск" с помощью ярлыка или командной строки.
(какую команду нужно прописать в свойствах создаваемого ярлыка)
Есть варианы?

Iska
24-08-2011, 15:29
sov44, поясните: ему нужно получить результат, аналогичный нажатию клавиши «Win», что ли?

sov44
24-08-2011, 15:56
Iska, да,просто открытие меню ПУСК, как на vbs:

set WshShell = WScript.CreateObject("WScript.Shell") WshShell.SendKeys "(^{ESC})"

п.с. и создание ярлыка

cibin
24-08-2011, 16:34
У меня единственный вопрос: А ЗАЧЕМ?
Не легче ли эту операцию проделать мышкой?

Ins_16
24-08-2011, 20:51
Iska, да,просто открытие меню ПУСК, как на vbs:
п.с. и создание ярлыка

Покажу пример создания ярлыка для WinRar в VBS


Set WshShell = CreateObject("WScript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
Set SpecialFolders = WshShell.SpecialFolders
programfiles = WshShell.ExpandEnvironmentStrings("%ProgramFiles%")
UserProfile = WshShell.ExpandEnvironmentStrings("%UserProfile%")
AllUsersProfile = WshShell.ExpandEnvironmentStrings("%AllUsersProfile%")
alusr = AllUsersProfile & "\Главное меню\Программы\Стандартные"

if FSO.FileExists (programfiles & "\WinRAR\WinRAR.exe") then
Set WshShortcut = WshShell.CreateShortcut(alusr & "\WinRar.lnk")
WshShortcut.Description = "Архиватор"
WshShortcut.TargetPath = programfiles & "\WinRAR\WinRAR.exe"
WshShortcut.WindowStyle = 1
WshShortcut.Save
End if

Iska
24-08-2011, 21:03
Ins_16, вопрос был вроде как не про то, как создать ярлык. Ярлык упоминался только в том плане, что «…что нужно прописать в ярлыке, чтобы открывалось меню «Пуск»».

sov44, присоединюсь к вопросу: какова конечная цель сего действа?

В любом случае, Вы ведь можете использовать уже предложенное Вами в #3 (http://forum.oszone.net/post-1738508.html#post1738508), не так ли?

Ins_16
24-08-2011, 22:34
Произошло недопонимание :dont-know




© OSzone.net 2001-2012