Navigation

• Main Page

• Random Page
• Create a new Page
• All Pages
• Categories

• Administration
• File Management

• Login/Logout
• Language Selection
• Your Profile
• Create Account

Listet welche Tabellen in einer Datenbank angelegt sind?{BR}{BR}

Wie kann ich alle Tabellen einer DB auflisten

db_table = "gesuchte_tabelle"
database = "deineDB"

Set cat = CreateObject("ADOX.Catalog")
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
  Server.Mappath("/mdb/" & database & ".mdb")
cat.ActiveConnection = ConnStr
For Each tblList In cat.Tables
	If tblList.Name = db_table Then
    		' dann tu was ich will
	End If
Next