Ajouter des données à la fin d'un fichier

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 219 fois - Téléchargée 37 fois

Contenu du snippet

je mais cette source pour pas que personne ne fasse la meme gaffe que moi
voici comment ajouter des données à la fin d'un fichier SIMPLEMENT

Source / Exemple :


Sub ajouter(fichier As String, donnees As String)
Dim fso, texte
Set fso = CreateObject("scripting.filesystemobject")
Set texte = fso.OpenTextFile(fichier, ForAppending, True)
texte.write donnees
'pour rester propre
texte.Close
Set fso = Nothing
Set texte = Nothing
End Sub

Conclusion :


c aussi simple

A voir également

Ajouter un commentaire Commentaires
carl_coy Messages postés 1 Date d'inscription lundi 6 février 2006 Statut Membre Dernière intervention 14 février 2006
14 févr. 2006 à 17:43
En un mot : Merci
Je cherchais à ecrire dans un fichier texte à partir d'un .VBS (j'ai remplacé ForAppending par 8 sinon ca ne fonctionnait pas!?)

Je n'y connais rien de rien en prog ni en scripting et ton code m'a bien aidé.
cs_calimero93 Messages postés 29 Date d'inscription vendredi 14 mars 2003 Statut Membre Dernière intervention 10 décembre 2004
27 mai 2004 à 08:47
mais malheureusement ca ne marche pas pour des fichier BAT ou SYS
cs_calimero93 Messages postés 29 Date d'inscription vendredi 14 mars 2003 Statut Membre Dernière intervention 10 décembre 2004
27 mai 2004 à 08:43
merci pour ton code pcpunch
il va mettre tres utile
cs_legion91 Messages postés 216 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 15 décembre 2010
20 juil. 2003 à 20:54
ben la je regrette la note k j'ai mis car ce code m'a l'air bien mieu k le precedent.
Sa c du bon boulot(ont peut noter k ya pas mal de methode ecrite sur ce sujet ici et c tres bien pour les autres) ;-)
gabchampagne Messages postés 216 Date d'inscription mercredi 2 avril 2003 Statut Membre Dernière intervention 5 mai 2004
20 juil. 2003 à 19:46
mais ca mrache
Afficher les 10 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.