title image


Smiley Re: funktioniert aber nicht richtig!
Probiers mal mit

Dim tdf As TableDef, db As Database, xString As String

Set db = CurrentDb

For Each tdf In db.TableDefs

xString = xString & tdf.Name & chr(13)

Next tdf

msgbox xString



dann müsstest du eine Meldung mit allen Tabellen bekommen (Auch Systemtabellen)
Ch. Bielmeier
aus Ludwigsburg
-MSAccess97/2000
-HTML/CSS
-C++
-PHP
-MySQL
-JS (Anfänger)
-VB6.0
-Visual Studio Express 2005 (Anfänger)


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: