Fala Cleiton...
Não sei pq a query não funcionou, tem q dar uma olhada nos parametros.
valeu.
Cleiton <[EMAIL PROTECTED]> escreveu:
Oi Rodolfo...
Eu fiz da forma como você sugeriu e deu certinho.
Só não entendo porque não funciona com a query.
De qualquer forma, muito obrigado pela colaboração.
----- Original Message -----
From: "Rodolfo mendes"
To:
Sent: Tuesday, March 07, 2006 2:44 PM
Subject: Re: RES: [delphi-br] Erro Com Update
Não existe parametro campo1, os seus parametros são va1 e var2.
Tenta assim:
with qurery1 do
begin
sql.clear;
sql.add('update tabela1 set campo1 = :var1 where campo2= :var2');
ParamByName('var1').AsFloat:= var1;
ParamByName('var2').AsInteger:= var2;
ExecSQL;
end;
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Cleiton
Enviada em: terça-feira, 7 de março de 2006 12:45
Para: Delhpi
Assunto: [delphi-br] Erro Com Update
Olá pessoal...
Mais uma venha vez lhes pedir por socorro.
Estou com uma certeza dificuldade pra fazer atualização em uma determinada
tabela utilizando o componente query.
Utilizo banco de dados MySql 4.1 e o componente zeos 6.5.
O que acontece é o seguinte:
Estou tentando atualizar um campo de uma de uma tabela por meio da query.
Dentro da query eu coloco o seguinte comando sql:
UPDATE tabela1 SET campo1 = :var WHERE campo2 = :var2;
No entanto, quando vou ativar a query dá o seguinte erro:
CAN NOT OPEN A RESULT SET
É a primeira que estou tentando fazer isso com o zeos. Fazia dessa forma
anteriormente usando interbase e IBQuery e funcionava perfeitamente.
Também tentei fazer esse update de outra forma, inserindo os comandos sql na
programaçao.
Fiz assim:
with qurery1 do
begin
sql.clear;
sql.add('update tabela1 set campo1 = :var1 where campo2= :var2;');
ParamByName('campo1').AsFloat:= var1;
ParamByName('campo2').AsInteger:= var2;
ExecSQL;
end;
Mas dessa forma acontece o seguinte erro:
QUERY1 PARAMETER 'CAMPO1' NOT FOUND
Também testei diretamente no banco e deu certo, o que tira a possibilidade
de o script estar errado.
Se alguém poder me ajudar ou dar umas dicas de como fazer um update dessa
forma ou parecido, ficarei muito agradecido.
Um grande abraço a todos.
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
__________________________________________________
Faça ligações para outros computadores com o novo Yahoo! Messenger
http://br.beta.messenger.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
---------------------------------
Yahoo! Acesso Grátis
Internet rápida e grátis. Instale o discador agora!
[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]
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
