[Iska]

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

[sov44]

Iska, да,просто открытие меню ПУСК, как на vbs:

Код:

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

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

[cibin]

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

[Ins_16]

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]

Ins_16, вопрос был вроде как не про то, как создать ярлык. Ярлык упоминался только в том плане, что «…что нужно прописать в ярлыке, чтобы открывалось меню «Пуск»».

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

В любом случае, Вы ведь можете использовать уже предложенное Вами в #3, не так ли?

[Ins_16]

Произошло недопонимание