salut je croit que c'est impossible d'ouvrire 2fichier au meme temps alors est ce que il ya d'autre moyen

merci d'avance

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Open File1.FileName For Input As #1
While Not EOF(1)
Line Input #1, ss
 
Open "ascw" & File1.FileName For Append As #1
Print #1, replace(ss,"a","<a>")
Close #1
 
Wend
Close #1