Ver Mensaje Individual
  #9  
Antiguo 04-02-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 27
Caral Va por buen camino
Hola
No se, algo asi???:

Código Delphi [-]
adoquery1.close;
Adoquery1.sql.Text:= 'select * from lín_art '+
                       'where cod_lin = '+edit1.text+
                     ' and lin_desc = ' +edit2.text;
 Adoquery1.open;
 If adoquery1.eof then
 Begin
 Adoquery1.close;
 Adoquery1.sql.Text:= 'insert into lin_art Values ('+Edit1.Text+ ','+Edit2.Text+')';
 Adoquery1.execsql;
 End
 End
Saludos
__________________
Siempre Novato

Última edición por Caral fecha: 04-02-2012 a las 22:19:57.
Responder Con Cita