Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi Datensatznummer des neu angelegten DS herausfinden (https://www.delphipraxis.net/62670-datensatznummer-des-neu-angelegten-ds-herausfinden.html)

blawen 7. Feb 2006 23:13

Datenbank: MySQL • Zugriff über: ZEOS

Datensatznummer des neu angelegten DS herausfinden
 
Hallo Zusammen

Ich habe zwei Tabellen:
- Kontaktdaten (Name, Adresse, etc.)
- Mitarbeiter (PersonalNr, Interne Mailadresse, etc.)

Beim erfassen eines neuen Mitarbeiters speichere ich zuerst die allgemeinen Daten in der Kontaktdaten-Tabelle:
Delphi-Quellcode:
ZQ.SQL.Text :='Insert Into KONTAKTDATEN Set Name = :Name,....(etc.)'
ZQ.ExecSQL;
Als nächstes möchte ich die spezifischen Mitarbeiter-Daten speichern und hierbei habe ich folgende Problematik:
Die Datensatznummer des soeben erzeugten Datensatzes (Kontaktdaten) dient mir als Verweis (ID) innerhalb der Mitarbeiter-Tabelle.
Da ExecSQL keine Datenmenge zurückliefert*, ist mir die dringend benötigte Datensatznummer jedoch nicht bekannt.
Wie kann ich die Datensatznummer des soeben erstellten DS herausfinden?**

Besten Dank
Blawen

*Versuche mit ZQ.Open, bzw. ZQ.Activ := True führten zu keinem brauchbaren Ergebnis (Fehlermeldung: "Can not open a ResultSet")
**Den letzten DS in der Tabelle kann ich ja nicht nehmen, da bereits ein anderer Benutzer auch einen DS gespeichert haben könnte. Eine Abfrage mit Hilfe der soeben eingegebenen Daten ist zwar möglich aber es gibt doch sicherlich einen einfacheren Weg?

Igotcha 7. Feb 2006 23:14

Re: Datensatznummer des neu angelegten DS herausfinden
 
Das geht mit LAST_INSERT_ID() als Query.

Delphi-Quellcode:
Query1.SQL.Text:='SELECT LAST_INSERT_ID()';
Gruß Igotcha

blawen 7. Feb 2006 23:25

Re: Datensatznummer des neu angelegten DS herausfinden
 
Hallo Igotcha

Besten Dank, klappt wunderbar :-)

Gruss
Blawen


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:10 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz