F�rum Adi��o de registros com ADO - Que problema doido... #194203

11/11/2003

Pessoal,

Estou adicionando registros � minha tabela atrav�s de controle ADOQuery. No c�digo abaixo, uma pesquisa � feita em uma primeira tabela atrav�s do ADOQuery1 e todos os registros encontrados s�o adicionados a uma segunda tabela por meio do ADOQuery2. Quando tento executar o c�digo normalmente em tempo de execu��o, ele adiona � segunda tabela os registros encontrados no ADOQuery1, exceto o �ltimo registro. Por�m, quando executo o c�digo atrav�s da tecla F8, corre tudo bem e os registros s�o todos adicionados corretamente, inclusive o �ltimo registro da lista de registros encontrados na pesquisa do ADOQuery1.

      while (not AdoQuery1.Eof) do
         begin
            AdoQuery2.Append;
            AdoQuery2.FieldValues[�NOME�]:= ADOQuery1.FieldValues[�NOME�];
            AdoQuery2.FieldValues[�ENDERECO�]:= ADOQuery1.FieldValues[�ENDERECO�];
            AdoQuery2.FieldValues[�NUMERO�]:= ADOQuery1.FieldValues[�NUMERO�];
            AdoQuery2.FieldValues[�CEP�]:= ADOQuery1.FieldValues[�CEP�];
            AdoQuery2.FieldValues[�BAIRRO�]:= ADOQuery1.FieldValues[�BAIRRO�];
            AdoQuery2.FieldValues[�CIDADE�]:= ADOQuery1.FieldValues[�CIDADE�];
            AdoQuery2.FieldValues[�UF�]:= IntToStr(ADOQuery1.FieldValues[�UF�]);
            AdoQuery2.Post;

            AdoQuery1.Next
         end;

Algu�m tem alguma id�ia do que pode estar acontecendo?

Grato.
wbb

Wbb

Curtir t�pico

+ 0

Responder

Posts

12/11/2003

Wbb

SOBE

Responder

Gostei + 0