Discussion :

[yassyn]

salut tous le monde,
je voudrai votre aide à propos d'un code vbs qui ajoute du texte dans un fichier déjà exité et qui contient déja du texte...
merci d'avance

[SfJ5Rpw8]

tiens directement adapté de la

http://vb.developpez.com/faqvbs/?page=II.2.4#fsowrite

Code :

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

1
2
3
4
5
6
7
8
 
 
Const ForWriting = 2
Const ForAppending = 8
Dim fso, f   
    Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.OpenTextFile("c:\temp\ecr.txt", ForAppending,true)
   f.write("Salut")

[yassyn]

bonjour !
oui je sais ce code , mais son problem c qu'il va effacer le texte déja existé dans le fichier !
je ceux garder le texte dans le fichier et ajouter une autre !

[SfJ5Rpw8]

tu l'as essayé ce code ?

[ced600]

Je ne pense pas qu'il l'ait essayé, ni même lu.

Juste une chose : "ForAppending".

yassyn si après cela tu nous dis que le code proposer va écraser le contenu de ton fichier, alors nous ne pouvons rien pour toi. Fraudra faire un stage d'anglais !!!!

[yassyn]

.....bien sûr je l'ai essayé et ca efface le contennu de fichier !
faut-il mettre quoi alors pour garder le contenue ????

[SfJ5Rpw8]

tu n'as pas du essayer le bon code !

[yassyn]

seulement un exemple !
mais pouvez vous me dire quoi mettre dans le code pour ne pas ecraser le texte dans le fichier et d'en ajouter une autre !

[SfJ5Rpw8]

ForAppending

[ced600]

Tout est déjà ecrit, il suffit de lire et de faire ce que l'on te dit.

Au cas où il ne comprenne pas on va essayer plus gros :

ForAppending

[yassyn]

Merci comme meme ca marche bien !

[SfJ5Rpw8]

Merci comme meme ca marche bien !