Ver Mensaje Individual
  #9  
Antiguo 30-05-2008
Aleh Aleh is offline
Miembro
 
Registrado: dic 2007
Posts: 15
Reputación: 0
Aleh Va por buen camino
Pues mira, tengo un EDIT, y meto un numero oK???, pulso el boton y se realiza la insercion en la BD.
Pero cuando voy a meter otro numero, la segunda vez falla. Probablemente no libero algo bien, aqui dejo el codigo del boton al hacer click:

Código Delphi [-]
    SQLadd.Open;
    SQLadd.SQL.Clear;
    SQLadd.SQL.add('update stocks set cantidad=cantidad+'+cantidad.text);
    SQLadd.SQL.add('where sucursal='''+GRIDStocks.DataSource.DataSet.FieldByName('sucursal').AsString+'''');
    SQLadd.SQL.add('and telefono='''+GRIDStocks.DataSource.DataSet.FieldByName('telefono').AsString+'''');
    SQLadd.ExecSQL();
    SQLadd.Close;
    SQLStocks.Active;
    CDSStocks.Refresh;
    GRIDStocks.refresh;
    Showmessage('Se han añadido '+cantidad.text+' unidad/es del teléfono seleccionado en la sucursal seleccionada.');

Lo de cerrar lo puse después, pero no evita el problema.
Responder Con Cita