Einzelnen Beitrag anzeigen

Benutzerbild von Ricane
Ricane

Registriert seit: 21. Mär 2003
Ort: Quickborn
170 Beiträge
 
Delphi 7 Architect
 
#1

ORACLE und Tabellennamen auslesen...

  Alt 8. Aug 2003, 07:24
Moin,

ich habe ein Problem bei dem auslesen der Oracle Tabellen. Mit folgendem Source lese ich die ORACLE - Tabellen aus.

Beim ersten auslesen, nach Programmstart, funktioniert das auch wunderbar, aber sobald ich das ganze noch einmal versuchen möchte, komme folgende Fehlermeldung...

Die Datenmenge unterstützt keine Positionsmarken, die von Multi-Datensatz-Elementen benötigt werden

Hier mein "Auslese - Source"

Code:
    db_Datamodule.DataModule1.ADODataSet3.Active := False;
    db_Datamodule.DataModule1.ADODataSet3.CommandText :=
      'select * from all_catalog';
    db_Datamodule.DataModule1.ADODataSet3.Active := True;
    For I := 1 To (DataModule1.ADODataSet3.RecordCount - 1) Do
    Begin
      DataModule1.ADODataSet3.RecNo := I;
      cbTabellen.Items.Add(grdData.Fields[1].Text);
    End;
Die ADODataSet3 - Komponente habe ich nur zum auslesen der Tabellennamen und Spaltennamen. Sie ist mit einem DBGrid verbunden. Beim auslesen von SQL, bzw. ACCESS DB´s benutze ich folgenden Code:

Code:
    Tabellen := TStringList.Create;
    Db_DataModule.DataModule1.ADOConnection1.GetTableNames(Tabellen, False);
    For I := 0 To (Tabellen.Count - 1) Do
      cbTabellen.Items.Add(Tabellen[I]);
Der klappt auch so oft wie man möchte... liegt wohl daran, das es eine eigene Methode ist, und kein SQL - String...


Grüsse,

Ricane
Hendrik
So much to Code... so less Time....

www.RicaneSoftware.de
  Mit Zitat antworten Zitat