Problemas com o comando Update

Delphi

01/04/2004

Estou colocando este comando e está dando erro, será que alguém pode me ajudar?

TabProdutos.SQL.Clear;
TabProdutos.SQL.Add(UPDATE Tab_Produtos SET Qtd = ´ + IntToStr (Qtd) + ´ WHERE Cod_Produto = ´ TabEntrada.FieldByName(´Cod_Produto´).AsString);
TabProdutos.Open;
TabProdutos.ExecSQL;

ERRO: "TabProdutos: CommandText does not return a result set"


O que pode estar errado?

Estou usando Banco de Dados Access com conexão ADO.

Obrigado![/code]


André Maretti

André Maretti

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

01/04/2004

para o comando UpDate somente deve-se usar o ExecSQL, sem o .Open antes.


GOSTEI 0
Eniosb

Eniosb

01/04/2004

Retire a linha TabProdutos.Open; qdo se dá um update, delete, insert, não se usa o open, usa-se o ExecSQL, sempre. Acho que irá resolver...
T+


GOSTEI 0
André Maretti

André Maretti

01/04/2004

/]/]@t Valeu, deu certinho...........


GOSTEI 0
POSTAR