Debes tener claro que el trabajar con archivo .TXT son de acceso secuencial, por ende, dependiendo de lo que desees hacer lo que te indico lo podras adaptar para tu necesidad.
** Para escribir en archivo FORMA1
** Este tipo de apertura, genera un archivo nuevo siempre. Por lo que, si existe
** previamente una version del mismo, lo pisa, perdiendose el anterior.
'Obtener numero de secuencia de archivo disponible
NroArch = FreeFile
'Abrir el archivo
Open <NombreArchivo> for output as #NroArch
'Escribir en el archivo
Print #NroArch, <Dato1>,<Dato2>,... <Daton>
'Cerrar archivo
Close(NroArch)
** Para escribir en archivo FORMA2
** Este tipo de apertura, escribe al final del archivo. Por lo que, si existe el archivo
** lo que se escriba, lo realiza al final de este.
** Esta forma de apertura, es ideal para generar LOG de transacciones, donde
** vas registrando eventos de tus procesos, o realizar seguimientos a programas
'Obtener numero de secuencia de archivo disponible
NroArch = FreeFile
'Abrir el archivo
Open <NombreArchivo> For Append Access Write As #NroArch
'Escribir en el archivo
Print #NroArch, <Dato1>,<Dato2>,... <Daton>
'Cerrar archivo
Close(NroArch)
** Para leer desde un archivo
'Obtener numero de secuencia de archivo disponible
NroArch = FreeFile
'Abrir el archivo
Open <NombreArchivo> for input as #NroArch
'Leere registro desde archivo
Input #NroArch, <Var1>, <Var2>,<Var3>
'Cerrar archivo
Close(NroArch)
