Discussion :

[maverick5976]

Bonjour,

voici mon problème,lors de la lecture d'un fichier texte délimité par des virgules qui est sous cette forme :

100,001,00.0.0 ,texte 1 ,
101,002,00.0.1 ,texte 2 ,
112,003,14.0.1 ,Bâti : A ,
105,004,19.1.1 ,Bâti : B ,
106,005,19.1.2 ,Bâti : C ,

ma variable "ligne" ne comprends pas les caractères accentués et Bâti devient B#ti (le # etant en fait un carré à l'ecran)...

voici mon code

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
 
 ' Définition du type de champs et du délimiteur
            MyReader.TextFieldType = FileIO.FieldType.Delimited
            MyReader.SetDelimiters(",")
            'MyReader.FieldWidths.
 
 
            ' Lecture des données et affichage
            a = 0
            DataGridView1.ColumnCount = 5
            While Not MyReader.EndOfData
                Try
                    ligne = MyReader.ReadFields
                    i = 0
                    Dim champ As String
                    For Each champ In ligne
                        i = i + 1
                        s(i) = champ
                        If i = 5 Then
                            a = a + 1
                            ReDim Preserve Tab1(a)
                            ReDim Preserve Tab2(a)
                            ReDim Preserve Tab3(a)
                            ReDim Preserve Tab4(a)
                            Tab1(a) = s(1)
                            Tab2(a) = s(2)
                            Tab3(a) = s(3)
                            Tab4(a) = s(4)
                        End If
                    Next
                    DataGridView1.Rows.Add(New String() {s(1), s(2), s(3), s(4), s(5)})
 
                Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
                    MsgBox("L'enregistrement " & ex.Message & _
                    "n'est pas valide. Il a été ignoré.")
                End Try
            End While
        End Using

pourriez vous me dire ou je me suis trompé?

Merci d'avance

Cordialement

Maverick

[nikoko34]

Bonjour,
C'est sans doute un problème d'encoding (system.encoding).
Tu peux spécifier le format d'encodage du fichier que tu lis.
A voir dans ta définition de MyReader.

[maverick5976]

Un grand merci Nikoko34, grâce à toi, j'ai pu trouver la réponse :

Code :

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

Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser(My.Resources.CheminFichier & "data.txt", System.Text.Encoding.Default)

j'ai testé, cela fonctionne.

[ConteZero]

Salut!

Nickel, merci pour la méthode .

Bye.