Bonjour,

J'ai un probleme assez bizzare (à ma connaissance)
j'ai le code suivant



On error goto Erreur001254a:
 Do While Not (EOF(11))

         .......   
         .......
 loop


Erreur001254a:
.....



Pourtant, j'ai toujours une erreur comme quoi je depasse la fin du fichier...malgré le fait que j'ai ma gestion d'erreur. Qu'est-ce qui m'echappe??.

Merci!

Une piste peut-etre ????

Extrait du msdn :

EOF, fonction

       

Renvoie une valeur de type Integer contenant la valeur BooleanTrue lorsque la fin d'un fichier ouvert en mode Random ou Input séquentiel est atteinte.

Syntaxe

EOF(filenumber)

L' argumentfilenumber est une valeur de type Integer contenant n'importe quel numéro de fichier valide.

Remarques

Utilisez la fonction EOF pour éviter de générer une erreur lorsque vous tentez d'obtenir des données au-delà de la fin d'un fichier.

La fonction EOF renvoie la valeur False tant que la fin du fichier n'est pas atteinte. Avec des fichiers ouverts en mode Random ou Binary, la fonction EOF renvoie la valeur False tant que la dernière instruction Get peut lire un enregistrement intégralement.

Avec des fichiers ouverts en mode Binary, une erreur se produit si vous tentez de lire le fichier à l'aide de la fonction Input jusqu'à ce que la fonction EOF renvoie la valeur True. Utilisez les fonctions LOF et Loc au lieu de la fonction EOF pour la lecture de fichiers binaires avec la fonction Input, ou utilisez l'instruction Get avec la fonction EOF. Pour des fichiers ouverts en mode Output, la fonction EOF renvoie toujours la valeur True.

---- Sevyc64  (alias Casy) ----

---

# LE PARTAGE EST NOTRE FORCE #    [ Lien ]

Bonsoir,

Pour ma part , j'aurais vu le code ainsi :

On error goto Erreur001254a:
 Do until EOF(11)=-1

         .......   
         .......
 loop

END

Erreur001254a:
.........

Par contre 11 ? es-tu sur que le numero est statique ? c'est rarement le cas, en gnéral...

Amicalement,
Us.

et bien en fait, EOF t'indique au moment ou tu le testes, si ton curseur de lecture est, a ce moment précis, au dela de la fin de fichier. ce qu'il te faut voir, c'est le code de lecture, plutot... car lui, force vraissemblablement a depasser la fin du fichier....

"ce qu'il te faut voir, c'est le code de lecture, plutot... car lui, force vraissemblablement a depasser la fin du fichier...."

Ce qui veut dire?

Bonsoir,

Je pense qu'il faudrait le code en totalité dans la boucle, on pourrait mieux voir... JE pense que Renfield pense que tu utilises une longueur de lecture fixe de plusieurs octets (avec une variable) qui pour la dernière occurence dépasse la fin du fichier. Par exemple, si tu lis 2 octets à la fois (donc en nb pair) et que ton fichier a une longueur impaire, ta dernière donnée à lire dépassera d'1 octet le fichier... en espérant être compréhensible...

Amicalement,

Us.

 

On error goto Erreur001254a:
 Do While Not (EOF(11))

         .......   
         .......
 loop

Exit sub
Erreur001254a:
....
End sub
+==--
| @+
| Sk8Cravis
+======------

que cachent les ....

c'est cette partie qui m'interesse pou pouvoir te repondre...

je pense par exemple que tu vas y lire 20 caractères alors qu'il n'en reste que 15 dans le fichier...
ce genre de choses


Renfield
Admin CodeS-SourceS- MVP Visual Basic

While Not EOF(1)
a = LineInput(1)
t = a.Split("/")
If (t(1)) <> Trim(txtcode.Text) Then
WriteLine(2, a)
End If
End While
c une syntaxe just

gaffe, tu pars du principe que ton tableau t a au moins deux elements, crash possible en perspective


Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp