Автоматизировать создание ярлыков панели задач

Question

У меня Windows 8 компьютеров в домене. Я хочу создать объект групповой политики для создания ярлыков панели задач для пользователей при их перемещении на разные машины.

Я создал командный файл, который будет копировать файл ярлыка (т.е. Word.lnk) в следующую папку:

C:\Users\User\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned\Taskbar

Однако это не создает ссылку на панели задач пользователя. Я предполагаю, что где-то есть настройка реестра, но в Google ничего не могу найти по этому поводу.

Кто-нибудь знает исправление для этого, пожалуйста?

Answer 1

Вы можете использовать файл VBScript, как показано ниже:

Const CSIDL_COMMON_PROGRAMS = &H17
Set objShell = CreateObject("Shell.Application")
Set objAllUsersProgramsFolder = objShell.NameSpace(CSIDL_COMMON_PROGRAMS)
strAllUsersProgramsPath = objAllUsersProgramsFolder.Self.Path
Set objFolder = objShell.Namespace(strAllUsersProgramsPath & "\Microsoft Office")
Set objFolderItem = objFolder.ParseName("Microsoft Word 2010.lnk")
Set colVerbs = objFolderItem.Verbs
For Each objVerb in colVerbs
    If Replace(objVerb.name, "&", "") = "Pin to Taskbar" Then objVerb.DoIt
Next

Если вы хотите закрепить любой произвольный EXE-файл на панели задач, посмотрите эту статью, загрузите прикрепленный код и вызовите PinItem.vbs следующим образом:

cscript PinItem.vbs /taskbar /item:"Drive:\Path\to\app.exe"