Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > MS SQL Server
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #13  
Antiguo 06-02-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola gianfranco.

Probá si de este modo te resulta más claro:
Código Delphi [-]
  with ADOQuery1 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM LIN_ART');
    SQL.Add('WHERE COD_LIN = :VALOR1 ');
    SQL.Add('AND LIN_DESC = :VALOR2');
    Parameters.ParamByName('VALOR1').Value:= Edit1.Text;
    Parameters.ParamByName('VALOR2').Value:= Edit2.Text;
    Open;
    if IsEmpty then
    begin
      Close;
      SQL.Clear;
      SQL.Add('INSERT INTO LIN_ART (COD_LIN, LIN_DESC)');
      SQL.Add('VALUES(:VALOR1, :VALOR2)');
      Parameters.ParamByName('VALOR1').Value:= Edit1.Text;
      Parameters.ParamByName('VALOR2').Value:= Edit2.Text;
      ExecSQL;
    end;
  end;
Eso tomando en cuenta los dos campos que has mencionado, si hay más campos para insertar, también los tendrás que incluir en la sentencia SQL.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Error ("not in edit or insert mode") en Update con ADOQuery miquellg SQL 8 16-05-2011 20:11:07
firebird y .net 2008 voldemmor .NET 0 27-11-2008 17:15:54
Win Server 2008 Casimiro Noteví Noticias 40 12-03-2008 23:37:43
Problema con Insert y Update en ADOQuery Moises22 SQL 15 11-01-2006 07:57:13
Insert me cierra otro Insert motrildelphi Conexión con bases de datos 0 05-05-2005 12:20:27


La franja horaria es GMT +2. Ahora son las 17:42:58.


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
Copyright 1996-2007 Club Delphi