Leer y crear archivos de texto

Samoth
31 de Marzo del 2004
necesito escribir un archivo de texto pero de varias
lineas, 4 , y luego leerlo linea por linea .

no se si me entienden, espero que si


Miguel
31 de Marzo del 2004
para escribir el abres el archivo :
open ruta for outout as #|
write 1,variable
Close

para leerlo lo abres
open rutaarchivo for input as #1
whle not eof(manejadorArchivo)
lineinput manejadorFiechero,cadena
msgbox cadena
wend