ADO Tabellenanzahl u. Name ermitteln ohne DKomponente

Tana´Ri · Beiträge: 230

Hi Leute ich hab ma ne gute frage,

wie kann die Anzahl der Tabellen in ner DB mit ADO und deren Name ermitteln werden, ohne Delphi Komponenten zu benutzen ?

vielen dank für jeglich Input das weiterbringt

_________________
mfg
Tana´Ri

dany · Beiträge: 38

wäre systables eine Idee?

_________________
Wenn du den Kopf in den Sand steckst, kuckt dein Hinterteil immer noch raus.

Tana´Ri · Beiträge: 230

systables ?? :oops:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

procedure TForm1.Button1Click(Sender: TObject);
 var Conn : OleVariant;
 begin

  conn := CreateOleObject('ADODB.Connection');  
                                 { or 'ADODB.recordset' }
  try
   conn.Provider := 'Microsoft.Jet.OLEDB.4.0';
   conn.open ('c.\testDB\db1.mdb');
  finally 
   conn := Unassigned; { or VarNUll }
  end;
end;

jetzt muss ich nur noch wissen wie ich jetzt an die infos komm, sprich Anzahl und Namen der Tabellen (gesamt, als DB nehmen wir mal ne Access)

_________________
mfg
Tana´Ri

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme