Importer fichier texte dans Listview

sylpar Messages postés 7 Date d'inscription mardi 31 mai 2005 Statut Membre Dernière intervention 21 janvier 2010 - 13 sept. 2005 à 09:22
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 13 sept. 2005 à 12:32
Bonjour,
Je voudrais savoir comment importer un fichier texte dans une listview ?
Je voudrais une boite de dialogue me permettant d'aller chercher le fichier texte et qu'après validation, les données du fichier s'intègrent dans la listview.
Si quelqu'un peut m'aider, merci d'avance

1 réponse

jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
13 sept. 2005 à 12:32
Bonjour,
Dans une ListView, j'ai pas trouvé comment faire.Par contre dans un TextBox, (propriété Multiligne à True).

Private Sub Command1_Click()
Dim data, tout, crlf
crlf = Chr(13) + Chr(10)
With CommonDialog1
.DialogTitle = "Ouvrir un fichier texte"
.InitDir = "C:"
.FileName = "Text1.txt"
.FilterIndex = 1
On Error GoTo Erreur:
.ShowOpen
End With


Open "C:\Text1.txt" For Input As #1
Line Input #1, data
tout = data
If Len(tout) <> 0 Then
While Not EOF(1)
Line Input #1, data
tout = tout + crlf + data
Wend
End If
Close #1
Text1 = tout
Erreur:
Exit Sub
End Sub

jpleroisse
0
Rejoignez-nous