Append from (arqtxt) sdf
Enviado: 17 Jan 2012 01:44
Ola..
Na migracao do clipper para harbour,
para ler um arquivo txt, eu crio uma estrututa em dbf e executo o comando append form (arq.txt) sdf
esse arquivo em txt tem colunas de quase 6000 caracteres, entao defino o dbf com um campo com tamanho 6000
No clipper funcionava beleza
no Harbour 2.0 * que é o que estou usando, apenas a primeira linha do txt é puxada !O que estaria errado ??
Na migracao do clipper para harbour,
para ler um arquivo txt, eu crio uma estrututa em dbf e executo o comando append form (arq.txt) sdf
esse arquivo em txt tem colunas de quase 6000 caracteres, entao defino o dbf com um campo com tamanho 6000
No clipper funcionava beleza
no Harbour 2.0 * que é o que estou usando, apenas a primeira linha do txt é puxada !O que estaria errado ??
.
.
varq:='arquivo.txt'
erase('strut.dbf')
aadd(aCampos,{"reg" ,"C", 6000, 0})
DBCREATE("strut",aCampos)
close('strut')
sele 0
use strut alias strut
SELE STRUT
APPEND FROM &VARQ SDF
dbgotop()
.
.