Einzelnen Beitrag anzeigen

AnfängerDelphi

Registriert seit: 20. Mai 2010
25 Beiträge
 
#1

Daten mit SQLDataSet in mysql-Datenbank schreiben

  Alt 29. Mär 2017, 20:42
Datenbank: Mysql • Version: 5.7 • Zugriff über: Delphi xe3
Hallo an alle,

ich möchte mehrere Datensätze in eine bestehende Datenbank schreiben.
Auf folgende Art und Weise habe ich es mal ausprobiert.
Code:
procedure TForm1.Button4Click(Sender: TObject);
var z : Integer;
begin
 
  SQLDataSet1.Close;
  for z := 5 to 10 do
  begin
  SQLDataSet1.CommandText :=
  'insert into datenbank_neu.Tabelle5 (spalte1,spalte2,spalte3)' +
  'select spalte5,0,spalte12' +
  'from datenbank_alt.Tabelle20 where datenbank_alt.Tabelle20.reihenfolge =' + IntToStr(z)+';';
  SQLDataSet1.ExecSQL;
Wenn ich auf den Button klicke,werde 6 Datensätze in die Datenbank geschrieben.

Ich benötige aber noch eine zweite Insert-Anweisung,für weitere Daten.
Die Daten sollen folgendermaßen geschrieben werden:
Zuerst Insert-Anweisung1,dann Insert-Anweisung2,Zähler um 1 erhöhen,dann wieder Insert-Anweisung1 und Insert-Anweisung2.... usw.

Kann ich einfach eine weitere Insert-Anweisung unter die vorhandene schreiben,oder muß ich ein weiteres DataSet anlegen und dort die Insert-Anweisung2 unter CommandText einfügen???


Gruß AnfängerDelphi
  Mit Zitat antworten Zitat