Nao sei se as respostas dos amigos ficaram claras.
Sua select tinha que ser assim:

Realmente na expressão abaixo não existe o parâmetro campo1 existe apenas
var1 e var2.

  with qurery1 do
   begin
    sql.clear;
    sql.add('update tabela1 set campo1 = :campo1 where campo2= :campo2;');
    ParamByName('campo1').AsFloat:= var1;
    ParamByName('campo2').AsInteger:= var2;
    ExecSQL;
   end;

Ai vai funcionar.


Cláudio Anderson de Araújo Prudente
Analista/Desenvolvedor de Sistemas
[EMAIL PROTECTED]
----- Original Message ----- 
From: "Cleiton" <[EMAIL PROTECTED]>
To: <delphi-br@yahoogrupos.com.br>
Sent: Wednesday, March 08, 2006 1:25 PM
Subject: [delphi-br] Re: Erro Com Update -> douglas


> Oi Douglas...
>
> Não entendi o que você quizer com "na expressão abaixo não existe o
> parâmetro campo1 existe apenas var1 e var2".
>
> A var1 será o valor referente ao campo1. Como ela não iria resistir?
>
> Quanto ao ";" no final também tentei usar sem e acontecer o mesmo erro.
>
> Ainda não consegui resolver esse problema.
> ----- Original Message ----- 
> From: "Douglas Uesato - Dept de Informática" <[EMAIL PROTECTED]>
> To: <delphi-br@yahoogrupos.com.br>
> Sent: Tuesday, March 07, 2006 1:11 PM
> Subject: RES: [delphi-br] Erro Com Update
>
>
> Realmente na expressão abaixo não existe o parâmetro campo1 existe apenas
> var1 e var2.
>
>   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;
>
>
> Outra coisa, tenta executar a query sem o ";" no final da cláusula,
> eu utilizo massivamente este recurso em uma aplicação e está rodando de
boa.
>
>
> []s
> Douglas Uesato
>
> -----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
>
>
>
>
>
>
>
>
>
>
> -- 
> 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
>
>
>
>
>
>
>
>
>




-- 
<<<<< 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

 


Responder a