Ver Mensaje Individual
  #3  
Antiguo 18-02-2008
odrack odrack is offline
Miembro
 
Registrado: feb 2008
Posts: 167
Reputación: 17
odrack Va por buen camino
Enviar datos a una tabla igualando un campo

Primero perdon, no soy muy bueno explicandome, jiji, Este es el fragmento de codigo y lo que necesito es que cuando se envien los datos a la otra base de datos se actualicen con estos, pero no se como igualar los campos para que se actualice.

procedure TForm12.Button1Click(Sender: TObject);
begin
form12.Table3.DatabaseName:='ventas';
form12.Table3.TableName:='articulos';
form12.DataSource3.DataSet:=form12.Table3;
form12.DataSource3.DataSet.Active:=true;
form12.Table3.UpdateRecord;
form12.Table3.FieldByName('fechaTraspaso').AsString:=dbedit1.Text;
form12.Table3.FieldByName('indalmacen').AsString:=edit1.Text;
form12.Table3.FieldByName('clvarticulo').AsString:=dbedit4.Text;//igualar por articulo
form12.Table3.FieldByName('descripcion').AsString:=dbedit2.Text;
form12.table3.FieldByName('existencias').AsString:=edit2.Text;
form12.Table3.Post;
form12.Table3.Close;
form12.Table3.Open;
end;
Responder Con Cita