2017-10-12 2 views
-1

Ich habe eine Datei, die Daten und Ergebnisse der Tests enthält, Zeile für Zeile geschrieben. Ich möchte die Datei so bearbeiten, dass jede Zeile, die nicht das heutige Datum hat, gelöscht wird und dann die Datei gespeichert wird (mit den unerwünschten Zeilen gelöscht). Hilfe wird sehr geschätzt.vb.net eine Datei nach Kriterien bearbeiten und speichern

Dim rawlines() As String Dim outputlines As New List(Of String) rawlines = File.ReadAllLines("C:\users\user10\rslts.csv") For Each line As String In rawlines If line.Contains(today()) = True Then outputlines.Add(line) End If Next

+0

Es gibt viele mögliche Probleme mit Ihrem Code, aber unter der Annahme, dass es läuft und speichert das Daten in 'outputlines', einfach die Liste durchlaufen und die Zeilen in eine neue Datei schreiben. –

+0

@PrescottChartier Wie schreibe ich das Durchschleifen und Schreiben in die neue Datei. Hilfe wird sehr geschätzt, bitte. – MordC

Antwort

0

Read Lines:

Dim rawlines() As String 
    Dim outputlines As New List(Of String) 
    rawlines = File.ReadAllLines("C:\users\user10\rslts.csv") 
    For Each line As String In rawlines 
     If line.Contains(today()) = True Then 
      outputlines.Add(line) 
     End If 
    Next 

schreiben Linien neue Datei:

Dim MyFile As StreamWriter 
    File.Create("c:\test\TheResults.csv").Close() 
    MyFile = File.AppendText("c:\test\TheResults.csv") 
    For Each Line As String In outputlines 
     MyFile.WriteLine(Line) 
    Next 
    MyFile.Close() 
Verwandte Themen