Discussion :

[wafiflicha]

Bonjour,

ma question concerne les chaines de caractère écrit dans un fichier, comment je pourrais récupérer une chaine de caractère (chaine = sous chaine séparé par des blancs) pour que je pourrai la coller dans un autre fichier?

NB: le fichier source contient plusieurs chaine écrit dans des ligne différentes, avec longueur différentes.

je vous remercie d'avance.

[Ehouarn]

Bonjour,

Pour lire intégralement (blancs compris) une chaine de caractères il faut simplement utiliser le format 'a' (et mettre le résultat dans une chaine de taille suffisament grande, évidement).
Par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
...
character(len=1000) :: ligne
...
open(unit=10, file="monfichier.txt")
read(10,fmt='(a)') ligne