Método MoveFile

Move um ou mais arquivos de um local para outro.

Sintaxe

object.MoveFile ( source, destination )

Argumentos:

  • Object: Obrigatório. O objeto é sempre o nome de um FileSystemObject.
  • Source: Obrigatório. Especificação do arquivo de string de caracteres, que pode incluir caracteres curinga, de um ou mais arquivos a serem copiados.
  • Destination: Obrigatório. Destino da string de caracteres no qual os arquivos de origem devem ser copiados. Caracteres curinga não são permitidos.

Comentários

Caracteres curinga só podem ser usados no último componente de caminho do argumento de origem. Se você tiver passado qualquer caminho incorreto, um erro será exibido informando que os arquivos de origem ou os diretórios de destino não existem.

O exemplo a seguir ilustra o uso do método MoveFile.

Exemplo 1:

Function MoveSingleFile(source, destination)
    Dim fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.MoveFile source, destination
End Function

' Usage
MoveSingleFile "C:\Path\To\Source\File.txt", "C:\Path\To\Destination\File.txt"

Exemplo 2:

Nota:

Se você tiver usado caractere curinga no caminho de origem, espera-se que o destino seja um diretório existente. Caso contrário, um erro será exibido informando que o diretório não existe.

Function MoveMultipleFiles(source, destination)
    Dim fso
    Set fso = CreateObject("Scripting.FileSystemObject")
    fso.MoveFile source, destination
End Function

' Usage
MoveMultipleFiles "C:\Path\To\Source\*.txt", "C:\Path\To\Destination\" 'Here Destination Directory must exists