Trier un fichier txt

pcpunch Messages postés 1243 Date d'inscription mardi 7 mai 2002 Statut Membre Dernière intervention 18 février 2019 - 26 janv. 2003 à 03:59
cs_KifKif Messages postés 88 Date d'inscription jeudi 7 mars 2002 Statut Membre Dernière intervention 4 avril 2008 - 26 janv. 2003 à 09:27
slt

g un fichier txt ou g entrer des donnees avec write, les lignes du fichier txt se presentes comme cela :

"titre","resumer","qualite","type","chemin image"

je voudrais trier ces lignes avec une procedure qui classerai le champ titre par ordre alphabetique??

ps : j utilise vb5

1 réponse

cs_KifKif Messages postés 88 Date d'inscription jeudi 7 mars 2002 Statut Membre Dernière intervention 4 avril 2008
26 janv. 2003 à 09:27
KIfKif

'dans form1 insérer une listbox
'mettre la propriété 'Sorted' de list1 sur True
Private Sub Form_Load()
Dim Ligne As String
'indiquer le chemin et le titre du fichier
Open "c:\chemin\titre.txt" For Input As #1
While Not EOF(1)
Line Input #1, Ligne$
List1.AddItem Ligne$
Wend
Close #1
'sauvegarde du fichier trié
Open "c:\chemin\titre.txt" For Output As #1
For i = 1 To List1.ListCount - 1
Print #1, List1.List(i)
Next i
Close #1
End Sub
0
Rejoignez-nous