DbImport hängt sich auf

**blondervolker**

Hallo,
versuche aus meiner Access DB nach Absolut DB, vier Felder mit ca. 17000 Datensätzen zu importieren.(Erstversuch)
Aber bei ca.1400 Datensätzen hängt sich die Exe auf,(keine Rückmeldung).

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Button2Click(Sender: TObject);

begin

//Übernahme Import Accdb Anfang

  ADOTable1.First;

  while not ADOTable1.Eof do begin

   AbsTable1.Edit;

    AbsTable1.Insert;

     AbsTable1.FieldByName('Preis').AsString := ADOTable1.FieldByName('Preis').AsString;

      AbsTable1.FieldByName('DEU').AsString :=  ADOTable1.FieldByName('DEU').AsString;

       AbsTable1.FieldByName('ENG').AsString :=  ADOTable1.FieldByName('ENG').AsString;

        AbsTable1.FieldByName('ITA').AsString :=  ADOTable1.FieldByName('ITA').AsString;

          ADOTable1.Next;

            AbsTable1.Post;

//Übernahme Import in Absolute DB Ende

end;

end;

DbImport hängt sich auf

DbImport hängt sich auf

Forumregeln