none
Atalho RRS feed

  • Pergunta

  • Boa tarde Pessoal,

        Gostaria de fazer uma bat para poder copiar um atalho de um aplicativo que está na rede, mas o usuário só terá acesso ao atalho deste programa, será que alguém pode me ajudar neste caso?

    []´s

    Carlos

    quarta-feira, 14 de março de 2007 20:41

Respostas

  • Carlos, caso você deseje  apenas copiar um atalho já criado use o seguinte script:

    'apenas copia o atalho que já existe no servidor
    set wshell = CreateObject("Wscript.Shell")
    caminho = wshell.SpecialFolders("Desktop")
    set FSO = CreateObject ("Scripting.FileSystemObject")
    fso.copyfile "\\servidor\atalho.lnk", caminho & "\"

    Ou...

    'cria o atalho para o executável

    Set WShell = WScript.CreateObject("WScript.Shell")
    caminho = WShell.SpecialFolders("Desktop")
    set atalho = WShell.CreateShortcut(caminho & "\Excel.lnk")
    atalho.TargetPath= "C:\Arquivos de programas\Microsoft Office\OFFICE11\EXCEL.EXE"
    atalho.save

    Neste exemplo acima deixei setado apra criar o atalho para o Excel e atribuí o nome EXCEL.LNK

    Grande abraço
     

     

    terça-feira, 20 de março de 2007 18:03