Re: Convertir DBF a TXT

[miguelust]

Jose Luis Lopez escribió el 17/02/2005 18:43 :
> Hola amigos
>
> Tengo una tabla dbf y quiero exportar datos a un archivo .TXT , este ultimo
> debe contener en la primera linea los nombres de los campos, los campos
> deben estar separados por tabulacion y adicionalmente los campos no deben
> tener comillas. Como lo hago ?????
>
> Gracias por su colaboracion
>
con el copy to lo puedes hacer pero no se crea con las cabeceras y cada campo
aparecera con comillas, aun que eso no afecta en nada .. entonces lo que tu
deseas es es generar un txt desde una tabla dbf y que la primera fila
aparesca
las cabeceras, para eso debes crear una pequeña rutina, con scann do
while, for, lo que mejor te paresca y usar las funciones siguientes :

FCREATE (Crea el archivo TXT)
FPUTS(Añane Filas al TXT)
FCLOSE(Cierra el txt)
en el ejemplo uso el delimitador "|"

Ejemplo :
xFile = FCREATE ("C:Almacen.txt")
xFila = "Codigo"+"|"+"Almacen"
=FPUTS(xFile, xFila)
select Almacenes
go top
scall all
xFila = "Cod_alm"+"|"+"Des_Alm"
=FPUTS(xFile, xFila)
endscan
=FCLOSE(xFile)

ESPERO QUE ESTO TE PUEDA AYUDAR, SUERTE