[access] Hoe tablenamen gelijk overal veranderen

[Rodyman]

Hoi, ik zit met ms access 97 en heb een complete database hier liggen met de bijbehorende queries enzo..

Maar het probleem is dat de naamgeving van heel de database niet klopt.. Dus dat moet allemaal anders, maar als ik de naam van een table verander moet ik hem ook met de hand in alle querys enzo veranderen.
En dit is NOGAL een database. Dus ik heb weinig zin om overal alle namen met de hand te vervangen. Kan dit niet makkelijker? misschien dat iemand hier toevallig iets voor weet?

[Janoz]

Zit er niet 1 of ander refactor achtig iets in access?

[Verwijderd]

code:

    Dim dbsNorthwind As Database
    Dim tdfNew As TableDef
    Dim tdfLoop As TableDef
    Dim prpLoop As Property

    Set dbsNorthwind = CurrentDb

    ' Create new TableDef object, append Field objects
    ' to its Fields collection, and append TableDef
    ' object to the TableDefs collection of the
    ' Database object.

        ' Enumerate TableDefs collection.
        For Each tdfLoop In dbsNorthwind.TableDefs
            If Left(tdfLoop.Name, 4) = "dbo_" Then
                tdfLoop.Name = Mid(tdfLoop.Name, 5)
            End If
        Next tdfLoop

[Rodyman]

hmm nou ik bedoel eigenlijk meer zoiets van of er een functie is die zodra ik een tablenaam verander in access, dat deze ook gelijk in alle queries mee veranderd zegmaar.

[Verwijderd]

Bij mij weten niet maar check s bij http://www.mvps.org/access.
BTW, let ook op reports en forms, daar moet je natuurlijk ook nog het eea aanpassen. Succes.

[Verwijderd]

Misschien kan het ook via de systeem tabellen, die moet je dan wel even aan zetten / zichtbaar maken en een gebruiker aanmaken die daar in mag lezen/schrijven.

[Rodyman]

hmm nja ik ben nu maar met de hand begonnen, lekker alle forms, queries enzo nalopen. Er zal niks anders op zitten denk ik. Toch bedankt iedereen!