Ver Mensaje Individual
  #5  
Antiguo 23-02-2008
schaka schaka is offline
Miembro
 
Registrado: feb 2008
Posts: 30
Reputación: 0
schaka Va por buen camino
Bueno mostrare ahora un metodo que he creado para recuperar los datos de un dbgrid llamado DProductos para despues insertarlos en una tabla, pero no me inserta valores nulos y me manda este mensaje "can not open a resultset" , pongo a continuacion mi metodo,
Código Delphi [-]
procedure TFMain.BAgregarClick(Sender: TObject);
var consulta,clave,producto,preciou,preciov:String;
begin
  clave:=DProductos.Fields[0].AsString;
  producto:=DProductos.Fields[1].AsString;
  preciou:=DProductos.Fields[4].AsString;
  preciov:=DProductos.Fields[3].AsString;

   Remision.close;
   Remision.sql.clear;
   consulta:='INSERT INTO remision VALUES(clave,producto,preciov,preciou)';
    Remision.SQL.Add(consulta);
    Remision.Open;

end;
Responder Con Cita