Existe uma maneira AUTOMATIZADA de fixar itens na barra de tarefas em um ambiente Windows 2008 TS?

Question

Temos um ambiente Windows Server (R2) Terminal Server e gostaríamos de encontrar uma forma de automatizar a adição (Pinning) de programas à barra de tarefas do Windows para o nosso Comercial.

Meu primeiro pensamento foi fazer isso com uma Política de grupo , mas não consegui encontrar uma configuração para isso. Eu ouvi que você pode 'provavelmente' fazer isso através de um script , mas ainda não vi nenhum exemplo (eu não sou um programador, mas já trabalhei com scripts em lote antes). Existem outros métodos?

Por favor, conselhos.

Obrigado!

    

Answer 1

Como ninguém postou um método que não exija um script, aqui está um script que invocará o método Pin to Taskbar em um atalho. Eu também gostaria de saber se alguém conhece algum método que não exija um script.

Option Explicit

ShellActionInvoke "C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Other", _
                  "Lock Screen.lnk", _
                  "Pin to Tas&kbar"

Function ShellActionInvoke(Fol, File, Verb)
    On Error Resume Next
    Dim objWscriptShell
    Set objWscriptShell = WScript.CreateObject("WScript.Shell")
    Fol=objWscriptShell.ExpandEnvironmentStrings(Fol)
    Dim objAppShell
    Set objAppShell = CreateObject("Shell.Application")
    Dim objFolder
    Set objFolder = objAppShell.Namespace(Fol)
    Dim objFolderItem
    Set objFolderItem = objFolder.ParseName(File)
    Dim objVerb, colVerbs
    Set colVerbs = objFolderItem.Verbs
    For Each objVerb in colVerbs
        If objVerb.Name = Verb Then objVerb.DoIt()
    Next
End Function

    

Answer 2

Isso realmente não funciona. Isso só funcionará na versão em inglês do Windows. Eu estou procurando uma solução sem traduzir este verbo para todas as línguas possíveis: (