PDA

Ver la Versión Completa : Como insertar datos en forma SQL


caifan_0883
06-11-2005, 23:28:17
Bueno antes que nada este es mi primer mensaje en el foro...
Estoy trabajando con MySql... Bueno mi problema es el siguiente...

Tengo unos edits, y lo que quiero es guardar a una tabla en MySql, pero de forma SQL, ya que me pidieron que lo hiciera de esta forma, ya que yo lo hacia de la siguiente manera, que creo esta mal...


Table1.Append;
Table1.FieldByName('clave').AsInteger:=StrtoInt(edclave_captura);
Table1.FieldByName('nombre').AsString:=ednom_captura;
Table1.Post;


Bueno asi es como lo hacia, mirando en hilo mire que hacen consultas con un Query y ademas utilizaban variables externas. que las declaraban
mas o menos asi...

Query1.ParamByName('variable').AsInteger:=StrtoInt(edclave_captura);

y despues en el Query1.SQL.Text:=('SELECT clave,nombre FROM mytabla WHERE clave= :variable');

Bueno lo que quiero hacer yo es insertar valores de mis edits a la tabla pero con los Querys (de forma SQL). Ya le intente de dos maneras como ustedes manejas los SELECT por medio de unos parametros o agregando '+Edit.Text';..... Pero no me funcionan.. Espero me puedan ayudar..

Gracias de antemano...

vtdeleon
06-11-2005, 23:33:42
Saludos

Select solo sirver para consultar o tener una vista, para insertar necesitas Insert
La sintaxis es/*Si solo es un registro*/
Insert into tabla (campo1,campo2)
values('blabla','blublu')
/*Si agregaras varios registro*/
Insert into tabla2 (campo1, campo2)
Select campo1,campo2 from tabla2

En otro sentido, bienvenido al Club y te invito a leer esto:
Guía de Estilo (clubdelphi.com/foros/guiaestilo.php), Etiquetas vB (clubdelphi.com/foros/misc.php?do=bbcode):=Delphi-SQL

caifan_0883
06-11-2005, 23:39:28
OK, Gracias..

Pero como seria insertado valores de EDITS

INSERT INTO tabla VALUES [Aqui no se como va, pero aqui quisiera que se agregaran los datos que tengo en los edits]

vtdeleon
06-11-2005, 23:48:21
Saludos


With query1 do
begin
Sql.Text:='Insert into tabla (campo1,campo2) values(:variable1,:variable2)';
ParamByName('variable1').AsString:='blablablabla';
ParamByName('variable2').AsInteger:=543;
ExecSql;
end;

caifan_0883
07-11-2005, 14:47:14
Gracias Vtdleon... Ahora mismo voy a probar...
Luego nos leemos, gracias de nuevo. :D

caifan_0883
07-11-2005, 19:38:49
gracias Vtdeleon, si me funciono. Por el momento todo va bien...
Gracias de nuevo, luego nos leemos. :D

micnick
28-12-2005, 06:39:49
Gracias!! esto es justo lo que yo buscaba! Amo los foros de clubdelphi! Gracias amigos esto puede no ser usual por lo regurlar tomas las respuestas que nos sirven y ya!!
Pero en esta ocacion quiero agradecer realmente a todos los que como ustedes preguntan y responden los mensajes en este foro.:D