Fichier CSV et Accent - Ascci Unicode

(Re) Bonjour,

Je suis en train de développer un module qui ouvre un fichier CSV, qui réarange les informations présentes et les réengistre dans un autre fichier CSV.

Dans le fichier original, par de problème avec les é à ç ..... mais dans mon fichier final j'ai des caractères bizarres ....

J'ai passé "System.Text.UnicodeEncoding.Unicode" en paramètre de mon fichier mais rien y fait ...

Code:

---

1 2	Dim fichierexport As New StreamWriter("c:\" + TextBox2.Text + "260Export.csv", System.Text.UnicodeEncoding.Unicode)

---

Merci

Récupère le encoding du fichier ouvert et utilises le même pour le fichier que tu vas écrire

Sinon, si tu restes local sur des PC français, utilise .Default au lieu de .Unicode, ça devrait fonctionner

Code:

---

System.Text.Encoding.Default

---

Pour être plus clair...

Voila mon source :

Code:

---

1 2 3 4 5

Dim fichierexport As New StreamWriter("c:\" + TextBox2.Text + "260Colorisfacade.csv")   If My.Computer.FileSystem.FileExists(chemin) Then 'test si le fichier existe Dim fichier As New StreamReader(chemin)

---

--> Avec ce code j'ai des problèmes avec les é à ç .....

Avec la solution de Faladin, j'ai ce message d'erreur :

Citation:

---

Erreur 1 La résolution de surcharge a échoué, car aucun 'New' accessible ne peut être appelé avec ces arguments :
'Public Sub New(path As String, append As Boolean)': Une valeur de type 'System.Text.Encoding' ne peut pas être convertie en 'Boolean'.
'Public Sub New(stream As System.IO.Stream, encoding As System.Text.Encoding)': Une valeur de type 'String' ne peut pas être convertie en 'System.IO.Stream'.

---

Une idée ?

Citation:

---

Erreur 1 La résolution de surcharge a échoué, car aucun 'New' accessible ne peut être appelé avec ces arguments :
'Public Sub New(path As String, append As Boolean)': Une valeur de type 'System.Text.Encoding' ne peut pas être convertie en 'Boolean'.
'Public Sub New(stream As System.IO.Stream, encoding As System.Text.Encoding)': Une valeur de type 'String' ne peut pas être convertie en 'System.IO.Stream'.

---

Oui, une idée, oui. Le message me semble pourtant assez clair :
Lorsque tu instancies ton StreamWriter, tu n'a pas de constructeur possible avec en paramètre 1 le chemin du fichier en string et en paramètre 2 l'encodage.
Tu dois utiliser une autre surcharge de ce constructeur. Celle-ci devrait te convenir :
StreamWriter(string path, bool append, Encoding encoding)
(où "append" indique d'ajouter le texte dans le fichier ou pas)

D'ailleurs, je ne pense pas que cette ligne de code que tu nous as montré compile :

Code:

---

Dim fichierexport As New StreamWriter("c:\" + TextBox2.Text + "260Export.csv", System.Text.UnicodeEncoding.Unicode)

---

Parfait !!

Merci

Code:

---

1 2 3 4 5

Dim fichierexport As New StreamWriter("c:\" + TextBox2.Text + "260Colorisfacade.csv", False, System.Text.Encoding.Default)   If My.Computer.FileSystem.FileExists(chemin) Then 'test si le fichier existe Dim fichier As New StreamReader(chemin, System.Text.Encoding.Default)

---