Bonjour,

Je cherche depuis un moment comment lire un fichier txt en commençant par la fin ?

De plus, je récupère des valeurs d'un fichier texte (ça fonctionne très bien) et je voudrais arrêter le traitement dès que ma valeurs est récupéré (même si la même valeur ce trouve plus loin dans le fichier).

Merci pour vos pistes et votre aide,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
Const ForReading = 1, ForWriting = 2 
Dim oFso, f
Dim lectureLigne, sansEspace
Dim caNet, nbArticle, nbTicketCA
Set oFso = CreateObject("Scripting.FileSystemObject")
 
'Ouverture et lecture du fichier
	Set f = oFso.OpenTextFile("P:\Scripts\test.txt", ForReading)
 
		do while f.AtEndOfStream = false
 
			lectureLigne = f.readLine
			caNet = left(lectureLigne,8)
			nbArticle = left(lectureLigne,19)
			nbTicketCA = left(lectureLigne,29)
 
			if caNet = "C.A. net" Then
 
				sansEspace=replace(lectureLigne," ","")
				Deb = Instr(sansEspace,"C")+7
				Fin = Instr(sansEspace,"E")
				msgbox Mid(sansEspace,Deb,Fin-Deb)
 
 
			End If
 
			if nbArticle = "Nombre d'articles  " Then
 
				sansEspace=replace(lectureLigne," ","")
				test = replace(sansEspace,"Nombred'articles","")
				msgbox test
 
			End If
 
			if nbTicketCA = "Nombre de tickets (avec C.A.)" Then
 
				sansEspace=replace(lectureLigne," ","")
				test2 = replace(sansEspace,"Nombredetickets(avecC.A.)","")
				msgbox test2
 
			End If
 
		loop	
	f.close
Voici le contenu de mon fichier test.txt :

========================================================

========================================================
RAZ NUMERO
--------------------------------------------------------
Boutique :
Caisse :
Caissier :
En date :
Heure :
========================================================
--------------------------------------------------------
Ventes (brut) 0,00 E
Remises caisse 0,00 E
--------------------------------------------------------
Retours 0,00 E
C.A. net 0,00 E
--------------------------------------------------------
Taxes sur chiffre d'affaires
--------------------------------------------------------
--------------------------------------------------------
Règlements
--------------------------------------------------------
--------------------------------------------------------
--------------------------------------------------------
Sorties de caisse 0,00 E
Dont dépenses 0,00 E
--------------------------------------------------------
Entrées de caisse 0,00 E
Dont retouches 0,00 E
--------------------------------------------------------
Nombre d'articles 0,00
Nombre d'articles cadeau 0,00
Nombre de tickets (avec C.A.) 0
Indice de vente 0,00
Panier moyen 0,00 E
========================================================
*** FIN BANDE RAZ ***

========================================================

========================================================
RAZ NUMERO
--------------------------------------------------------
Boutique :
Caisse :
Caissier :
En date :
Heure :
========================================================
--------------------------------------------------------
Ventes (brut) 0,00 E
Remises caisse 0,00 E
--------------------------------------------------------
Retours 0,00 E
C.A. net 2574,50 E
--------------------------------------------------------
Taxes sur chiffre d'affaires
--------------------------------------------------------
--------------------------------------------------------
Règlements
--------------------------------------------------------
--------------------------------------------------------
--------------------------------------------------------
Sorties de caisse 0,00 E
Dont dépenses 0,00 E
--------------------------------------------------------
Entrées de caisse 0,00 E
Dont retouches 0,00 E
--------------------------------------------------------
Nombre d'articles 53,00
Nombre d'articles cadeau 0,00
Nombre de tickets (avec C.A.) 33
Indice de vente 0,00
Panier moyen 0,00 E
========================================================
*** FIN BANDE RAZ ***
Je voudrais donc commencer par la fin pour récupérer les valeurs qui ne sont pas à zéro et dès qu'il trouve, il s'arrête (et n'affiche pas celle à 0 plus haut)

Merci