Les accents dans vb net

Version imprimable

20/10/2011, 08h55
Whombat

Les accents dans vb net
Bonjour à tous,

J'ai encore dû coincer quelque part...

J'ai déclaré, dans mon module les cultureInfos suivantes :
Code:

1 2 3 Public Français_FranceCulture As New CultureInfo("fr-FR", False) Public Anglais_Etats_UnisCulture As New CultureInfo("en-US", False) ................
puis, dans la feuille main, je déclare :
Code:

1 2 3 4 Sub New() Thread.CurrentThread.CurrentCulture = Français_FranceCulture .................
Du coup, vb 2010 ne reconnait plus les accents, ni dans les controls, ni dans la MessageBox...

Quelqu'un pourrait-il me dire ce qui se passe ?

Merci infiniment.

Cordialement,

Whombat
20/10/2011, 09h59
tomlev

Euh... Qu'est-ce que tu entends au juste par "ne reconnait plus les accents" ?
21/10/2011, 09h48
Whombat

Bonjour et merci pour la réponse. J'ai un peu tardé mais j'étais occupé ailleurs. C'est rare mais ça arrive.

Donc, VB ne reconnait plus les accents cad qu'il me met des petits losanges noirs à la place des caractères accentués, dans les MessageBox. Pour les controls ça va.

Je me dis (avec ma science très faible) que s'il reconnait les accents sur les contrôles, il les reconnait dans les messageBox, (je veux parler de la façon dont la culture info est déclarée). Et bien non. Ce doit être un pb de FrameWork, peut-être. Celui qui gère les contrôles d'une simple feuille form ne doit pas (peut-être...) être aussi à l'avangarde que celui qui crée les messageBox à la place des msgbox.

Bref, ça coince qq part.
21/10/2011, 10h06
tomlev

Citation:

Envoyé par Whombat

Celui qui gère les contrôles d'une simple feuille form ne doit pas (peut-être...) être aussi à l'avangarde que celui qui crée les messageBox à la place des msgbox.

Bah c'est le même...

D'où viennent ces accents ? De ton code où d'un fichier ? Quel est l'encodage du fichier ?

En fait : correction. Lorsque je fais :
Code:

1 2 MessageBox.Show("Héhé, je fais un excès de zèle à la leçon")
les accents et la cédille sont présent.

J'ai un répertoire avec des fichiers qui portent, pour nom, des catégories précises il est donc interdit d'en modifier les accents. En lisant, par code, ce répertoire et en mettant, à chaque fichier, sa catégorie ou son nom dans une MessageBox alors là, et là seulement, plus d'accent...

Le code d'où viennent les MessageBox :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 Dim result As DialogResult = FolderBrowserDialog1.ShowDialog() If (result = DialogResult.OK) Then MyDir = FolderBrowserDialog1.SelectedPath For Each Fich In Directory.GetFiles(MyDir) MessageBox.Show(Fich) next end if

21/10/2011, 10h16
Whombat

Nos réponses se sont croisées, je vais voir parce que j'ai un doute. En fait j'ai 2 entrées : la lecture d'un rep et la lecture ligna à ligne d'un fichier txt Note-Pad.

Je contrôle et je reviens.

Me revoilà;

Donc, c'est, et ce n'est que lorsque je lis le fichier.
Fichier court, 30 lignes et presque autant de mots.

Lu comme suit :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
 
        Dim fr As StreamReader = Nothing
        Dim FileString As String = String.Empty
 
        Try
            fr = New System.IO.StreamReader(CheminConfig & "\" & "repart.ini")
            Do
 
                FileString = fr.ReadLine
 
                If FileString <> "" Then
                    MessageBox.Show(FileString)
                End If
 
            Loop Until FileString Is Nothing
 
        Finally
            If fr IsNot Nothing Then
                fr.Close()
            End If
        End Try

21/10/2011, 10h36
Bluedeep

Question déjà posée, à laquelle tu n'as pas répondue :

quel est l'encodage du fichier ?
21/10/2011, 10h41
Whombat

Je ne comprends pas la question. Si c'est l'éditeur VB 2010, je n'en sais rien. Si c'est Note Pad, pas plus.

Pour moi, Note Pad c'est Note Pad. Je n'ai jamais cherché plus loin et je m'en sers depuis 15 ans. Il prend le français avec les accents. Et ça me suffit.

Pour l'éditeur VB, je ne sais pas si il faut rajouter une ligne d'infos en plus de celles déjà mises pour la culture.

A propos, je pense à quelque chose, il est bien entendu que c'est à la lecture des mots qui sont inscrits dans un fichier txt (qui en l'occurrence s'appelle ini) du note pad qu'il coince. Il ne lit pas d'autres fichiers.
21/10/2011, 12h01
tomlev

Quand tu crées le StreamReader, essaie de préciser Encoding.Default (qui correspond à ISO-8859-1, du moins sur un OS européen) comme encodage :

Code:

fr = New System.IO.StreamReader(CheminConfig & "\" & "repart.ini", Encoding.Default)

Parce que par défault il utilise UTF-8, et non pas Default (bah oui c'est bête :aie:), et si en fait ton fichier est en ISO-8859-1 certains caractères seront mal interprétés
21/10/2011, 12h03
tomlev

Citation:

Envoyé par Whombat

Pour moi, Note Pad c'est Note Pad. Je n'ai jamais cherché plus loin et je m'en sers depuis 15 ans. Il prend le français avec les accents. Et ça me suffit.

Il y a différentes façons de représenter du texte en binaire... ASCII, ISO-8859-*, UTF-8, cp1252 (utilisé par la console) etc
http://fr.wikipedia.org/wiki/Codage_de_caract%C3%A8res
21/10/2011, 12h31
Whombat
Super Tomlev !!!

Je n'aurais jamais trouvé seul. C'est sûr. Même si j'avais lu qq part que, d'autorité, le default n'était peut-être pas tout à fait 'le défault', je ne m'y serais pas arrété parce que ce qu'on trouve sur le Net, lorsque c'est restrictif, est souvent pour le 2008 et ca a été corrigé pour le 2010.

J'aurais eu tort !

Un détail, la syntaxe exacte est :
Code:

1 2 fr = New System.IO.StreamReader(CheminConfig & "\" & "repart.ini", System.Text.Encoding.Default, True)
mais quand on a la base, c'était facile de trouver la faille.

Merci encore.