|
안녕하세요
요새 계속 ADO를 잡고 있는데 진도가 안나가는 군요
자꾸 아래처럼 에러가 납니다.
왜 그런지, 어떻게 해야 하는 지 설명좀 부탁드리겠읍니다.
밑에 소스를 첨부합니다.
고수님들의 답변 부탁드리겠읍니다.
감사합니다.
<에러메시지>
"
키열에 대한 정보가 부족하거나 올바르지 않읍니다. 업데이트가 너무 많은 행에 영향을 주었읍니다.
"
또는
"
행을 업데이트할수 없읍니다. 일부값이 마지막으로 읽은 후에 바뀐것 같읍니다.
"
try {
sql="select RxShipID, RxReqLen, RxSize, RxFileName, User2 from TbTmpModemRx";
Query->SQL->Text="select RxShipID, RxReqLen, RxSize, RxFileName, User2 from TbTmpModemRx";
if(!Query->Prepared) Query->Prepared=true;
Query->Open();
for(i=0; i < Query->RecordCount; i++)
{
Query->Edit();
k=Query->Fields->Fields[4]->AsInteger;
Query->Fields->Fields[4]->AsInteger=k+1;
Query->Post();
i++;
if( i >= Query->RecordCount) break;
else Query->Next();
}
Query->Close();
}
catch(Exception &e)
{
AddStatus("Err:"+e.Message);
}
|