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
Zitat
Baum-Darstellung
