none
Copiar um arquivo de rede para uma pasta do Pc local RRS feed

  • Pergunta

  •  

    Galera, alguem sabe como eu posso fazer pra copiar um arquivo de um caminho de rede (\\servidor\compartilhamento\arquivo.exe) para uma uma pasta no meu pc local (c:\pasta\).

     

    Lembrando que tem que ser em VBS e a pasta no computador local (c:\pasta\) nao existe sendo necessario ser criada antes...

     

    Ajuda aeeeeeee

     

     

    Abraço

    quarta-feira, 20 de agosto de 2008 15:26

Respostas

  • Olá Albert, blza ?

     

    Acrescente essas duas linhas no final do script.

     

    Set WshShell = WScript.CreateObject("WScript.Shell")
    WshShell.Run("c:\folder\arquivo.exe
    ")

     

    Teste e post ..

     

    Att.

     

    Leonardo Duarte

    quarta-feira, 20 de agosto de 2008 18:37
  • Segue o script abaixo Albert, espero ter ajudado

     

    Dim objShell

    Const OverwriteExisting = TRUE

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.CreateFolder("C:\Folder")
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    objFSO.CopyFile "\\servidor\compartilhamento\arquivo" , "c:\Folder\", OverwriteExisting

     

     

    quarta-feira, 20 de agosto de 2008 18:11

Todas as Respostas

  • Segue o script abaixo Albert, espero ter ajudado

     

    Dim objShell

    Const OverwriteExisting = TRUE

    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.CreateFolder("C:\Folder")
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    objFSO.CopyFile "\\servidor\compartilhamento\arquivo" , "c:\Folder\", OverwriteExisting

     

     

    quarta-feira, 20 de agosto de 2008 18:11
  • Olá Albert, blza ?

     

    Acrescente essas duas linhas no final do script.

     

    Set WshShell = WScript.CreateObject("WScript.Shell")
    WshShell.Run("c:\folder\arquivo.exe
    ")

     

    Teste e post ..

     

    Att.

     

    Leonardo Duarte

    quarta-feira, 20 de agosto de 2008 18:37
  •  

    GALERA VALEU A ATENCAO E AJUDA DE TODOS...

     

    Consegui fazer os scripts com algumas alteracoes nas linhas de comando e deu certo tbm e como tinha extrema urgencia dei meus pulos pra conseguir o resultado desejado! mas testei o Script do Rafael funciona perfeitamente tbm, com relacao ao adendo que vc fez Leonardo, PERFEITO, consegui isso essas linhas em uns scripts q eu ja tinha!!!

     

     

    Mas vou garantir o credito aos dois pela atencao e CLARO, por terem feito funcionar como eu estava precisando.

     

    Agradeço a todos

    quarta-feira, 20 de agosto de 2008 21:28