Hallo,
ich müsste mittels
ADO.Net auf eine Oracle-Datenbank zugreifen. Nachdem in diesem Fall die Daten in einer Klasse ausgewertet werden, ist der Einsatz von visuellen Komponenten nicht sinnvoll.
Ich habe also eine OracleConnection und ein OracleCommand erzeugt. Nach dem Öffnen kann man alles machen, nur keine Daten abrufen
.
Delphi-Quellcode:
DBConn := OracleConnection.Create(sConnString);
Cmd := OracleCommand.Create(fSQL, DBConn);
DBConn.Open;
DRead := Cmd.ExecuteReader;
if DRead.HasRows then
begin
fName := DRead.GetString(1); // geht nicht
fPosition := DRead.GetOrdinal('NAME'); // geht
fName := DRead.GetName(1); // geht
fAnzahl := DRead.FieldCount;// geht
fDatensaetze := 1;
while DRead.Read do
begin
Inc(fDatenSaetze); // geht
// ...
end;
// ...
end;
DBConn.Close;
Ich kann also die Datenmenge öffnen, Namen und Position der Datenfelder, sowie weitere Infos abfragen, in einer Schleife durch die Datenmenge iterieren, aber sobald ich einen Feldwert abfrage, wie z.B.
Code:
fName := DRead.GetString(1);
, erhalte ich die Fehlermeldung "Für diese Zeile oder Spalte sind keine Daten vorhanden.".
Die Daten sind aber vorhanden und ich erhalte beim Ausführen der
SQL-Abfrage in einem
SQL-Utility als Ergebnis 717 Datensätze - dasselbe Ergebnis, wie ich in obigem Codeschnippsel in der Variable fDatenSaetze bekomme.
Sobald ich an Stelle der Select-Abfrage in obigem Code eine Insert- oder Update-Abfrage einsetze und Cmd.ExecuteNonQuery aufrufe, funktioniert alles perfekt.
Was könnte hier die Ursache sein und wie kann man das beheben?
Viele Grüße und besten Dank im Voraus
Alfons