Registriert seit: 2. Mär 2004
5.508 Beiträge
Delphi 5 Professional
|
Re: Datensatz über Record -> in Access über SQL, Fehler?
20. Dez 2005, 19:59
Zitat von EvilCodein:
Delphi-Quellcode:
ClientsQuery.SQL.Clear;
ClientsQuery.SQL.Add('DELETE * FROM Clients');
ClientsQuery.ExecSQL;
while not Eof(ARDFile) do
begin
Read(ARDFile, ARDRecord);
ClientsQuery.SQL.Clear;
ClientsQuery.SQL.Add('INSERT INTO clients (ID, Anrede, Name, Street, PLZ, City, HomePhone, MobilePhone, Field3, Field4)');
ClientsQuery.SQL.Add('VALUES (:var1, :var2, :var3, :var4, :var5, :var6, :var7, :var8, :var9, :var10)');
DataArray[1] := ARDRecord.ID;
....
Ich danke euch fürs lesen und noch vielmehr für ideen, anregungen, vorschläge, oder gar hinweise...
Dein Delphicode sieht noch ziemlich anfängermässig aus.
Also: SQL-Anweisung sollten ausserhalb einer Schleife zusammengebaut werden.
Delphi-Quellcode:
ClientsQuery.SQL.Clear;
ClientsQuery.SQL.Add('INSERT INTO clients (ID, Anrede, Name, Street, PLZ, City, HomePhone, MobilePhone, Field3, Field4)');
ClientsQuery.SQL.Add('VALUES (:var1, :var2, :var3, :var4, :var5, :var6, :var7, :var8, :var9, :var10)');
while not Eof(ARDFile) do
begin
Read(ARDFile, ARDRecord);
.......
ClientsQuery.ExecSQL; // IN der Schleife nur noch benutzen
...
end;
Andreas
|