01net    Web


Actuellement en ligne : 897 Utilisateurs dont 33 dans Programmation et développement >S'inscrire      >S'identifier      >Recherche      >Aide  
modéré par A.Ouloube, Zplay, Beno@  
01net > Forum de 01net > Programmation et développement > .net / Technologies MS
> VB6 et fichier .txt
Passionné(e) d'internet, de logiciels, de forums ? 01net recrute...
Auteur
Message
 
<     1       >
milouse8
  vive.......heu.......moi
  :-)
      ?   @     Posté le 30/09/2003 16:03:23  
Voter pour ce message
bonjours

je cherche à me déplacer dans un fichier .txt afin de stocker une ligne précise (par expl la 30ieme) dans une variable sous Visual basic 6.

help me please
masterg
  
  :-)
      ?   @     Posté le 28/11/2003 14:14:53  
Voter pour ce message
IL y a certainement plus simple (et plus optimisé) mais ca a le mérite de marcher! Petit conseil : évite les fichiers text pour les grosses manipulations.

Tu incruste un compteur à chaque tour dans une boucle et arrivé à la ligne qui t'interesse tu copie dans ta variable.



exemple :

------------------------------------------------------

compteur = 1

[nom du fichier text] = [adresse mémoire]

Open [nom du fichier text]for input as 1

Do While not EOF(1)

if compteur = [Nombre de lignes souhaitées] Then

ligne input #1, [ta variable]

end if

compteur = compteur + 1

Loop

-------------------------------------------------------

inconvénient : tu parcours le fichier entièrement à chaque fois donc j'espère qu'il n'est pas trop long.
fonfon007
  
   
      ?   @     Posté le 26/02/2008 11:49:27  
Voter pour ce message
Bonjour à tous
Le programme de masterg ne marche pas du tout. :pt1cable:
Il boucle indéfiniment car le line input (et pas ligne input d'ailleurs ;) ) doit être effectué systématiquement à chaque passage de la boucle WHILE (et pas seulement dans le if) car eof() n'est jamais vérifié.

Voici un code qui marche et qui est optimisé car non seulement il tourne, mais il est optimisé car il s'arrête de lire dès que la ligne recherché a été atteinte (il ne lit pas forcément jusqu'à la fin) :

compteur =1

Open [Nom fichier texte] for input as #1

while not eof(1) and compteur < [Numero de ligne à atteindre]

compteur=compteur+1
line input #1, [Variable où récupérer le contenu de la ligne]
wend

close #1


En espérant éclairer les esprits.
A bientôt.


-->Message édité par fonfon007 le 26/02/2008 11:56:15<--
Zplay
  Le retour !
  :-)
      ?   ^   @     Posté le 26/02/2008 12:40:16  
Voter pour ce message
Ca valait bien le coup de répondre à un sujet qui a 5 ans
-------
Chassez le naturel et il revient au galop ! [:e-deby:1]

2x Xéon Quad Core, 4x 2Go Fb-dimm, 2 Gigabyte 7300 Gt, 4x disques dur 500 Go
Ca va bouger moi je vous le dis :o
<     1       >

01net > Forum de 01net > Programmation et développement > .net / Technologies MS
> VB6 et fichier .txt

Aller à :

Page générée en : 0.19s - X2board 2.2

Nous contacter | Charte de confiance | Voir notice légale

Tous droits réservés © 1999 - 2008 Groupe Tests - 01net.


Sites du réseau 01net Network : 01net - 01men - Rmc.fr - Bfmtv.fr - Radiobfm.com - TousLesPodcasts - Micro Achat - Caractere.net -
Electronique.biz - Mesures.com - Transaction.fr

Domenech le buzz
Le meilleur des parodies présentes sur Internet concernant le sélectionneur Raymond Domenech.
Jeux
Nouveauté : Sauvez les Happy Tree Friends d'une mort certaine et sanglante. A essayer dès maintenant !