Como: Copiar arquivos com um padrão específico para um diretório no Visual Basic

Artigo
08/25/2010

O Método My.Computer.FileSystem.FindInFiles retorna uma coleção de sequências de caracteres somente leitura que representam os nomes de caminho para os arquivos.Você pode usar o parâmetro wildCards para especificar um padrão.

Uma coleção vazia é retornada se nenhum arquivo correspondente for encontrado.

Você pode usar o Método My.Computer.FileSystem.CopyFile para copiar os arquivos para uma pasta.

Para copiar arquivos com um padrão específico para um diretório

Use o método GetFiles para retornar a lista de arquivos.Este exemplo retorna todos os arquivos .rtf do diretório especificado.

For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
    My.Computer.FileSystem.SpecialDirectories.MyDocuments, _
    FileIO.SearchOption.SearchTopLevelOnly, "*.rtf")

Use o método CopyFile para copiar os arquivos.Este exemplo copia os arquivos para o diretório chamado testdirectory.
```
My.Computer.FileSystem.CopyFile(foundFile, "C:\testdirectory\" & foundFile)
```
Feche a instrução For com uma instrução Next.
```
Next
```

Exemplo

O exemplo a seguir, que apresenta os trechos acima em sua forma completa, copia todos os arquivos .rtf do diretório especificado para o diretório chamado testdirectory.

For Each foundFile As String In My.Computer.FileSystem.GetFiles( _
    My.Computer.FileSystem.SpecialDirectories.MyDocuments, _
    FileIO.SearchOption.SearchTopLevelOnly, "*.rtf")

    My.Computer.FileSystem.CopyFile(foundFile, "C:\testdirectory\" & foundFile)
Next

Segurança

As seguintes condições podem causar uma exceção:

O caminho inválido para um dos seguintes motivos: Ele é uma cadeia de comprimento zero, ele contém somente espaços em branco, ele contém caracteres inválidos ou é um caminho de dispositivo (começa com \\.\) (ArgumentException).
O caminho não é válido porque ele é Nothing (ArgumentNullException).
O diretório não existe (DirectoryNotFoundException).
O diretório aponta para um arquivo existente (IOException).
O caminho excede o comprimento máximo definido pelo sistema (PathTooLongException).
Um nome de arquivo ou de diretório no caminho contém dois-pontos (:) ou está em um formato inválido (NotSupportedException).
O usuário não possui permissões necessárias para exibir o caminho (SecurityException).O usuário não possui as permissões necessárias (UnauthorizedAccessException).