Thema: Delphi Auto-Insertwert abfragen

Einzelnen Beitrag anzeigen

Benutzerbild von emsländer
emsländer

Registriert seit: 21. Aug 2004
Ort: Lengerich
658 Beiträge
 
RAD-Studio 2009 Ent
 
#7

Re: Auto-Insertwert abfragen

  Alt 1. Okt 2008, 13:15
Zitat von Jelly:
Einfach nach dem Post den Wert in einer getrennten Abfrage auslesen.
select Scope_Identity() (Scope_Identity() ist besser geeignet weil @@identity den wirklich letzten Auto Wert der aktuellen Session zurückgibt. Führt ein Insert in eine Tabelle einen InsertTrigger aus, der selbst wieder in eine andere Tabelle mit Autoinc Wert was einfügt, so gibt dir @@identity diesen letzten Wert zurück.

Angst um parallelen Zugriff muss man übrigens nicht haben, weil dieses Ganze Identity Auslesen Session bezogen ist, sich also auf eine Connection bezieht.

Blöde Frage: Wie baue ich diesen: select Scope_Identity() in dieses Konstrukt ein?

Delphi-Quellcode:
  with _query do begin
    connection := mus_Service.ADOConnMUS;
    try
      sql.Text := _stmp;
      open;
      insert;
      FieldValues['Datum_und_Zeit'] := Datum_und_Zeit;
      FieldValues['SenderIP'] := SenderIP;
      FieldValues['eMail'] := eMail;
      FieldValues['Telefon'] := Telefon;
      FieldValues['Mobile'] := Mobile;
      FieldValues['Art'] := Art;

      post;
      result := ????? <======== HIER
      _query.Close;
    finally
      freeandnil(_query);
      result := 0;
    end;
  end;


Gruss

EL


Narben am Körper sind ein Zeichen dafür, das man gelebt hat.
Narben auf der Seele sind ein Zeichen dafür, das man geliebt hat.
  Mit Zitat antworten Zitat