Hallo,
ich habe da ein Problem bezüglich eines Selects innerhalb eines Insert-Statements. Ich poste hier mal den Code:
Delphi-Quellcode:
Query.Active := false;
Query.SQL.Clear;
Query.SQL.Add('
INSERT INTO ortsteile (ortsteil, orte_id)');
Query.SQL.Add('
VALUES(:pOrtsteil, SELECT orte.id FROM orte WHERE orte.ort=:pOrt AND orte.plz=:pPLZ');
Query.Parameters.ParamValues['
pOrtsteil'] := sOrtsteil;
Query.Parameters.ParamValues['
pOrt'] := sOrt;
Query.Parameters.ParamValues['
pPLZ'] := sPLZ;
Query.ExecSQL;
Ich verwende als Datenbankkomponente
ADO.
Wie man in den ergänzenden Angaben sehen kann, verwende ich eine
Access 2003 Datenbank (*.mdb).
Ich versuche also ein INSERT in die Tabelle
ortsteile auszuführen und das Feld
orte_id soll den Wert aus der Tabelle
orte bekommen. Die
id in der Tabelle
orte ist ein Primary Key, also wird hier auch nur 1 Ergebnis zurückgeliefert.
Die Werte, die in den Parametern stehen, habe ich übrigens geprüft. Sie enthalten die korrekten Werte.
Der Fehler, der auftaucht, lautet:
Zitat:
Syntaxfehler. in Abfrageausdruck 'SELECT orte.id FROM orte WHERE orte.ort=? AND orte.plz=?'
Das SELECT-Statement an sich funktioniert (habe ich getestet) und wenn ich anstatt des SELECTs im INSERT einen variablen oder festen Wert nehme funktioniert es auch. Sobald ich allerdings das SELECT-Statement in die VALUES an 2. oder auch 1. Stelle schreibe funktioniert es nicht mehr.
Tabellennamen in eckigen Klammern schreiben führte auch nicht zum Erfolg.
Schreibe ich das SELECT-Statement allein als VALUE ins Statement, funktioniert es ebenfalls nicht. Folgendes Statement habe ich auch ausprobiert:
Code:
INSERT INTO ortsteile (ortsteile, orte_id) SELECT :pOrtsteil, orte.id FROM orte WHERE orte.ort=:pOrt AND orte.plz=:pPLZ
Das hat allerdings auch nichts gebracht. Es kam zwar keine Fehlermeldung, aber es wurde auch kein Eintrag in die Datenbank vorgenommen.
Es wäre nett, wenn jemand mir da helfen könnte.
Das Problem habe ich temporär gelöst, indem ich einfach 2 Statements verwendet habe, aber das kann ja nicht die Lösung sein.
mfg Winned
P.S: Habe im Internet schon gesucht aber noch nichts konnte bisher meinen Fehler beheben.