VBS/WSH/JS

ferget · Отправлено: **02:40, 17-04-2012** | #2

C:\users\%username%\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar

Iska · Отправлено: **08:34, 17-04-2012** | #3

Valek271183, обратите внимание на примеры отсюда: 7 / 2008 R2 - [решено] Как закрепить ярлыки в меню Пуск?.

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

Iska помогай. Приведи пожалуйста пример на любом ярлыке с панели задач как его можно "Открепить от панели задач"

Iska · Отправлено: **14:46, 19-04-2012** | #5

Valek271183, не помогу — у меня нет сейчас под рукой ОС, более свежих, нежели Windows XP.

Примеры есть по приведённой ссылке. Потребное имя глагола можно получить, перебрав их, как в этом примере из упомянутой ссылки же.

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

Код:

Const CSIDL_PROFILE = &H28

Set objShell = CreateObject("Shell.Application") 
Set objCurrentUserStartFolder = objShell.NameSpace(CSIDL_PROFILE) 
strCurrentUserProgramsPath = objCurrentUserStartFolder.Self.Path 
Set objFolder = objShell.Namespace(strCurrentUserProgramsPath & "\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar") 

Set objFolderItem = objFolder.ParseName("cmd.lnk")
Set colVerbs = objFolderItem.Verbs 
For Each objVerb in colVerbs 
    If Replace(objVerb.name, "&", "") = "Открепить от панели задач" Then objVerb.DoIt 
Next

P.S. Можно тему приклеить сюда - [решено] Закрепление на панели задач из командной строки

ferget · Отправлено: **20:05, 19-04-2012** | #7

"cmd.lnk" вы просто так написали или у вас он так называется?

просто у меня cmd закрепляется как "Command Prompt.lnk"

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

ferget, это у меня там ярлык такой.

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

Morpheus , я знал что ты сможешь помочь, людей которые так хорошо разбираются не так уж и много, но у тебя всегда есть ответ на любой вопрос, так что СПАСИБО тебе огромное!

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

Valek271183, не всегда и не на любой, но за спасибо - спасибо!