Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-03-2009
Sole_l Sole_l is offline
Miembro
 
Registrado: mar 2009
Posts: 14
Poder: 0
Sole_l Va por buen camino
Red face MySQL, Problema con ADOQuery y parameters

Hola estoy intentando modificar datos de la base con el siguiente código:

Código Delphi [-]
 
procedure TForm1.GuardarClick(Sender: TObject);
begin
  with DataModule2.ADOQuery1 do
  Begin
    close;
    Parameters.ParamByName('dato').Value := StrToInt(DBEditDNI.Text);
    Parameters.ParamByName('nom').Value := DBEditNombreyApellido.Text;
    SQL.Clear;
    SQL.Add('update cliente set nombre_apellido = nom where id_cliente= dato ');
    ExecSQL;
  End;
end;

end.

mensaje de error: ADOQuery1: Parameter 'nom' not found.
Lo raro es que el parametro dato si me lo toma bien, pero el parametro llamado nom que tambien defini en las propiedades del ADOQuery no.
dato es una clave primaria en mi base de datos y es un integer, nom es un char de 35. No estoy muy segura pero creo que el problema es que estoy definiendo mal este parametro nom.
Alguien puede guiarme en como definirlo correctamente??? Se los agracdeceria mucho.
saludos
Responder Con Cita
  #2  
Antiguo 14-03-2009
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Poder: 23
ContraVeneno Va por buen camino
creo que lo estas haciendo al reves, es decir, primero hay que declarar la consulta sql y en base a esta, establecer los parámetros, además, no veo que definas ningún parámetro, en fin, que esto creo que es lo correcto:

Código Delphi [-]
procedure TForm1.GuardarClick(Sender: TObject);
begin
 with DataModule2.ADOQuery1 do Begin
  close;
  SQL.Clear;
  SQL.Add('update cliente set nombre_apellido = :nom where id_cliente= :dato');
  Parameters.ParamByName('dato').Value := StrToInt(DBEditDNI.Text);
  Parameters.ParamByName('nom').Value := DBEditNombreyApellido.Text;
  ExecSQL;
 End;
end;
end.
Si lo haces de esta forma, no necesitas definir nada en tiempo de diseño, ya que todo lo haces en ejecución.

bienvenida a los foros y te recomiendo la guía de estilo
__________________


Última edición por ContraVeneno fecha: 14-03-2009 a las 16:56:14.
Responder Con Cita
  #3  
Antiguo 14-03-2009
Sole_l Sole_l is offline
Miembro
 
Registrado: mar 2009
Posts: 14
Poder: 0
Sole_l Va por buen camino
Gracias por responder, voy a probar como vos decis y despues te cuento
Responder Con Cita
  #4  
Antiguo 14-03-2009
Sole_l Sole_l is offline
Miembro
 
Registrado: mar 2009
Posts: 14
Poder: 0
Sole_l Va por buen camino
Aclaración

Hola de nuevo

Mira lo he probado y no funciona salta el mismo error pero ahora el parametro que nombra el mensaje de error es dato.
La definición de estos dos parametros, dato y nom la he realizado en tiempo de diseño, es decir, entre en el componente ADOQuery1 dentro de las propiedades y seleccioné parameters. Cuando defini dato que era el que con el codigo original si me funcionaba lo defini asi:
Atributes: paNullable
DataType:IfInteger
Name:dato
Precisión:10
Size:4
Value:Null (las demas propiedades que faltan no las toque)
Ahora cuando defino nom, que es el que se debe cargar con un dato char(35)
bueno creo que ahi esta mi problema, que tipo de dato le deberia colocar????
y no entiendo bien que son estas propiedades:
atributes, precision y size (si se que es tamaño pero de que??).
Tal ves si me ayudan con eso pueda arrancar.
Muchas gracias
Responder Con Cita
  #5  
Antiguo 17-03-2009
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Poder: 23
ContraVeneno Va por buen camino
Cita:
Empezado por ContraVeneno Ver Mensaje
Si lo haces de esta forma, no necesitas definir nada en tiempo de diseño, ya que todo lo haces en ejecución.
10 repetidores caracteres
__________________

Responder Con Cita
  #6  
Antiguo 17-03-2009
Avatar de rcarrillom
[rcarrillom] rcarrillom is offline
Miembro Premium
 
Registrado: dic 2004
Ubicación: UK / North Sea / Norway / Golfo de México / Frente a mi Laptop
Posts: 219
Poder: 20
rcarrillom Va por buen camino
Cita:
Empezado por ContraVeneno Ver Mensaje
10 repetidores caracteres
Pa'su'mecha, con razón son gurús, no entendí nada la solución

Ya en serio, Sole_l, estás incluyendo los dos puntos antes del nombre de los parámetros dentro de la sentencia SQL?
__________________
eLcHiCoTeMiDo - Rompecorazones profesional
Yo no soy presumido; ¿Pero de qué sirve mi humilde opinión contra la de los espejos?
Salva a un nylon, usa prendas de piel de foca
Responder Con Cita
  #7  
Antiguo 17-03-2009
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por rcarrillom Ver Mensaje
Pa'su'mecha, con razón son gurús, no entendí nada la solución
La verdad que a mi también me rebasa. Aún recuerdo cuando era un novatillo y todavía conversaba con él. Ahora que es gurú, como que ya no le entiendo mucho .

Por no dejar, tratemos de aclarale a Sole_l la situación.

En una consulta SQL, los parámetros no se agregan directamente en la propiedad Parameters, sino que deben indicarse en la misma consulta anteponiendo dos puntos a cada parámetro:

Código:
update cliente set nombre_apellido = :nom where id_cliente= :dato
Cuando hagas esto, al entrar a la propiedad Parameters verás que el componente ya añadió en automático los parámetros y tú sólo debes especificar el tipo de datos del parámetro, e incluso es posible que te puedas ahorra este paso.

// Saludos
Responder Con Cita
  #8  
Antiguo 17-03-2009
Avatar de ContraVeneno
ContraVeneno ContraVeneno is offline
Miembro
 
Registrado: may 2005
Ubicación: Torreón, México
Posts: 4.738
Poder: 23
ContraVeneno Va por buen camino
a caray... ¿gurú?, ¿yo?

lejos, si apenas estoy aprendiendo a usar delphi.

A lo que me refería con el mensaje, que ya lo había dicho en mi primer mensaje y por eso lo repetí, es que por lo que Sole comenta, está haciendo la asignación de parámetros en tiempo de diseño. Pero si utiliza la forma que le sugerí, eso no es necesario ya que todo se hace por código en ejecución.

estoy 100% que el ejemplo que puse funcionaría perfectamente (al menos con ADO y SQL Server) y el error viene de otro lado. Lo más probable es que no tenga los dos puntos como menciona Román.

Pero repito, si lo hace con el ejemplo que le pasé, no se tiene que hacer nada en tiempo de diseño.


y lo de los 10 caracteres es porque el vbulletin no me deja poner solo una cita (Quote) si no escribo al menos 10 caracteres...
__________________


Última edición por ContraVeneno fecha: 17-03-2009 a las 21:02:45.
Responder Con Cita
  #9  
Antiguo 21-03-2009
Sole_l Sole_l is offline
Miembro
 
Registrado: mar 2009
Posts: 14
Poder: 0
Sole_l Va por buen camino
Gracias

Hola, gracias a todos los que respondieron, les cuento que al final lo pude resolver y no utilice parametros pero como me quede con la inquietud voy a probar haber si me resulta como ustedes me dicen.
Muchas Gracias
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Refrescar un adoquery sin recargarlo en mysql Rako SQL 1 21-10-2008 11:24:38
Copia de Parameters en ADOQuery hades2600 Conexión con bases de datos 4 22-11-2007 00:24:07
Problema con AdoQuery marylobita Conexión con bases de datos 3 04-05-2006 19:17:54
Problema con ADOQuery Sr.Scorpion Conexión con bases de datos 8 17-04-2005 20:53:02
Problema ADOQuery GIVO Providers 1 29-08-2003 17:30:58


La franja horaria es GMT +2. Ahora son las 00:41:48.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi