Discussion :

[drake56]

Bonjour, je travaille sur un fichier csv et je voudrais savoir s'il serait possible d'écrire la 1ère ligne de mon fichier csv (qui correspond à l'entête du tableau) sur mon nouveu fichier.
J'utilise le code suivant pour la lecture de mon fichier :

Code :

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

1
2
3
4
5
6
7
8
While ligne IsNot Nothing 'tant que je ne suis à la fin on continue
                fields = ligne.Split(delimiter)
                If fields.GetValue(1) = "PRI" And fields.GetValue(0) >= Debut And fields.GetValue(0) <= Fin Then 'si les colonnes n°1 et 2 (index de début = 0) correspondent à ma condition je la stocke" Then
                    JeGArde.AppendLine(ligne)
                    cpt = cpt + 1
                End If
                ligne = Lect.ReadLine 'on passe à la ligne suivante
            End While

J'utilise ce code pour l'écriture :

Code :

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

1
2
3
4
If cpt > 0 Then
            My.Computer.FileSystem.WriteAllText(Newfilename, JeGArde.ToString, False)
            MsgBox("Votre nouveau fichier a été créé !", MsgBoxStyle.OkOnly, "Fichier disponible")
            Me.Close()

Merci d'avance

[Philippe Vialatte]

bah tu n'as qu'a ajouter un Lect.ReadLine avant ton while, non ?

[drake56]

Ok merci oui ça a fonctionné et tu sais s'il serait possible de recopier la 1ère ligne du fichier csv qui sert d'en tête au tableau sur le nouveau fichier csv ?
Merci d'avance