Deletar todos registros de uma tabela via Query.

Delphi

02/11/2004

Oi pessoal.
Estou tentando deletar todos os registros de uma tabela temporaria via query tentei desta forma:
With DmDadosTemp.IBQ_ItensTemp Do
      Begin
       Close;
       Sql.Clear;
       Sql.Delete(´Select * From Tab_LanceIten_temp´);
       Open;
      end;


só que não deu certo.
Como faço isto funcionar.
peninha.


Peninha

Peninha

Curtidas 0

Respostas

Gilvanj

Gilvanj

02/11/2004

O comando para exclusão de registros não é o Select e sim o Delete. Veja:

Delete From Tab_LanceIten_temp

Isto apagará todos os registros de Tab_LanceIten_temp.

Por ser um comando que não retorna linhas como resultado, vc tem que executar o método ExecSQL e não Open.


GOSTEI 0
Mozico

Mozico

02/11/2004

falae...
// ative a transacao
Sql.Clear;
Sql.add(delete From Tab_LanceIten_temp´);
excsql;

// de o comit


GOSTEI 0
POSTAR