增加记录(循环&&SQL)
rbbtemp:
BBRQ CH1 CH2 DH
2003.01.01 新G 54559 0001
2003.01.01 新A 58417 0002
rbb:
BBRQ CH DH
2003.01.01 新G-54559 0001
2003.01.01 新A-58417 0002
增加完后,rbbtemp表重新增加一条空记录,可以继续输入以后的内容。
这是我通过循环做的代码(多处有问题,帮帮忙给修改一下!),如果用SQL应该怎么做?(最好给写点代码)
//循环替换字段
for (sjhjDataModule->rbbtempIBTable->First();!sjhjDataModule->rbbtempIBTable->Eof;sjhjDataModule->rbbtempIBTable->Next())
{
sjhjDataModule->rbbIBTable->Edit();
sjhjDataModule->rbbIBTable->FieldByName("BBRQ")->Value=sjhjDataModule->rbbtempIBTable->FieldByName("BBRQ")->Value;
ch1=sjhjDataModule->rbbtempIBTable->FieldByName("ch1")->Value;
ch2=sjhjDataModule->rbbtempIBTable->FieldByName("ch2")->Value;
sjhjDataModule->rbbIBTable->FieldByName("ch")->Value=ch1+"-"+ch2;
sjhjDataModule->rbbIBTable->FieldByName("DH")->Value=sjhjDataModule->rbbtempIBTable->FieldByName("DH")->Value;
//数据入库
sjhjDataModule->rbbIBTable->Post();
sjhjDataModule->IBTransaction1->Commit();//表就关闭了。
//重新增加空记录
sjhjDataModule->rbbtempIBTable->Active=false;
sjhjDataModule->rbbtempIBTable->EmptyTable();
sjhjDataModule->rbbtempIBTable->Active=true;
sjhjDataModule->rbbtempIBTable->Append();
}