[решено] Автоматическое вынесение ярлычков приложений на панель быстрого запуска в W7

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

Автоматическое вынесение ярлычков приложений на панель быстрого запуска в W7

Собственно сабж интересует именно способ с unattendet фалом, если есть таковой.

Есть такой вот скрипт. Была попытка сделать его рабочим и в русской и в английской версии.
Работает только при загруженном эксплорере.

PinToTasckbar.vbs

Код:

Set objShell = CreateObject("Shell.Application")

set filesystem = CreateObject("scripting.Filesystemobject")

Set objFolder = objShell.Namespace(filesystem.GetParentFolderName(Wscript.Arguments(0)))

Set objFolderItem = objFolder.ParseName(filesystem.GetFileName(WScript.Arguments(0)))

Set colVerbs = objFolderItem.Verbs

For Each objVerb in colVerbs

    If Replace(objVerb.name, "&", "") = "Pin to Taskbar" Then objVerb.DoIt

    If Replace(objVerb.name, "&", "") = "Unpin from Taskbar" Then objVerb.DoIt

    If Replace(objVerb.name, "&", "") = "Закрепить программу в панели задач" Then objVerb.DoIt

    If Replace(objVerb.name, "&", "") = "Изъять программу из панели задач" Then objVerb.DoIt    

    If Replace(objVerb.name, "&", "") = "Закрепить на панели задач" Then objVerb.DoIt

    If Replace(objVerb.name, "&", "") = "Открепить от панели задач" Then objVerb.DoIt  

Next

PinToTasckbar.vbs "Полный путь\имя файла программы"

Цитата:

Цитата Boa Soft

Есть такой вот скрипт. Была попытка сделать его рабочим и в русской и в английской версии.
Работает только при загруженном эксплорере. »

Спасибо щас попробую...

На 7ом проходе это срабатывает ?

СПАСИБО РЕСПЕКТ ВАМ ОГРОМЕННЕШИЙ

Странно в 7ом проходе не срабатывает или эксплорер там еще не прогружаеться ?

Цитата:

Цитата Boa Soft

PinToTasckbar.vbs »

Мало сказать спасибо, после многочисленных поисков... (в частности и на разных форумах посвящённых такой теме), этот вариант РАБОТАЕТ! Спасибище огромное!

Boa Soft, работает только первый раз. Затем только после сноса винды. Почему так? И можно ли как то этим скриптом и удалить ярлык?

Pozia, скрипт от Boa Soft закрепляет ярлык, если этого еще не сделано, и наоборот - удаляет его с панели задач, если он был до этого закреплен ;)

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

Хочу поднять тему заново, есть какие нибудь альтернативные решения??? и как можно удалить иконки Internet explorer и Windows Explore с панели задач.... может у кого что получилось... поделитесь...

Guman, чем не устраивает изложенное текущее решение, что Вы ищете некие альтернативные?

Мне нужно удалять пару ярлыков и добавлять до загрузки explorer

Guman, ясно. Сочувствую.

Цитата:

Цитата Guman

Мне нужно удалять пару ярлыков и добавлять до загрузки explorer »

тоже задавался такой задачей, смог реализовать это только запуском VBS через RunOnce. т.е. до загрузки explorer выполняется внесение в реестр (т.е. при следующем запуске ОС) запуск vbs. Единственный недостаток что ярлыки появляются только при следующей перезагрузке, но для меня это не является недостатком т.к. в моём случае все равно происходит принудительная автоматическая перезагрузка компа. (реализовано это на модифицированном 7-zip sfx)

если вам это подходит могу поделиться.

Smokie_BlahBlah,

Интересное приложение, надо будет опробовать.