![]() |
Datenbank: Access • Version: 2007 • Zugriff über: ADOConnection
ID des letzten Datensatzes ermitteln
Hallo Zusammen,
ich habe ein Problem mit folgender Abfrage:
Delphi-Quellcode:
Ich möchte die höchste ID der Tabelle ermitteln und ausgeben, erhalte aber folgende Fehlermeldung:
procedure Tfrm_Kunden.BitBtn1Click(Sender: TObject);
VAR Result : Integer; begin inherited; With dm_Kunden Do Begin ADOQuery_Kunden.Active := False; ADOQuery_Kunden.SQL.Clear; ADOQuery_Kunden.SQL.Text := ('Select max(ID) AS Temp From Kunden'); ADOQuery_Kunden.Open; Result := ADOQuery_Kunden.FindField('Temp').asInteger; End; BitBtn1.Caption := IntToStr(Result); end; ADOQuery_Kunden: Das Feld 'ID' wurde nicht gefunden. Das Feld 'ID' existiert aber in der Tabelle. Die exakt gleiche Fehlermeldung erhalte ich auch, wenn ich ID mit Kundennummer ersetze - beide sind nicht identisch. Vielleicht kann mir jemand helfen. Danke. Gruss Dieter [edit=Sharky]Tags korrigiert. Mfg, Sharky[/edit] |
Re: ID des letzten Datensatzes ermitteln
Versuch mal
Delphi-Quellcode:
Result := ADOQuery_Kunden.FieldByName('Temp').asInteger;
|
Re: ID des letzten Datensatzes ermitteln
Danke.
Das hatte ich bereits versucht - mit dem selben Ergebnis. |
Re: ID des letzten Datensatzes ermitteln
Besitzt die Tabelle den ein Feld mit der Bezeichnung ID?
|
Re: ID des letzten Datensatzes ermitteln
Ja, die Tabelle besitzt das Feld ID
|
Re: ID des letzten Datensatzes ermitteln
Ist die datenbank eventuell case-sensitve?
Vielleicht heißt das Feld ja "id" |
Re: ID des letzten Datensatzes ermitteln
Wenn du eine Access-DB benutzt, dann öffne die DB doch mal in Access und dann bau dir die Abfrage in Access selber so lange, bis das richtige Ergebnis raus kommt.
Dann Copy&Paste nach Delphi und dann sollte es funktionieren. Wenn nicht, dann passt etwas an der Kommunikation zwischen der Komponente und der Datenbank (mglw. Berechtigung?) cu Oliver |
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:11 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz