cyrcroix
Messages postés21Date d'inscriptionvendredi 9 avril 2004StatutMembreDernière intervention 5 juillet 2005
-
5 juil. 2005 à 13:32
cyrcroix
Messages postés21Date d'inscriptionvendredi 9 avril 2004StatutMembreDernière intervention 5 juillet 2005
-
5 juil. 2005 à 17:02
Bonjour,
Existe t'il une fonction sous VB.NET similaire à la fonction "Loc(filenumber)" de VB6 qui permet d'indiquer la position de lecture/écriture courante dans un fichier ouvert?
Merci pour votre aide
cs_frop01
Messages postés1352Date d'inscriptionlundi 27 octobre 2003StatutMembreDernière intervention19 novembre 20082 5 juil. 2005 à 13:44
normalement ca existe en VB.NET
Public Function Loc(ByVal FileNumber As Integer) As Long
Extrait de MSDN .NET 2003
Exemple
Cet exemple utilise la fonction Loc pour retourner la position de lecture/écriture actuelle dans un fichier ouvert. Nous supposons que MYFILE est un fichier texte comportant quelques lignes de données exemple.
Dim location As Long
Dim oneLine As String
Dim oneChar As Char
FileOpen(1, "C:\MYFILE.TXT", OpenMode.Binary)
While location < EOF(1)
Input(1, oneChar)
location = Loc(1)
Debug.WriteLine(location & ControlChars.CrLf)
End While
FileClose(1)
Notes du développeur sur Smart Device
Cette fonction n'est pas prise en charge.
Prérequis
Espace de noms : Microsoft.VisualBasic
Module : FileSystem
Assembly : Microsoft Visual Basic .NET Runtime (dans Microsoft.VisualBasic.dll)
cyrcroix
Messages postés21Date d'inscriptionvendredi 9 avril 2004StatutMembreDernière intervention 5 juillet 2005 5 juil. 2005 à 15:24
Tout cela fonctionne.. mais après quelques tours dans la boucle, la ligne : Input(1, oneChar) plante (elle génère une exception).
Voici le message de l'exception : " L'entrée dépasse la fin du fichier".
Voici mon code :
cyrcroix
Messages postés21Date d'inscriptionvendredi 9 avril 2004StatutMembreDernière intervention 5 juillet 2005 5 juil. 2005 à 15:40
Elles sont bien sur déclarées et initialisées...
C'est vrai, lol j'ai pas fais gaffe... mais le problème reste le même cela fonctionnait aussi.
Ma boucle fonctionne correctement mais plante au bout de quelques tours...
Merci de m'aider, c'est sympa