Voce precisa saber qual é o layout do arquivo e assim colocar cada parte no
devido campo da tabela.
Voce pode usar a instrução :
try
Try
assingFile(arq, caminho do arquivo);
reset(Arq);
While not Eof(Arq) do
begin
Readln(arq, linha);
dentro da variável linha (tipo string), voce terá que retirar as
informações (segundo o layout) e colocá-las nos devidos campos da sua
tabela.
end;
Se a operação for efetivada com sucesso então
inicio
ShowMessage(Mensagem de sucesso);
Transaction.commit;
fim
Except
showMessage(Mensagem de erro);
Transaction.Rollback;
end;
Finally
closeFile(arq);
End;
-----Mensagem original-----
De: Debora [mailto:[EMAIL PROTECTED]
Enviada em: quinta-feira, 24 de março de 2005 09:30
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br]
Bom dia gente. aqui estou eu enchendo vcs de novo. :):):) Gostaria de saber
se alguem tem algum exemplo (pode ser bem simples) de como importar arquivos
texto para dentro de um banco de dados. Eu sou programadora de um cartorio e
as informaçoes bancarias agora serao enviadas por meiod eum disquete. Uso
ibdataset e firebird com delphi 5. O programa ja roda legal so que preciso
fazer com que ele importe esse arquivo,gere o arquivo de retorno. Baixei um
componente chamado boleto bancario mas nao entendi patavina. anexei o
arquivo que vem do banco. desde ja agradecida...
Debora da Silva Costa
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
