Bonjour
Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier
texte (le meme) car j'ai besoin de completer le fichier et pas de le
remplacer .
Si je respecte le open/print/close je vais remplacer le fichier initial
Qq1 voit il une solution ?
Merci
DAniel
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
"DAniel" | Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier | texte (le meme) car j'ai besoin de completer le fichier et pas de le | remplacer . | Si je respecte le open/print/close je vais remplacer le fichier initial
"DAniel"
| Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier
| texte (le meme) car j'ai besoin de completer le fichier et pas de le
| remplacer .
| Si je respecte le open/print/close je vais remplacer le fichier initial
"DAniel" | Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier | texte (le meme) car j'ai besoin de completer le fichier et pas de le | remplacer . | Si je respecte le open/print/close je vais remplacer le fichier initial
Il faut ouvrir le fichier en Mode Ajout. Si le fichier n'existe pas, il est créé, sinon on ajoute en fin de fichier.
Exemple: Sub bidon2() Dim f As Integer f = FreeFile Open CurrentProject.Path & "Testbidon.txt" For Append As f Print #f, "tototototo" Close f End Sub
Bonjour Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier texte (le meme) car j'ai besoin de completer le fichier et pas de le remplacer . Si je respecte le open/print/close je vais remplacer le fichier initial Qq1 voit il une solution ? Merci DAniel --
A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonsoir,
Il faut ouvrir le fichier en Mode Ajout. Si le fichier n'existe pas, il
est créé, sinon on ajoute en fin de fichier.
Exemple:
Sub bidon2()
Dim f As Integer
f = FreeFile
Open CurrentProject.Path & "Testbidon.txt" For Append As f
Print #f, "tototototo"
Close f
End Sub
Bonjour
Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier
texte (le meme) car j'ai besoin de completer le fichier et pas de le
remplacer .
Si je respecte le open/print/close je vais remplacer le fichier initial
Qq1 voit il une solution ?
Merci
DAniel
--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Il faut ouvrir le fichier en Mode Ajout. Si le fichier n'existe pas, il est créé, sinon on ajoute en fin de fichier.
Exemple: Sub bidon2() Dim f As Integer f = FreeFile Open CurrentProject.Path & "Testbidon.txt" For Append As f Print #f, "tototototo" Close f End Sub
Bonjour Une procédure appelle plusieurs fonctions qui chacune enregistre un fichier texte (le meme) car j'ai besoin de completer le fichier et pas de le remplacer . Si je respecte le open/print/close je vais remplacer le fichier initial Qq1 voit il une solution ? Merci DAniel --
A+ Eric http://users.skynet.be/mpfa/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
