Ouvrir des fichiers lst dans combobox et enregistrer en txt [Résolu]

Messages postés
86
Date d'inscription
jeudi 24 octobre 2013
Dernière intervention
2 avril 2014
- 10 déc. 2013 à 11:03 - Dernière réponse :
Messages postés
86
Date d'inscription
jeudi 24 octobre 2013
Dernière intervention
2 avril 2014
- 4 janv. 2014 à 09:00
Bonjour,

Si j'ai 100 dossiers dans lesquels j'ai des fichiers .lst et que je desire pourvoir les charger dans les combobox et les visualiser avec les accents, comment feriez-vous ?

Car je ne souhaite pas ouvrir les 100 dossiers pour enregistrer chaque fichier .lst en UTF8 !
Afficher la suite 

Votre réponse

5 réponses

Messages postés
86
Date d'inscription
jeudi 24 octobre 2013
Dernière intervention
2 avril 2014
- 10 déc. 2013 à 11:04
Commenter la réponse de collargol123
Messages postés
3238
Date d'inscription
jeudi 26 novembre 2009
Dernière intervention
14 mars 2018
- Modifié par cs_ShayW le 10/12/2013 à 11:31
0
Merci
Bonjour
je recopie de l'autre post

pas clair

Tu as dit que tu as ouvert ton fichier.lst avec le blocknote
Et effectivement je n'arrive pas à lire les accents.

ensuite tu as du corrigé le text en remettant les accents et
sauvegardé avec format utf8

le format utf8 ne corrige pas ton texte mais permet de sauvegarder le texte en conservant les accents

maintenant tu as 100 fichiers à corriger
tu seras obligé de les corriger car aucun code ne pourra remettre
les accents
Commenter la réponse de cs_ShayW
Messages postés
86
Date d'inscription
jeudi 24 octobre 2013
Dernière intervention
2 avril 2014
- 10 déc. 2013 à 15:06
0
Merci
Et avec ce code ci-dessous :

Public Sub SaveComboBox(ByRef oLst As System.Windows.Forms.ComboBox, ByVal sPath As String)


Dim sw As New System.IO.StreamWriter(sPath)
For Each o As Object In oLst.Items
sw.WriteLine(o.ToString)
Next
sw.Close()
End Sub

peut-on enregistrer sous forme d'un fichier.lst ?
Commenter la réponse de collargol123
Messages postés
3238
Date d'inscription
jeudi 26 novembre 2009
Dernière intervention
14 mars 2018
- 10 déc. 2013 à 22:53
0
Merci
non
le problème est que tous tes fichiers ont été sauvegardés avec
un format autre que utf8
donc les accents sont remplacé par d' autres caractères
meme si tu charges un fichier avec
Dim reader As New System.IO.StreamReader(spath, System.Text.Encoding.UTF8)
cela n'aidera pas
à moins qu'il y ait une solution magique
Commenter la réponse de cs_ShayW
Messages postés
86
Date d'inscription
jeudi 24 octobre 2013
Dernière intervention
2 avril 2014
- 4 janv. 2014 à 09:00
0
Merci
fonctionne sous vbexpress 2010

oLst.Items.AddRange(System.IO.File.ReadAllLines(sPath, System.Text.Encoding.Default))
Commenter la réponse de collargol123

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.