Ecriture dans un fichier log

Question

Bonjour à tous,

j'ai créé un programme VB qui écrit, entre autres, des traces dans un fichier log. A un moment donnée le programme VB lance un autre programme (non VB) qui écrit aussi des traces dans le même fichier log.

Mon problème est que le programme VB ne prends pas en compte les traces ajoutées par le deuxième programme (il ne se place pas à la fin du fichier) et écrase ces traces.

Comment faire pour déplacer le pointeur VB à la fin du fichier après l'écriture du deuxième programme?

Merci à tous

Spit.

cs_DARKSIDIOUS · Answer

Au lieu de faire un Open ... For Output, fais un :

Open ... For Append

DarK Sidious

[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]

spitswd · Answer

En fait j'ai déja fait un Open ... For Append

Mais apparement cette option ne fonctionne qu'à l'ouverture du fichier.
La solution serait donc de fermer puis de réouvrir le fichier en Append après l'écriture du deuxième programme.

A part cette commande il n'exite pas d'autre moyen de forcer VB à écrire à la fin du fichier ??

Spit.

cs_DARKSIDIOUS · Answer

Tu as toujours la possibilité de l'ouvrir en binaire... mais bon c'est pas très pratique, ou sinon, charger le texte complet et écrire dans le fichier le texte complet puis la suite à rajoutter...

DarK Sidious

[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]

BruNews · Answer

API:
Dim lret As Long
hfile = CreateFile(...)
avant chaque ecriture:
SetFilePointer(ffile, 0, 0, FILE_END)
ecriture:
WriteFile(hfile, pdata, lendata, lret, 0)

quand fini avec le fichier:
CloseHandle(hfile)

BruNews, ciao...

spitswd · Answer

Ah! je crois que je vais prendre la solution de BruNews.
Merci à tous les deux!  :big) 
Spit.

Ecriture dans un fichier log

5 réponses

Discussions similaires