Extraer información de archivos de texto con VFP

Necesito extraer información específica de varios archivos de texto.
Los archivos contienen filas con texto de distinta extensión.
Todos los archivos tienen la misma estructura.
La idea sería contar con un programa que incluya un bucle que extraiga la información requerida de un archivo y la guarde en un archivo que puede ser una tabla de VFP. Luego del archivo siguiente y la adjunte a la tabla.
Espero me puedas colaborar,
Muchas gracias de antemano

1 respuesta

Respuesta
1
Puedes usar algo como lo siguiente:
** Se crea un "Cursor" para almacenar la información de los archivos
CREATE CURSOR TextoArc (Linea c(254))
** Se listan los archivos de cierta ruta
cRuta = "F:\Tmp\Te\"
cExt = "*.*"
nArchivos = ADIR(aArchivos, cRuta + cExt, "", 1)
IF nArchivos == 0
MESSAGEBOX("No se encontraron archivos.", 64, "")
RETURN
ENDIF
FOR nCont = 1 TO nArchivos
cArchivo = cRuta + aArchivos[nCont, 1]
APPEND FROM (cArchivo) TYPE SDF
Endfor
GO TOP IN TextoArc
Browse last nowait

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas