[решено] Ярлык и его парамерт окно

Ответить
Аватара пользователя
SAOPP

[решено] Ярлык и его парамерт окно

Сообщение SAOPP »

Существует надобность создать (автоматически) ярлык с изменённым параметром окно: "Свёрнутое в значок".



Изображение



Конкретный пример таков, есть sfx с Total Commander'ом, сам ТК настроен на сворачивание в трей, соответственно, для того, что бы при запуске ярлыка он сворачивался в трей, нужно как раз таки и указать в ярлыке "Свёрнутое в значок". Таким образом, положив данный ярлык в автозапуск, ТК всегда будет стартовать и сворачиваться сам, НО! Есть то, что есть, как изменить и чем (тулзой?) этот параметр я не знаю, как бы выходом является следующее... Взять и запихнуть вместе с ТК в sfx ярлык из рабочей системы, изменив при этом путь на переменную (например) %ProgramFiles% - но тогда второй вопрос топика: как скорректировать путь к файлу и рабочей папке у этого ярлыка на другой системе? (т.е. что бы переменные превратились в реальные пути на конечной машине).
Аватара пользователя
VseDoFeNi

Re: [решено] Ярлык и его парамерт окно

Сообщение VseDoFeNi »

Хорошая тулза, но увы не совсем по запросу...
Аватара пользователя
boss911

Re: [решено] Ярлык и его парамерт окно

Сообщение boss911 »

Цитата SAOPP:



есть sfx с Total Commander'ом
[решено] Ярлык и его парамерт окно




А если в Inno Setup его скомпилировать? Там это легко реализуется, да и по красивее все будет выглядеть, чем простенький не функциональный SFX. Имхо!
Аватара пользователя
Petya V4sechkin

Re: [решено] Ярлык и его парамерт окно

Сообщение Petya V4sechkin »

SAOPP, в статье
Создание ярлыков при установке ОС
в примере VBScript выставить oShellLink.WindowStyle = 7.
Аватара пользователя
SAOPP

Re: [решено] Ярлык и его парамерт окно

Сообщение SAOPP »

boss911,
Цитата boss911:



А если в Inno Setup его скомпилировать? Там это легко реализуется, да и по красивее все будет выглядеть, чем простенький не функциональный SFX. Имхо!
[решено] Ярлык и его парамерт окно




Интересно касательно написания простого инсталлера для создания ярлыка (такое возможно в inno?), а так мне в любом случае нужен тихий установщик, в этом вопросе модифицированному модулю нет равных.



Petya V4sechkin,
Цитата Petya V4sechkin:



в статье Создание ярлыков при установке ОС в примере VBScript выставить oShellLink.WindowStyle = 7.
[решено] Ярлык и его парамерт окно




Это действительно очень и очень близко к тому, что мне нужно (а я как раз сегодня имел дело с одними скриптами от гисметео.трея, чем собственно очень заинтересовался), это 99% решения по моему, в любом случае буду тестировать.



VBScript'е можно использовать переменные для пути создания ярлыка?

Set oShellLink = WshShell.CreateShortcut("%ALLUSERSPROFILE%\Главное меню\Программы\Автозагрузка\Total Commander.lnk")



И так насколько удалось выяснить, создаётся ярлык только на системном диске (?), причины понять не удалось, и второе, переменные не интерпретируются реальным путям Изображение хотя и действует смена параметра окно Изображение



Тогда вопрос такого плана, можно ли ИЗМЕНЯТЬ таким скриптом определённый ярлык?
Аватара пользователя
Petya V4sechkin

Re: [решено] Ярлык и его парамерт окно

Сообщение Petya V4sechkin »

Цитата SAOPP:



VBScript'е можно использовать переменные для пути создания ярлыка?



Working with Special Folders
Аватара пользователя
SAOPP

Re: [решено] Ярлык и его парамерт окно

Сообщение SAOPP »

Удалось немножко выкрутиться обрезав скрипт до следующих команд:



Код:

Код: Выделить всё

Set WshShell = WScript.CreateObject("WScript.Shell")
' Создание ярлыка:
Set oShellLink = WshShell.CreateShortcut("C:\Documents and Settings\All Users\Главное меню\Программы\Автозагрузка\Total Commander.lnk")
oShellLink.WindowStyle = 7
oShellLink.Save

Вопрсо только в том, к4ак заставить Set oShellLink = WshShell.CreateShortcut понимать переменные.



Из ссылочки выше удалось выдернуть переменную для автозагрузки всех юзеров AllUsersStartup, но как тогда применять её в скрипте? Я сам то vbs не так часто встречал и уж тем более возился с ними.



При таком скрипте:



Код:

Код: Выделить всё

Set WshShell = WScript.CreateObject("WScript.Shell")
' Создание ярлыка:
Set oShellLink = WshShell.CreateShortcut("AllUsersStartup\Total Commander.lnk")
oShellLink.WindowStyle = 7
oShellLink.Save

Вылазит окошко, что и минутами ранее когда я задавать в пути переменные:




читать дальше »


Изображение
Аватара пользователя
Petya V4sechkin

Re: [решено] Ярлык и его парамерт окно

Сообщение Petya V4sechkin »

SAOPP, там же примеры есть.

Не нужно знания языка, чтобы использовать примеры.



Код:

Код: Выделить всё

Set oShellLink = WshShell.CreateShortcut(WshShell.SpecialFolders("AllUsersStartup") & "\Total Commander.lnk")
Аватара пользователя
SAOPP

Re: [решено] Ярлык и его парамерт окно

Сообщение SAOPP »

Уже нашёл Изображение в примерах для ярлычков, спасибо. Пока тестирую.



Хех, удалось найти решение вот таким скриптом, может быть кому-то пригодиться, он редактирует уже готовый ярлык на предмет установки ему параметра окно: "свернутое в значок".





Код:

Код: Выделить всё

Set WshShell = WScript.CreateObject("WScript.Shell")
Set oShellLink = WshShell.CreateShortcut(WshShell.SpecialFolders("AllUsersStartup") & "\Total Commander.lnk")
oShellLink.WindowStyle = 7
oShellLink.Save

Спасибо Petya V4sechkin, в тысячный раз Изображение
Ответить

Вернуться в «Автоматическая установка Windows 2000/XP/2003»