|
Ricardo, não entendi o seu problema, mas estou mandando um
exemplo de como ler arquivo texto. ! CARREGA ARQUIVO If SalFileOpen( hFile, "C:\\ARQUIVADO.TXT",
OF_Read ) Loop ! O 380 é a qtd de caracteres da
linha If
SalFileGetStr( hFile, vl_sStrArq, 380 ) ! ! Após ler a linha insere
no banco Caso queira, vc pode
ler a variável vl_sStrArq pegando caracter a caracter bastando apenas usar a
função SalStrMidX(). Se a posição não for
fixa vc pode ler a variável procurando pelo separador, aí vc precisaria criar
um looping. Call
SqlPrepareAndExecute(hSqlInsert, vl_sCmd) Else ! Call
SqlCommit(hSqlInsert) ! Break ! ! Call SalFileClose( hFile ) ! Se precisar posso detalhar mais. Espero ter ajudado. De: Ricardo Gomes
[mailto:[EMAIL PROTECTED] Pessoal, tenho um arquivo onde uso SalFileGetChar para ler
seu conteúdo. Esse arquivo possuiu caracteres nulos (seria o caracter
'\0' Obrigado. Ricardo. |
