Discussion :

[nabilfaouzi]

bonjour
je veux savoir comment pourrai je faire une modification dans une ligne d'un fichier après recherche d'une valeur données, j'ai essayé le code suivant mais le système me dit que

Le processus ne peut pas accéder au fichier 'F:\test.acsauto', car il est en cours d'utilisation par un autre processus.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
       Dim SR As New StreamReader("F:/test.acsauto")
        Dim WL As New StreamWriter("F:/test.acsauto")
        Dim ddate As DateTime = DateTimePicker1.Value
        Dim i As Int16 = 0
        Do Until SR.Peek = -1
            ligne = SR.ReadLine()
            If (i > 55) Then MsgBox(ligne.ToString)
            If (InStr(ligne, "Set property ""Date""")) Then
                WL.WriteLine("Rep.SetProperty ""Date"", ""0""")
            End If
            i = i + 1
        Loop

merci pour votre aide

[tomlev]

Un StreamReader ouvre le fichier en lecture, sans partage, donc tu ne peux pas ouvrir un StreamWriter sur le même fichier tant que tu n'as pas fermé le StreamReader.

Quel est le but ? Tu veux remplacer une ligne par une autre ?

[chrismonoye]

Bonjour,

Un truc comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
        Dim lignes() As String = File.ReadAllLines(fichier, System.Text.Encoding.GetEncoding("ISO-8859-1"))
        Dim WL As New StreamWriter(fichier, False, System.Text.Encoding.GetEncoding("ISO-8859-1")) 'encodage pour caractères accentués
        Dim i As Int16 = 0
 
        For Each ligne As String In lignes
            If (i > 3) Then
                MsgBox(ligne)
                If CBool((InStr(ligne, "Chaine recherchée"))) Then
                    WL.WriteLine("Chaine remplaçante")
                Else
                    WL.WriteLine(ligne)
                End If
            Else
                WL.WriteLine(ligne)
            End If
            i = CShort(i + 1)
        Next
 
        WL.Close()

[Abdellah2010]

Vous tentez de d'accéder au fichier par deux modes différents en même temps (Lecture et écriture), ceci et logiquement impossible. Effectuez votre recherche en utilisant StreamReader fermez le ensuite et allez au mode écriture (StreamWriter).

[nabilfaouzi]

effectivement c'était une erreur de ma part, j'ai ré mes lignes dans une arraylist puis j'écrase le fichier et ça marche très bien, merci pour vos proposition et votre aidere aide