title image


Smiley jetzt wird eine Msgbox mit allen Tabellennamen angezeigt
>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)



Ja, richtig!



Und wie schaffe ich jetzt, daß die 1.alle gelöscht werden? Und 2. auch dann, wenn die Tabellen in dieser Datenbank nur verknüpft sind, die Tabellen selber aber im Netz liegen?



Grüße

Margit




--- Grüße Margit **schwach in Vba** Version Acess 2002

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: