Bonjour,
Je rencontre un problème de programmation.
Le but de mon programme est de lire deux fichiers textes. Supprimer les deux premières lignes de chaque fichiers, supprimer la dernière ligne de chaque fichier, d'effectuer un remplacement de mot et de réécrire le tout dans un autre fichier Texte pour une base de donnée.
Je bloque dès le début du programme, lorsqu'il faut lire un fichier texte.
Je ne me suis pas embêter, je suis allé directement sur le site de miicrosoft et voici mon code de départ:
Alors, je veux bien que mon fichier fasse 50000 lignes, mais je n'ai absolument aucun résultat dans la msgbox. J'aurais voulu comprendre pourquoi.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 sub main() dim reader as string reader = my.computer.filesystem.readalltext("Mon dossier/fichier.txt") msgbox(reader)
Pourtant, lorsque je change readlalltext par readline(), j'ai bien ma première ligne de départ, ce qui prouve que le chemin du fichier est correct.
Auriez-vous une solution à mon problème?
Peut être que de lire les lignes une par une serait-il meilleur?
Merci.
Cordialement,
Partager