🚀 go-pugleaf

Hi,

/*------------- ADOQueryEx.h ----------------*/
class PACKAGE TADOQueryEx : public TADOQuery
{
public:
        void __fastcall BeginFastAdd();
        void __fastcall EndFastAdd();
};

/*------------- ADOQueryEx.cpp --------------*/

void __fastcall TADOQueryEx::BeginFastAdd()
{
 if (!ComponentState.Contains(csLoading))
   Close();
 (dynamic_cast<TStringList *>(SQL))->OnChange = NULL;
}

void __fastcall TADOQueryEx::EndFastAdd()
{
 (dynamic_cast<TStringList *>(SQL))->OnChange = QueryChanged;
 QueryChanged(SQL);
}

/*------------- example ------------*/
 ADOQueryEx->BeginFastAdd();
 try
  {
   ADOQueryEx->SQL->Clear();
   for (int i = 0; i < 1000; i++)
    ADOQueryEx->SQL->Add("INSERT MyTable (ColText) VALUES ('value')");
  }
 __finally
  {
   ADOQueryEx->EndFastAdd();
  }
  
 try
  {
   ADOQueryEx->ExecSQL();
  }
 catch(...)
  {
   ShowMessage("Error");
  }

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
Jaroslav.Blazek@access-it.cz
http://www.access-it.cz

"Jonny" <jonny@nospam.jonnywilk.co.uk> wrote in message news:<b5vimu$ruo$1$8302bc10@news.demon.co.uk>...
> Hi
> 
> I've got an application that needs to insert serval values into a table say
> between 100-1000 rows.  At the moment i've got an ADO connection to the
> database, and then using an ADO Query i've got an INSERT INTO statement
> that's placed in a for loop adding each row.
> 
> This, however, is REALLY slow!  What's the best way do this quickly
> 
> Thanks
> 
> 
> Jonny