Visual Basic - Aver quien puede ayudarme

Life is soft - evento anual de software empresarial
 
Vista:

Aver quien puede ayudarme

Publicado por MARTIN (198 intervenciones) el 05/03/2002 16:24:51
Hola a todos mi problema es que necesito abrir un archivo de texto para pegar al final nueva informacion,como en un log ya que el codigo que tengo ahora lo abre y encima la informacion nueva,este es el codigo que tengo saludos y de antemano gracias..

Dim lCtr As Control
Dim lStr As String
Dim FF As Byte
lStr = "c:\Agenda.txt"
FF = FreeFile
Open lStr For Output As #FF
Print #FF, " O R G A N I Z A D O R P E R S O N A L "
Print #FF, " "
Print #FF, " "
Print #FF, " "
Print #FF, "FECHA : " & Text2.Text
Print #FF, "HORA : " & horaActual
Print #FF, "NOTA IMPORTANTE : " & Text3.Text
Close #FF
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Aver quien puede ayudarme

Publicado por XDavid (3 intervenciones) el 06/03/2002 06:05:58
si he entendido bien lo que quieres es abrir un fichero de texto para añadir por el final y lo que haces con el codigo que adjuntas es machacarlo. Lo unico que tienes que cambiar es el modo de abrirlo.
EN lugar de
Open lStr For Output As #FF
utiliza
Open lStr For Append As #FF

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar