关于数据集合插入/更新的问题**

ccyy0112

我想执行从一个数据集合的数据插入到另外一个数据集合中 如果第一个数据集合里已经有数据了 就对第二个集合进行更新
如果没有就插入数据 下面的代码有问题 每次只能插入一条数据 ，而且还报错 请帮忙看一下 谢谢了
datasethuizhong1.DataSet.Open;
datasethuizong.DataSet.Open;

for i:=0 to  datasethuizhong1.DataSet.RecordCount do
   begin
     xmmc := datasethuizhong1.DataSet.FieldByName('MC1').AsString;
     if(datasethuizhong1.DataSet.FieldByName('MC1').AsString = datasethuizong.DataSet.FieldByNam('XMMC').AsString)                          then
        begin
          xmmc := datasethuizhong1.DataSet.FieldByName('MC1').AsString;
          xmszbm := datasethuizhong1.DataSet.FieldByName('BM1').AsString;

          datasethuizong.DataSet.RefreshRecord;
          datasethuizong.DataSet.FieldByName('XMMC').Value :=xmmc;
          datasethuizong.DataSet.FieldByName('XMSZBM').Value :=xmszbm;
          datasethuizong.DataSet.Post;
        end
        else
        begin
          xmmc := datasethuizhong1.DataSet.FieldByName('MC1').AsString;
          xmszbm := datasethuizhong1.DataSet.FieldByName('BM1').AsString;
          datasethuizong.DataSet.Insert;
          datasethuizong.DataSet.FieldByName('XMMC').Value :=xmmc;
          datasethuizong.DataSet.FieldByName('XMSZBM').Value :=xmszbm;
          datasethuizong.DataSet.Post;
        end
     end;
        datasethuizong.DataSet.ApplyUpdates(false);

atiger

datasethuizhong1.DataSet.RecordCount   这个你是要获取数据集中的记录个数吧,如果做循环应该-1.

报错,楼主你跟踪过吗?是哪句代码呢?报的是啥错误呢?

aDragon

datasethuizhong1.DataSet的数据什么时候记录滚动了呢

ccyy0112

我把事件写到 一个按钮的单击事件中了，
datasethuizong.DataSet.RefreshRecord;这句话报错

aDragon

datasethuizong.DataSet.RefreshRecord
改成
datasethuizong.DataSet.Post；