Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Duda UPDATE sql y delphi 7 (https://www.clubdelphi.com/foros/showthread.php?t=46510)

karlaoax 02-08-2007 16:24:40

Duda UPDATE sql y delphi 7
 
Hola de nuevo a todos, tengo una duda de este codigo. Es para actualizar varios campos de una tabla:

En un query tengo:
UPDATE productos
SET
nombre = :nombre, // Es un DBedit llamado DBnombre
descripcion = :descripcion, // Es un DBedit llamado DBdescripcio
fabricante = :fabricante, // Es un DBedit llamado DBfabricante
costo_uno = :costo_uno, // Es un DBedit llamado DBcosto_uno
WHERE
codigo = :codigo // Edit llamado TXTcodigo

y en mi boton:

MyTable1.Edit;
QueryUpdate.Close;
QueryUpdate.SQL.Clear;
QueryUpdate.SQL.Text:='UPDATE productos SET nombre='+DBnombre.Text+' WHERE codigo="'+txtcodigo.Text+'"';
QueryUpdate.Execute;
MyTable1.Post;
MyTable1.Refresh;

Y funciona perfectamente, ahora si quiero actualizar los otros 3 campos, es correcta esta apreciacion:

QueryUpdate.SQL.Text:='UPDATE productos SET nombre='+DBedit2.Text+
'descripcion='+DBdescripcio.Text+
'fabricante='+DBfabricante.Text+
'costo_uno='+DBcosto_uno.Text+
' WHERE codigo="'+txtcodigo.Text+'"';

No lo he implementado por que no tengo delphi a la mano, pero si me pueden orientar para saber si esta o no bien, se los agradecere mucho. :p

9.45 am MTY:
Ya consegui delphi y me marco un error, dice que es acerca de una columna desconocida, entonces debo tener mal una coma en mi codigo, lo voy a checar

poliburro 02-08-2007 17:09:14

solo te falta agregar una coma al final de cada asignación de valor, a excepción de la última.

karlaoax 02-08-2007 17:12:34

Cita:

Empezado por poliburro (Mensaje 219569)
solo te falta agregar una coma al final de cada asignación de valor, a excepción de la última.

Gracias Poliburro ya quedo al 100% :cool:


La franja horaria es GMT +2. Ahora son las 12:40:23.

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