Surprimer des ligne dans un txt

Résolu
FRED92G Messages postés 290 Date d'inscription jeudi 24 mai 2012 Statut Membre Dernière intervention 20 août 2022 - Modifié le 8 août 2022 à 23:00
FRED92G Messages postés 290 Date d'inscription jeudi 24 mai 2012 Statut Membre Dernière intervention 20 août 2022 - 9 août 2022 à 00:26

Bonjour,

j ai un txt avec plussieur fois 3 ligne de truc pourri je veux les retirer en prenent repere sur un mot contenu dans la premiere ligne des 3

Dim lines As List(Of String) = System.IO.File.ReadAllLines("liste d amis.txt").ToList
        If lines.Count = 0 Then


            For i As Integer = 0 To lines.Count - 1
                If lines(i).Contains("scontent") Then
                    lines.RemoveAt(i)
                    lines.RemoveAt(i + 1)
                    lines.RemoveAt(i + 2)
                End If
            Next
            System.IO.File.WriteAllLines("liste d amis.txt", lines.ToArray)
        End If

voici le model de ligne a suprime

les trait son la juste pour repere dans mon txt je vouler voir si il les virer ba il me le fait pas

1 réponse

FRED92G Messages postés 290 Date d'inscription jeudi 24 mai 2012 Statut Membre Dernière intervention 20 août 2022
9 août 2022 à 00:26

reler comme sa

Dim lines() As String = File.ReadAllLines("liste d amis.txt")
        Dim writer As New StreamWriter("liste d amis.txt")
        For Each line As String In lines
            If Not line.Contains("scontent") Then
                writer.WriteLine(line)

            End If
        Next
0
Rejoignez-nous