Fórum Dados de Uma tabela para outra #244130

23/07/2004

0

Delphi

Tenho um Banco de Dados em um aplicativo feito em Delphi, tenho uma tabela que importa dados de um arquivo texto, gostaria de saber como jogar estes dados tabela de importação em uma tabela de casdastro que tem alguns campos em comuns, não todos?.
Obs.: os dados da tabela importação está em um dbgrid, e os do cadastro, em um form.
uso ado (ms access).

Grato,

Adriano.


Xadriano

Xadriano

Responder

Posts

23/07/2004

Vinicius2k

Colega,

Vc teria q fazer um laço com a primeira tabela, ´appendando´ na segunda... algo parecido com isto :
Tabela1.Open;
Tabela2.Open;

While not Tabela1.EOF do
  begin
    Tabela2.Append;
    Tabela2.FieldByName(´Campo1_t2´).AsInteger:= Tabela1.FieldByName(´Campo1_t1´).AsInteger;
    Tabela2.FieldByName(´Campo2_t2´).AsString:= Tabela1.FieldByName(´Campo2_t1´).AsString;
    Tabela2.Post;

    Tabela1.Next;
  end;


Espero ter ajudado...
T+


Responder

Gostei + 0

26/07/2004

Xadriano

Quando dou um clique no botão aparece a seguinte mensagem:
AdoTabCadastro: DataSet Not in Edit or Insert Mode.

o que está errado?

Desde já agradeço.

Adriano


Responder

Gostei + 0

27/07/2004

Henrique Rodrigues

Essa mensagem está aparecendo porque antes de iniciar, a tabela tem que estar no modo de adição ou edição.

Para adicionar

AdoTabCadastro.insert;

editar

AdoTabCadastro.edit;


Responder

Gostei + 0

27/07/2004

Xadriano

Akenatum , em que evento eu coloco este código?
Desculpe-me a pergunta e porque iniciei em delphi a pouco tempo.

Grato, Adriano


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar