Discussion :

[Manou26]

Bonjour à tous

j'ai un programme avec une boucle et je voudrais à chaque passage créer un fichier dont le nom dépend de l'indice:

pour i=1 à 20
ouvrir un fichier de type nomfichier_i
écrire ce qu'il faut dans le fichier
fin pour

j'ai essayer un truc du style 'nomfichier'//i mais il me rend une erreur de compilation

Merci de votre aide

[FR119492]

Salut.

Je vois deux solutions à ton problème:

Si tu veux obtenir nomfichier_01, nomfichier_02, etc., tu génères ton nom de fichier en ajoutant 100, puis en écrasant le 1 :

Code :

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

1
2
3
Write (FName(11:13),'(I3)') I+100
FName(1:11)='nomfichier_'
FName(14:17)='.txt'

Cette solution a l'avantage que, dans l'Explorer de Windows, tes fichiers seront classés dans le bon ordre.

Si les zéros te gènent, c'est un peu plus compliqué, car tu dois programmer séparément les deux cas :

Code :

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

1
2
3
4
5
6
7
8
FName(1:11)='nomfichier_'
If (i.Lt.10) Then
 Write (FName(12:12),'(I1)')  i
 FName(13:16)='.txt'
Else
 Write (FName(12:13),'(I2)')  i
 FName(14:17)='.txt'
End If

Bonne chance
Jean-Marc Blanc

[Manou26]

merci beaucoup