Modificar Registro

[agustin173]

AzidRain te voy a poner todo a ver si puedes dar con mi problema

Estoy usando sql server 2008, delphi 7 y componente adoquery

La estructura de la base de dato es la siguiente:

La base de dato se llama "Synapse" y la tabla "Itebis"

Estructura de la Tabla Itebis

Column Name Data Type Allow Nulls
------------------------------------------------------------------------
Codigo Int
Fecha Date
Itebis char(3)

Lo que deseo es modificar los datos solamente del campo itebis los demas se quedan igual.

Tengo un boton llamado modificar que es donde tengo el problema, puse el codigo siguiente pero no me funciono.

// Modifica los Datos en la Base de Datos
AdoItebiBuscar.SQL.Clear;
AdoItebiBuscar.Sql.Text:='Update Itebis set Itebis:= :Itebis where Itebis:= :itebis';
AdoItebiBuscar.Parameters.ParamByName('Itebis').Asstring:= EDItebiBuscar.text;
AdoItebiBuscar.ExecSQL;
ShowMessage('Registro Modificado');

el .Asstring no me lo reconoce no se porque

cuando intento modificarlo me da el siguiente error:

project synapse.exe raised exception class econvert error with message 'objeto parameters mal definido. Se proporciono informacion incorrecta o incoherente. Process stopped. Use step or run to continue.

haber ahora si puedes ayudarme mejor con el codigo.

[Casimiro Noteví]

Empezado por agustin173

// Modifica los Datos en la Base de Datos
AdoItebiBuscar.SQL.Clear;
AdoItebiBuscar.Sql.Text:='Update Itebis set Itebis:= :Itebis where Itebis:= :itebis';
AdoItebiBuscar.Parameters.ParamByName('Itebis').Asstring:= EDItebiBuscar.text;
AdoItebiBuscar.ExecSQL;
ShowMessage('Registro Modificado');

'Update Itebis set Itebis:= :Itebis where Itebis:= :itebis';

Esa sentencia tiene DOS parámetros y sólo estás pasándolo Un parámetro.

Piensa en esto:
update tablaTrabajadores set sueldo=2000 where codigotrabajador=25

Como ves, hay DOS parámetros también.

Entonces, si tú quieres cambiar el valor del campo itebis a todos los que cumplan una condición tienes que pasarle los DOS parámetros, por ejemplo:

update TABLAitebis set CAMPOitebis=VALORQUEQUIERAS where CAMPOitebis='XXX'

Si quieres cambiar todos los registros que tengan el valor 'AAA' en el campo itebis, y quieres ponerle el valor 'GGG', entonce sería:

Código Delphi [-]
update itebis set itebis='GGG' where itebis='AAA'
AdoItebiBuscar.Parameters.Params[0].Asstring:=  EDItebiBuscar.text;  <---  VALOR QUE QUIERES PONER
AdoItebiBuscar.Parameters.Params[1].Asstring:=  EDItebiAQuien.text;  <--- A QUÉ REGISTROS SE LOS QUIERES PONER

He puesto Params[0] y Params[1] porque los dos son el mismo campo y puede resultar confuso.

Te aconsejo encarecidamente un tutorial de SQL y además la lectura de un estupendo libro como La cara oculta de delphi.

[agustin173]

casimiro dejame ver si entendi

update itebis set itebis = editebisbuscar where itebis = editebisbuscar

casimiro hermano no entiendo puedes hacer el codigo para verificar mejor excusame es que no se mucho de programacion

[Casimiro Noteví]

Empezado por agustin173

casimiro dejame ver si entendi

update itebis set itebis = editebisbuscar where itebis = editebisbuscar

¿Yo he puesto eso?

Empezado por agustin173

casimiro hermano no entiendo puedes hacer el codigo para verificar mejor excusame es que no se mucho de programacion

Te aconsejo encarecidamente un tutorial de SQL y además la lectura de un estupendo libro como La cara oculta de delphi.


Creo que primero de todo debes aclarar PERFECTAMENTE una cosa: ¿Tú qué quieres hacer?

[agustin173]

por medio a un edit modificar un registro eso es lo que deseo

tengo un edit llamado editebibuscar y deseo modificar el campo itebis de una tabla

y no se como hacerlo

si puedes leer mas arriba veras la estructura de la tabla solo necesito el codigo para modificar ese registro

estoy usando adoquery.

por favor

[Casimiro Noteví]

Empezado por agustin173

por medio a un edit modificar un registro eso es lo que deseo tengo un edit llamado editebibuscar y deseo modificar el campo itebis de una tabla y no se como hacerlo si puedes leer mas arriba veras la estructura de la tabla solo necesito el codigo para modificar ese registro
estoy usando adoquery. por favor

Amigo agustin173, la forma de hacerlo y el código te lo hemos puesto ya varias veces, unos y otros.

Si tú quieres modificar el valor de un campo de un registro, entonces necesitas dos cosas: el valor que quieres darle al campo y el registro que quieres modificar. Son DOS parámetros. Tal y como te lo he explicado antes, para que lo veas con un ejemplo claro, te lo repito:

update tablaTrabajadores set sueldo=2000 where CodigoTrabajador=15
En ese código que he puesto se va a modificar el campo 'sueldo' del registro que corresponde al trabajador que tiene el codigo 15, ¿ok?, son DOS parámetros que necesito pasarle, hay muchas formas de hacerlo, por ejemplo, según tu código sería algo así:

Código Delphi [-]
AdoItebiBuscar.Sql.Text:='Update tablaTrabajadores set Sueldo:= :sueldo where codigo := :codigo';
AdoItebiBuscar.Parameters.ParamByName('sueldo').Asstring:= EditConElNuevoSueldo.text;
AdoItebiBuscar.Parameters.ParamByName('codigo').AsString:=  EditConElCodigoDelTrabajador.text;
AdoItebiBuscar.ExecSQL;

Pues sólo has de adaptarlo a tu código, ya sabes, necesitas el edit con el valor que quieras darle a tu campo y el edit con el valor del registro que quieres modificar, porque si no lo pones entonces modificaría todos los resgistros de la tabla.

Y no es por hacerme pesado, pero te aconsejo encarecidamente un tutorial de SQL y además la lectura de un estupendo libro como La cara oculta de delphi.

[agustin173]

Casimiro muchas gracias ya si funciono

Lo que sucede es que no se programar mucho gracias por tu paciencia y tambien a Azirain por su ayuda.

Casimiro baje el manual de sql y el de delphi que me enviaste lo voy a comenzar a estudiar


muchas gracias a todos.