dBfast - Lectura de un archivo TXT

 
Vista:

Lectura de un archivo TXT

Publicado por Ramon (133 intervenciones) el 21/06/2006 19:00:59
Hola amigos,

Necesito leer de un archivo TXT cada línea de este, es decir, necesito guardar en una variable temporal el contenido de un línea, seguidamente hacer que se deba de hacer y leer la siguiente línea hasta acabar todas las línea del archivo TXT que pueden ser más de 500 líneas.

Un Saludo
Ramon.
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
sin imagen de perfil

RE:Lectura de un archivo TXT

Publicado por Marcelo SP (22 intervenciones) el 21/06/2006 20:34:19
Hola Ramon.
Yo generalmente creo un archvo dbf con un campo llamado dato, caracteres, y tamaño el que prefieras (80 por ej.)
y luego hago
append from archivo.txt sdf
luego abro el archvi dbf y lo leo como tu ya sabes.
Espero te sirva
Un fuerte abrazo
Marcelo
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

RE:Lectura de un archivo TXT

Publicado por Ramon (133 intervenciones) el 21/06/2006 22:36:08
Gracias Marcelo,

Pero he conseguido leer cada una de las líneas con el siguiente ejemplo:

STORE FOPEN("datos.txt") TO manejador
STORE SPACE(308) TO varcadena
STORE 99 TO reclec

IF manejador <> -1
DO WHILE reclec > 0
reclec = FGETS(@varcadena,309,manejador)
IF reclec = 0
exit
endif
? varcadena
ENDDO
FCLOSE(manejador)
ELSE
? "No se ha podido abrir el archivo"
ENDIF

Luego he escogido cada parte de la línea que he necesitado, ya que la línea que tenia que leer era mayor de 300 caracteres de ancho.

Un Saludo
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