Manejo de archivos planos

Adrian:

Deberías revisar la ayuda para las instrucciones Open, Print #, Input # si
quieres tener información detallada.

En principio, para escribir hacia un archivo, debes

1.- Obtener un número de handle libre:
n = OpenFile

2.- Abrirlo
Open "ARCHIVO.TXT" For Output as #n
Esta instrucción crea un nuevo archivo, si es que ya existía un archivo
con ese nombre.
Si quieres agregar información a un archivo preexistente, utilizarás
Open "ARCHIVO.TXT" For Append as #n

3.- Escribir
Write #n, Var1, Var2, ..., VarN
Este método escribe cada variable según lo que en los manuales de DBII
se llamaba SDF (System Data Format), es decir, los campos alfanuméricos
encerrados entre comillas, el punto utilizado como separador de decimales,
los campos separados por comas y cada linea terminada por CR+LF.
Alternativamente podrías escribir
Print #1, ...
En este caso, los datos pasan al archivo con el mismo formato que si
hicieras debug.Print, o que si usaras un print en el viejo Basic.

4.- Cerrarlo.
Close #n
Si escribes Close, sin argumentos, todos los archivos abiertos se
cerraran.

Para leer

1.- Obtener un número de handle libre, igual que arriba

2.- Abrir el archivo
Open "ARCHIVO.TXT" for Input as #n

3.- Leer los registros
Do While Not EOF(n)
Input #n, Var1, Var2, ..., VarN
... proceso de cada registro
Loop

Alternativamente puedes leer líneas de texto completas, utilizando
LineInput #1, strLinea
Mediante este procedimiento puedes leer el archivo línea a línea.

Los "archivos planos" tambien pueden ser utilizados para almacenar datos
binarios y como dispositivos de acceso directo (random access) mediante las
instrucciones Get, Put y Read, y los modificadores de apertura "for Random"
y "for Binary", pero eso no lo uso desde los MUY viejos tiempos de GWBASIC,
de manera que no puedo decirte nada sobre ellos.

Salud!

Leonardo
Microsoft MVP
Caracas - Venezuela