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

VseDoFeNi · Отправлено: **20:55, 18-12-2008** | #2

SAOPP, CHGSTR.EXE тебе поможет.

SAOPP · Отправлено: **21:14, 18-12-2008** | #3

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

boss911 · Конфигурация компьютера

Цитата SAOPP:

есть sfx с Total Commander'ом »

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

Petya V4sechkin · Конфигурация компьютера

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

SAOPP · Отправлено: **21:28, 18-12-2008** | #6

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 · Конфигурация компьютера

Цитата SAOPP:

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

Working with Special Folders

SAOPP · Отправлено: **21:57, 18-12-2008** | #8

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

Код:

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 · Конфигурация компьютера

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

Код:

Set oShellLink = WshShell.CreateShortcut(WshShell.SpecialFolders("AllUsersStartup") & "\Total Commander.lnk")

SAOPP · Отправлено: **22:04, 18-12-2008** | #10

Уже нашёл

в примерах для ярлычков, спасибо. Пока тестирую.

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

Код:

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

Спасибо Petya V4sechkin, в тысячный раз