Registriert seit: 21. Aug 2004
Ort: Lengerich
658 Beiträge
RAD-Studio 2009 Ent
|
Auto-Insertwert abfragen
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.
|