HILFE - Wie kann ich eine Datenbank nach Tabellen durchforsten?

[sra]

Hallo

Ich muss gerade ein Programm schreiben (bis morgen), welches mir in einer Datenbank alle Tabellen raussucht, die mit einem "tblPersImport_" anfangen, aber danach beliebig weitergehen. In diesen Tabellen muss ich dann alle Einträge löschen, die die jeweilige Personalnummer beinhalten.

Zweites ist kein Problem, aber wie kann ich die Datenbank nach den Tabellen durchsuchen?
Wenn ich nicht weiss wie die Tabellen heissen, und wie viele es sind, kann ich sie ja auch nicht löschen. Ist ne Access Datenbank, ich arbeite mit DAO und vb6.

Vielen Dank im Voraus

 

[Merlin_78]

Hi sra,

mit der TableDefs-Funktion kannst du die Anzahl der Tabellen und deren Namen bestimmen.

For nx = 0 To db.TableDefs.Count - 1
Debug.Print db.TableDefs(nx).Name
Next