FoxPro/Visual FoxPro - Pasar un DBF a archivo de Texto (TXT)

 
Vista:

Pasar un DBF a archivo de Texto (TXT)

Publicado por Andrea (65 intervenciones) el 08/11/2007 22:48:31
Hola a todos
Estoy pasando un algunos campos de un archivo DBF a un archivo TXT que deberá ser leído por un programa que maneja una balanza comercial

He utilizado 2 métodos, pero los dos me dan el mismo problema
1) FOPEN(), FPUTS() y FCLOSE()
2) la función STRTOFILE( )

Si bien la información pasa pefectamente, de la DBF no puedo establecer el retorno de carro (ENTER)

Le agrego CHR(13) al final de la línea, pero al ver el archivo (Block de Notas, por ejemplo) me lo muestra a continuación (una línea al lado de otra, sin que baje)

¿Hay algún comando que me estoy olvidando? ¿Algún set? ¿alguna configuración para que cargue el salto de línea + eol en cada línea?

Muchas gracias
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

RE:Pasar un DBF a archivo de Texto (TXT)

Publicado por Plinio (7841 intervenciones) el 08/11/2007 22:58:32
Visita SET TEXTMERGE en la ayuda
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:Pasar un DBF a archivo de Texto (TXT)

Publicado por Andrea (65 intervenciones) el 09/11/2007 02:22:31
Gracias
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:Pasar un DBF a archivo de Texto (TXT)

Publicado por Plinio (7841 intervenciones) el 09/11/2007 02:31:53
Como lo resolviste?
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:Pasar un DBF a archivo de Texto (TXT)

Publicado por andrea (65 intervenciones) el 09/11/2007 21:43:56
Cuando estaba revisando el código para mandarles un ejemplo, me di cuenta que en vez de FPUTS() utilizaba FWRITE() que no agrega el retorno de carro.
Gracias
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:Pasar un DBF a archivo de Texto (TXT)

Publicado por OMAR (1 intervención) el 21/11/2007 18:49:14
con este ejemplo funciona...

pnFichn = FCREATE('c:\prueba23.txt')
tcTexto = 'hola'
=FWRITE(pnFichn, DTOC(DATE())+CHR(9))
=FWRITE(pnFichn, TIME()+CHR(9))
=FWRITE(pnFichn, tcTexto+CHR(13)+CHR(10))

tcTexto = 'chau'
=FWRITE(pnFichn, DTOC(DATE())+CHR(9))
=FWRITE(pnFichn, TIME()+CHR(9))
=FWRITE(pnFichn, tcTexto+CHR(13)+CHR(10))
close data
=FCLOSE(pnFichn)
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