List of open show stoppers todo

[Ruslan Zasukhin]

On 7/8/06 11:47 AM, "Dave Addey" <listmail1 at dsl.pipex.com> wrote:

> Hi Ruslan,
> 
> Thanks for this!
> 
> Bad news: I have tried adding in these calls to db.flush, and I still get
> the problem.  I added in the following line to my project:
> 
>   // insert lots of values
>   LogListBox.AddRow "About to insert values for the first time"
>   // and flush the database
>   TestDatabase1.Flush // <-- this line has been added
>   // diagnose the library to a file
>   WriteDiagnostics(TestDatabase1, DateString+"
> Diagnostics_1_after_first_insert.txt")

I have add that line here

  
  Dim newRecID as integer
  Dim i as integer
  
  Dim NumberOfRecordsToInsert as integer
  NumberOfRecordsToInsert = Val(EditField1.Text)
  
  for i = 1 to NumberOfRecordsToInsert
    inDatabase.TestTable.SetBlank(EVValueAccess.forAdd)
    inDatabase.TestTable.TestVarChar.Value = inValue
    newRecID = inDatabase.TestTable.AddRecord
  next
  
    inDatabase.flush

  LogListBox.AddRow "Added "+Str(NumberOfRecordsToInsert)+" VarChar records"


-- 
Best regards,

Ruslan Zasukhin
VP Engineering and New Technology
Paradigma Software, Inc

Valentina - Joining Worlds of Information
http://www.paradigmasoft.com

[I feel the need: the need for speed]