Gewusst wie: Lesen aus vorhandenen Textdateien im Ordner "Eigene Dateien" (Visual Basic)
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 Übersicht über die ACL-Technologie.