<textarea class="cpp" rows="10" cols="60" name="code"> for(int i=0; iItems->Count; i ) { ADOQuery1->Close(); ADOQuery1->SQL->Clear(); ADOQuery1->SQL->Add("Insert into T values ('" X->Items->Strings[i] "', '" Y->Items->Strings[i] "'," String(Tm->Items->Strings[i].ToInt()) ", '" TRE->Items->Strings[i] "','" OK->Items->Strings[i] "', '" LClick->Items->Strings[i] "')"); ADOQuery1->ExecSQL(); } </textarea> 大家好.. X,Y,Tm,TRE,OK,LClick都是TListBox 而且裡面都有4000筆以上的資料... 但...寫入資料庫(Access)的速度很慢(需要10秒以上) 請問該怎麼做...才能加快寫入資料庫的速度呢?? 謝謝~~~

我想用 ADO 速度大概就這個樣子，提升也有限。
你可以考慮用 DAO 元件 Diamond Access 不過不是免費的

以下同樣的條件在我的平台得到的數據是如下
TADOQuery 約 20秒
TDAOQuery 約 10秒

<textarea class="cpp" rows="10" cols="60" name="code"> //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { ADOQuery1->Close(); DWORD t = GetTickCount(); for(int i=0;i<4000;i ) { ADOQuery1->SQL->Text = "insert into test values(\'" IntToStr(i) "\')"; ADOQuery1->ExecSQL(); } t = GetTickCount()-t; ShowMessage(AnsiString(t)); } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { DAOQuery1->Close(); DWORD t = GetTickCount(); for(int i=0;i<4000;i ) { DAOQuery1->SQL->Text = "insert into test values(\'" IntToStr(i) "\')"; DAOQuery1->Execute(0); } t = GetTickCount()-t; ShowMessage(AnsiString(t)); } //--------------------------------------------------------------------------- </textarea>

------
~§~迷時師渡，悟了自渡~§~