Freigeben über


Gewusst wie: Lesen aus vorhandenen Textdateien im Ordner "Eigene Dateien" (Visual Basic)

Aktualisiert: November 2007

Im folgenden Codebeispiel wird der Inhalt der Textdateien im Ordner Eigene Dateien in eine einzelne Datei eingelesen.

Beispiel

Dim filePaths As System.Collections.ObjectModel.ReadOnlyCollection(Of String)
Dim allText As String
Try
   filePaths = My.Computer.FileSystem.GetFiles _
   (My.Computer.FileSystem.SpecialDirectories.MyDocuments)
   For Each file As String In filePaths
      allText = My.Computer.FileSystem.ReadAllText(file)
      My.Computer.FileSystem.WriteAllText("bigfile.txt", allText, True)
   Next
Catch fileException As Exception
   Throw fileException
End Try

Kompilieren des Codes

Ersetzen Sie "bigfile.txt" durch den Namen der Datei, in die Sie schreiben möchten.

Robuste Programmierung

Bei den zu lesenden Dateien muss es sich um Textdateien handeln.

Sie können die OpenFileDialog-Komponente (Windows Forms) und die SaveFileDialog-Komponente (Windows Forms) verwenden, um die Wahrscheinlichkeit für Laufzeitfehler aufgrund fehlender Berechtigungen zu reduzieren.

Beurteilen Sie den Inhalt der Datei nicht anhand des Dateinamens. Bei der Datei Form1.vb handelt es sich zum Beispiel nicht unbedingt um eine Visual Basic-Quelldatei.

Überprüfen Sie alle Eingaben, bevor Sie die Daten in der Anwendung verwenden. Die Datei kann andere Inhalte als erwartet enthalten. Die Methoden zum Lesen aus der Datei können fehlschlagen.

Sicherheit

Zum Lesen einer Datei benötigt die Assembly eine Berechtigungsebene, die von der FileIOPermission-Klasse gewährt werden muss. Bei Ausführung in einem teilweise vertrauenswürdigen Kontext kann der Code aufgrund fehlender Berechtigungen eine Ausnahme auslösen. Weitere Informationen finden Sie unter Grundlagen der Codezugriffssicherheit. Der Benutzer muss außerdem über ausreichende Berechtigungen für den Zugriff auf die Datei verfügen. Weitere Informationen finden Sie unter Access Control Lists (ACLs).

Siehe auch

Referenz

My.Computer.FileSystem.SpecialDirectories-Objekt

My.Computer.FileSystem.ReadAllText-Methode

My.Computer.FileSystem.WriteAllText-Methode

OpenFileDialog

SaveFileDialog