Gewusst wie: Kopieren von Dateien mit einem bestimmten Muster in ein Verzeichnis in Visual Basic

Artikel
08/15/2011

Die GetFiles-Methode gibt eine schreibgeschützte Auflistung von Zeichenfolgen zurück, die die Pfadnamen für die Dateien darstellen. Sie können mithilfe des wildCards-Parameters ein bestimmtes Muster angeben.

Wenn keine entsprechenden Dateien gefunden werden, wird eine leere Auflistung zurückgegeben.

Mit der CopyFile-Methode können Sie die Dateien in ein Verzeichnis kopieren.

So kopieren Sie Dateien mit einem bestimmten Muster in ein Verzeichnis

Verwenden Sie die GetFiles-Methode, um die Liste von Dateien zurückzugeben. In diesem Beispiel werden alle RTF-Dateien im angegebenen Verzeichnis zurückgegeben.

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

Verwenden Sie die CopyFile-Methode, um die Dateien zu kopieren. In diesem Beispiel werden die Dateien in das Verzeichnis testdirectory kopiert.
```
My.Computer.FileSystem.CopyFile(foundFile, "C:\testdirectory\" & My.Computer.FileSystem.GetName(foundFile))
```
Ersetzen Sie die For-Anweisung durch eine Next-Anweisung.
```
Next
```

Beispiel

Im folgenden Beispiel, in dem die vollständige Version der oben stehenden Codeausschnitte zum Einsatz kommt, werden alle RTF-Dateien im angegebenen Verzeichnis in das Verzeichnis testdirectory kopiert.

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

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

Sicherheit

Die folgenden Bedingungen können einen Ausnahmefehler verursachen:

Der Pfad ist bei einem der folgenden Gründe ungültig: Es handelt sich um eine Zeichenfolge der Länge 0 (null), enthält es nur Leerzeichen, er enthält ungültige Zeichen, oder es handelt es sich um einen Pfad für Geräte (beginnt mit \ \. \) (ArgumentException).
Der Pfad ist ungültig, da er Nothing ist (ArgumentNullException).
Die Datei ist nicht vorhanden (DirectoryNotFoundException).
Das Verzeichnis zeigt auf eine vorhandene Datei (IOException).
Der Pfad überschreitet die im System definierte maximale Länge (PathTooLongException).
Der Pfad eines Datei- oder Verzeichnisnamens enthält einen Doppelpunkt (:) oder hat ein ungültiges Format (NotSupportedException).
Dem Benutzer fehlen die erforderlichen Berechtigungen zum Anzeigen des Pfades (SecurityException). Der Benutzer verfügt nicht über die erforderlichen Berechtigungen (UnauthorizedAccessException).