Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   updatear mi codigo con paramsbyname (https://www.clubdelphi.com/foros/showthread.php?t=70512)

Rofocale 25-10-2010 20:44:10

updatear mi codigo con paramsbyname
 
Código Delphi [-]
  SQL.Add('UPDATE unidades SET nombre = ''' + txtNombre.Text + ''',');
            SQL.Add('cuenta = ''' + txtClave.Text + ''',');
            SQL.Add('nombre2 = ''' + scateg + ''',');
            SQL.Add('fecha_umov = ''' + FormatDateTime('mm/dd/yyyy',Date) + '''');
            SQL.Add('WHERE clave = ' + IntToStr(iClave));
            ExecSQL;
            Close;

Buenas tengo ese codigo y quisiera hacerlo con parambyname y los sets con :cuenta :nombre2
me podrian decir mas o menos como es ? porque no me sale
gracias

Caral 25-10-2010 20:54:57

Hola
Código Delphi [-]
SQL.Add('UPDATE unidades SET nombre = :nom, cuenta = :cla, nombre2 = :nom2, fecha_umov = :FechU ');
SQL.Add('WHERE clave = :Clave1');
Parambyname('nom').Value:= txtNombre.Text;
Parambyname('cla').Value:= txtClave.Text;
Parambyname('nom2').Value:= scateg;
Parambyname('FechU').Value:= FormatDateTime('mm/dd/yyyy',Date);
Parambyname('Clave1').Value:=  IntToStr(iClave);
ExecSQL;
Saludos

Caral 25-10-2010 21:53:52

Hola
Mas:
Código Delphi [-]
SQL.Add('UPDATE unidades SET nombre = :nom, cuenta = :cla, nombre2 = :nom2, fecha_umov = :FechU ');
SQL.Add('WHERE clave = :Clave1');
Params[0].Value:= txtNombre.Text;
Params[1].Value:= txtClave.Text;
Params[2].Value:= scateg;
Params[3].Value:= FormatDateTime('mm/dd/yyyy',Date);
Params[4].Value:= IntToStr(iClave);
ExecSQL;
Saludos

Rofocale 26-10-2010 01:22:06

Gracias caral


La franja horaria es GMT +2. Ahora son las 05:03:41.

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