[Frage] Auslesen von Tabellen einer MDB

[marabu]

Hi,

die Namen der Tabellen kannst du einfach über die Methode GetTableNames() der ADOConnection ermitteln. So ziemlich alles was das Herz begehrt erhält man über die ADO Extensions (ADOX):

Delphi-Quellcode:

uses
  ADOX;

procedure GetViews(views: Views; s: TStrings);
var
  i: Integer;
  v: View;
begin
  for i := 0 to Pred(views.Count) do
  begin
    v := views.Item[i];
    s.Values[v.Name] := VarToStr(v.Get_Command.CommandText);
  end;
end;

Grüße vom marabu