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
 
#1

Auto-Insertwert abfragen

  Alt 1. Okt 2008, 13:03
Datenbank: MSSQL • Version: 2005 • Zugriff über: ADO
Moin,

wie kann ich in diesem Konstrukt den Autoinc-Wert abfragen?

Delphi-Quellcode:
  _stmp := 'select * from Akten';
  _query := Tadoquery.Create(nil);
  with _query do begin
    connection := mus_Service.ADOConnMUS;
    try
      _query.sql.Text := _stmp;
      _query.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 := xxx; // Hier die Abfrage
    finally
      freeandnil(_query);
      result := 0;
    end;
  end;
Die Table hat ein Feld mit dem Namen Aktenr, welches AUTOINC ist.

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