我的程式要連到資料庫update一些資料，但是執行完會出現以下的錯誤 Project Project1.exe raised exception class ENoResultSet with message 'Error creating cursor handle' 我的程式碼如下 主要是根據register table找到subrecord table相關聯的項目 然後把pushdate填上現在的時間 void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString ip; Table1->First(); while(!Table1->Eof)//由register table找出訂閱者 { ip = Table1->FieldValues["IP"]; Query1->Close(); Query1->SQL->Clear(); Query1->SQL->Add("update subrecord set pushdate=Now()"); Query1->SQL->Add("Where subscriber = '" ip "'"); if(!Query1->Prepared)Query1->Prepare(); Query1->Open(); Table1->Next(); } }

忘了說程式是停在Query1->Open();這一行

arenmmmm, 您好 請改為如下，原因請查閱第007期電子報。 Query1->ExecSQL();    ================================= 涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 是非終日有，不聽自然無 天下本無事，庸人自擾之

可以了 謝謝