OVH Cloud OVH Cloud

Fichiers et accents [Débutant]

3 réponses
Avatar
Jacques
Bonjour,

Cela fait près d'une semaine que j'essaie de régler un problème d'accent
mais sans succès.
J'ouvre un fichier texte pour le lire mais quand je lis le contenu, j'ai des
caractères bizarres !
J'ai utilisé les procédure ci-dessous mais j'ai toujours des mots qui ne
sont pas lus correctement ?

Comme par exemple :

Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.Default)
Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.UTF7)
Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.UTF8)
Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.Unicode)

Me.cmdArret.Text = "Arrêter têtû"
Me.cmdGenRpt.Text = "Générer rapport"
Me.Label1.Text = "Veuillez entrer le nom d'un nouveau projet ou
sélectionner un projet existant."

Petite remarque insolite, cela ne se produit pas avec tous les fichiers!!

D'où peut venir ce problème ?

Merci de vos réponses

Jacques

3 réponses

Avatar
Jacques
Bonjour Frédéric (je me permet )

Ce sont les fichiers ...Designer.vb créés pat VB Net 2005

Jacques

"Millox Frédéric" a écrit dans le
message de news:
Bonjour,

Les fichiers dont tu essayes de récupérer les infos sont enregistrées par
quelle application et sous quelle format ????

A+

--
fmillox


"Jacques" a écrit :

> Bonjour,
>
> Cela fait près d'une semaine que j'essaie de régler un problème d'accent
> mais sans succès.
> J'ouvre un fichier texte pour le lire mais quand je lis le contenu, j'ai


des
> caractères bizarres !
> J'ai utilisé les procédure ci-dessous mais j'ai toujours des mots qui ne
> sont pas lus correctement ?
>
> Comme par exemple :
>
> Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> System.Text.Encoding.Default)
> Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> System.Text.Encoding.UTF7)
> Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> System.Text.Encoding.UTF8)
> Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> System.Text.Encoding.Unicode)
>
> Me.cmdArret.Text = "Arrêter têtû"
> Me.cmdGenRpt.Text = "Générer rapport"
> Me.Label1.Text = "Veuillez entrer le nom d'un nouveau projet ou
> sélectionner un projet existant."
>
> Petite remarque insolite, cela ne se produit pas avec tous les


fichiers!!
>
> D'où peut venir ce problème ?
>
> Merci de vos réponses
>
> Jacques
>
>
>


Avatar
Millox Frédéric
Bonjour,

Les fichiers dont tu essayes de récupérer les infos sont enregistrées par
quelle application et sous quelle format ????

A+

--
fmillox


"Jacques" a écrit :

Bonjour,

Cela fait près d'une semaine que j'essaie de régler un problème d'accent
mais sans succès.
J'ouvre un fichier texte pour le lire mais quand je lis le contenu, j'ai des
caractères bizarres !
J'ai utilisé les procédure ci-dessous mais j'ai toujours des mots qui ne
sont pas lus correctement ?

Comme par exemple :

Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.Default)
Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.UTF7)
Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.UTF8)
Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
System.Text.Encoding.Unicode)

Me.cmdArret.Text = "Arrêter têtû"
Me.cmdGenRpt.Text = "Générer rapport"
Me.Label1.Text = "Veuillez entrer le nom d'un nouveau projet ou
sélectionner un projet existant."

Petite remarque insolite, cela ne se produit pas avec tous les fichiers!!

D'où peut venir ce problème ?

Merci de vos réponses

Jacques





Avatar
Jacques
Bonjour Frédéric,

Y a pas de problème, y pas le feux :-)

Le but est de récupérer pour un projet X tous les contrôles appartenant à ce
projet.
Pour ce faire, je parcours le répertoire du projet x et je prélève tous les
fichiers "Designer"
Ensuite, je lis tous ces fichiers pour récupérer le nom du formulaire et de
tous les contrôles
qu'il contien et ce pour chaque fichiers Designer.vb.
Peut-être y -a-t-il une meilleure façon de faire ! :-)
Le problème des accents est d'autant plus surprenant car il survient dans un
même projet ! Ce qui
veut dire qu'ils ont tous (les fichiers) été générés en même temps. C'est un
peu pour cela que j'ai de la difficulté à cerner
l'origine du problème. Ce serait plus compréhensible si certains fichiers
avaient été générer par des versions différentes !
Je continue de chercher :-)
Si je trouve une raison satisfaisante , tu sera le premier averti !!

Merci de ton aide

Jacques



"Millox Frédéric" a écrit dans le
message de news:
Bonjour Jacques,

Tout d'abord, désolé pour la réponse tardive....
Pour répondre à ta question, ça va être un peu dur puisque je programme
toujours sous VB net 2003 donc le 2005, je ne connais pas.
Par contre, les fichiers Designer.vb sont les fichiers contenant le code
généré automatiquement par le concepteur Windows Form si je ne me trompe


pas
???
Quelle est ton utilité d'aller chercher dans ces fichiers du texte ??? A
priori, si tu veux des données contenues dans ces fichiers, tu peux y


accéder
directement par le code.....

Eclaire moi un peu mieux sur l'utilité de ta démarche si tu veux que
j'essaye de t'aider.

Cordialement.

Frédéric.

--
fmillox


"Jacques" a écrit :

> Bonjour Frédéric (je me permet )
>
> Ce sont les fichiers ...Designer.vb créés pat VB Net 2005
>
> Jacques
>
> "Millox Frédéric" a écrit dans


le
> message de news:
> > Bonjour,
> >
> > Les fichiers dont tu essayes de récupérer les infos sont enregistrées


par
> > quelle application et sous quelle format ????
> >
> > A+
> >
> > --
> > fmillox
> >
> >
> > "Jacques" a écrit :
> >
> > > Bonjour,
> > >
> > > Cela fait près d'une semaine que j'essaie de régler un problème


d'accent
> > > mais sans succès.
> > > J'ouvre un fichier texte pour le lire mais quand je lis le contenu,


j'ai
> des
> > > caractères bizarres !
> > > J'ai utilisé les procédure ci-dessous mais j'ai toujours des mots


qui ne
> > > sont pas lus correctement ?
> > >
> > > Comme par exemple :
> > >
> > > Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> > > System.Text.Encoding.Default)
> > > Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> > > System.Text.Encoding.UTF7)
> > > Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> > > System.Text.Encoding.UTF8)
> > > Dim MonLecteur As StreamReader = New StreamReader(MonFichier,
> > > System.Text.Encoding.Unicode)
> > >
> > > Me.cmdArret.Text = "Arrêter têtû"
> > > Me.cmdGenRpt.Text = "Générer rapport"
> > > Me.Label1.Text = "Veuillez entrer le nom d'un nouveau projet ou
> > > sélectionner un projet existant."
> > >
> > > Petite remarque insolite, cela ne se produit pas avec tous les
> fichiers!!
> > >
> > > D'où peut venir ce problème ?
> > >
> > > Merci de vos réponses
> > >
> > > Jacques
> > >
> > >
> > >
>
>
>