Linked manager in access 2007

[Pitje1958]

Heb een database waarin de tabellen gelinkt worden met de linked manager in access 2007, maar nu is men vraag. Hoe kan het venster met waar in alle gelinkten tabellen opruimen zodat alleen de gebruikten tabellen overblijven of kan men dat niet meer in access 2007.


Groeten


Paul.

 

[Guus2005]

je moet dan wel weten welke tabellen je gebruikt en welke niet.
Hieronder de code als je alle gelinkte tabellen wil verwijderen.

Public Sub RemoveAllLinkedTables()

    Dim tdfs As TableDefs
    Dim tdf  As TableDef

    Set tdfs = CurrentDb.TableDefs
    
    For Each tdf In tdfs
        If len(tdf.connect) > 0 Then CurrentDb.Execute "Drop table " & tdf.name
    Next tdf
End Sub

De tabellen worden niet fysiek weggegooid maar alleen verwijderd uit deze frontend.

HTH

 

[Pitje1958]

Bedankt voor je reactie, zal ik eens testen.


Groeten

Paul.