ADICIONAR TEXTO A ARQUVO DE TEXTO COM OPEN FOR

KARY92 26/08/2012 19:30:58
#408678
Gente,

Preciso saber como se adiciona texto a arquivo de texto com a instrução Open For OutPut...
Assim eu escrevo no arquivo e sobrescrevo seu conteúdo:

  sTexto = [Ô]Meu texto a adicionar.[Ô]
  fileN = FreeFile

   Open [Ô]C:\MyLog.txt[Ô] For Output As #fileN
   Print #fileN, sTexto
Close #fileN


O que quero é adicionar texto ao que já existe no arquivo.

Obrigada !
DANLEONHART 26/08/2012 21:00:43
#408685 Resposta escolhida
Olá Kary !

Basta substituir o [Ô]Output[Ô] por [Ô]Append[Ô]:

 sTexto = [Ô]Meu texto a adicionar.[Ô]
  fileN = FreeFile

   Open [Ô]C:\MyLog.txt[Ô] For Append As #fileN
   Print #fileN, sTexto
Close #fileN


Valeu !
KARY92 26/08/2012 21:52:30
#408690
Obrigada !

é isso mesmo que queria !
Tópico encerrado , respostas não são mais permitidas
Voltar