Если нужно создать из скрипта WSH ярлык приложения с параметрами запуска , например при создании ярлыков через групповые политики, то можно сделать так:
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
Dim MyShortcut, MyDesktop, DesktopPath
' Место назначения ярлыка
DesktopPath = WSHShell.SpecialFolders("Desktop")
' Имя ярлыка
Set MyShortcut = WSHShell.CreateShortcut(DesktopPath & "\КОРПОРАТИВНЫЙ ПОРТАЛ.lnk")
' Запускаемое приложение
MyShortcut.TargetPath ="%USERPROFILE%\Local Settings\Application Data\Bromium\Application\chrome.exe"
' Стиль открытия окна:
' 1 - Обычный размер окна; 3 - Развёрнутое на весь экран; 7 - Свёрнутое в значoк
MyShortCut.WindowStyle = 3
' Парамерты запуска приложения (в моем случае это адрес сайта)
MyShortcut.Arguments = "http://tell.corp"
' Задаем Hotkey - сочетание клавиш быстрого вызова
MyShortCut.Hotkey = "CTRL+SHIFT+P"
' Рабочая дирректория
MyShortcut.WorkingDirectory = "%USERPROFILE%\Local Settings\Application Data\Bromium\Application\"
' Указываем значек, который будет у ярлыка
MyShortCut.IconLocation = "%USERPROFILE%\Local Settings\Application Data\Bromium\Application\chrome.exe, 0"
' Записываем готовый ярлык в место назначения
MyShortcut.Save
ВСЕ — Финиш!