Auto-Insertwert abfragen

[emsländer]

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