none
Script vbs RRS feed

  • Pergunta

  • Olá a todos,

    estou com dificuldade em elaborar um script vbs para executar a seguinte tarefa em um servidor:
    existem duas pastas (c:\origem\baks\) e (e:\destino\pasta\), preciso que esse script apague o arquivo existente na pasta (e:\destino\pasta\) e, da pasta (c:\origem\baks\) onde há vários arquivos, copiar somente o arquivo recente que dentre os outro sempre será o arquivo que foi gerado no dia. Por exemplo: na pasta (c:\origem\baks\), têm os arquivos "a.bak" com data de 06/06/2009, "b.bak" com data de 07/06/2009, "c.bak" com data 08/06/2009, deverá ser copiado somente o arquivo com a data mais recente para a pasta (e:\destino\pasta\). Certo da ajuda e atenção, agradeço antecipadamente a todos.

    []´s


    Paulo Henrique.

    Olá novamente, segue o que eu consegui fazer até agora, não dá erro mas, também não copia nenhum arquivo :) ... risos... podem me ajudar???

    set obj = CreateObject("Scripting.FileSystemObject")
    set obj1 = CreateObject("Scripting.FileSystemObject")
    set pasta = obj.getFolder ("E:\Microsoft SQL Server\bkps\1AND6")
     for each arquivo in pasta.files
      if (arquivo.datecreated = (Date()-1))then
       obj1.CopyFile "E:\Microsoft SQL Server\bkps\1AND6\*.bak" , "E:\Microsoft SQL Server\dat\" 
      end if
      set obj = nothing
     next


    []´s


    Paulo Henrique.
    • Editado phscuritiba quarta-feira, 10 de junho de 2009 20:39
    quarta-feira, 10 de junho de 2009 17:26