Récupérer la dernière ligne d'un fichier texte
Guiguouz
Messages postés
19
Date d'inscription
jeudi 17 avril 2003
Statut
Membre
Dernière intervention
28 janvier 2004
-
16 mai 2003 à 09:16
Guiguouz Messages postés 19 Date d'inscription jeudi 17 avril 2003 Statut Membre Dernière intervention 28 janvier 2004 - 16 mai 2003 à 10:30
Guiguouz Messages postés 19 Date d'inscription jeudi 17 avril 2003 Statut Membre Dernière intervention 28 janvier 2004 - 16 mai 2003 à 10:30
A voir également:
- Lire une ligne d'un fichier python
- Vba dernière ligne ✓ - Forum Visual Basic 6
- Chronomètre en ligne - Forum Java
- Application pour lire fichier pdf sur android ✓ - Forum Java
- Lire fichier python - Forum Python
- Fichier json - Conseils pratiques -Javascript
3 réponses
frappemisere
Messages postés
34
Date d'inscription
mardi 25 février 2003
Statut
Membre
Dernière intervention
21 août 2003
16 mai 2003 à 09:32
16 mai 2003 à 09:32
Utilises la classe streamreader pour lire ton fichier
Savoir que l'on ne sait rien, c'est toujours mieu que de ne rien savoir du tout.
Savoir que l'on ne sait rien, c'est toujours mieu que de ne rien savoir du tout.
stevebelgium
Messages postés
180
Date d'inscription
lundi 17 mars 2003
Statut
Membre
Dernière intervention
7 juin 2003
1
16 mai 2003 à 09:36
16 mai 2003 à 09:36
add 1 timer et timer1.interval = 2000 => dans les properties
nom ficher = c:\a.txt
Private Sub Timer1_Timer()
Dim Temp As String
Dim arr
Temp = ""
Open "c:\a.txt" For Input As #1
Temp = Input(LOF(1), #1)
Close #1
arr = Split(Temp, Chr$(13))
MsgBox arr(UBound(arr) - 1) & arr(UBound(arr))
End Sub
nom ficher = c:\a.txt
Private Sub Timer1_Timer()
Dim Temp As String
Dim arr
Temp = ""
Open "c:\a.txt" For Input As #1
Temp = Input(LOF(1), #1)
Close #1
arr = Split(Temp, Chr$(13))
MsgBox arr(UBound(arr) - 1) & arr(UBound(arr))
End Sub
Guiguouz
Messages postés
19
Date d'inscription
jeudi 17 avril 2003
Statut
Membre
Dernière intervention
28 janvier 2004
16 mai 2003 à 10:30
16 mai 2003 à 10:30
Super merci ....