howtouse
Goto Top

Access 2000 Frontend Tabellenverknüpfung programmgesteuert ändern

Hallo Leute, folgendes Problem würde ich gern lösen:

wir setzen eine Software ein die als Datenbank eine SQL2000 DB einsetzt, Frontend ist Access 2000.
Die Tabellen von SQL sind im Access eingebunden, Abfragen finden in Access statt, Tabellenbeziehungen ebenfalls (SQL hat nur Tabellen und Trigger)

Mein Problem, wie kann man die Einbindung einzelner Tabellen in Access ändern ohne vorher die Einbindung zu löschen (Folge wäre das man die betroffenen Tabellenbeziehungen neu einrichten bzw herstellen müsste (-> RIESEN Arbeit)).

Kann man diese Problem irgendwie Programmgesteuert oder auch manuelle in Griff kriegen?

Content-Key: 78605

Url: https://administrator.de/contentid/78605

Printed on: April 24, 2024 at 06:04 o'clock

Member: AndreasHoster
AndreasHoster Jan 21, 2008 at 17:10:56 (UTC)
Goto Top
Kann man Programmgesteuert machen.
Set app = Application
    For Each tbldef In app.CurrentDb.TableDefs
        Rem Prüfen, ob verknüpfte Tabelle
        If tbldef.Connect <> "" Then  
            Rem Verknüpfte Tabelle wenn Connect nicht leer, Neuen Link zusammenbasteln und in das Tabellenobjekt schreiben
            sTemp = tbldef.Connect
            sTemp = Irgendwelche Stringbearbeitungen um den entsprechenden Teil zu ändern
            tbldef.Connect = sTemp
            Rem Neuen Link aktivieren
            Call tbldef.RefreshLink
        End If
    Next
Am Besten erstmal die Link Definitionen ausgeben lassen und dann schauen, welche Teile man ersetzen muß. Und dann das mit right, left, instr, mid etc. zusammenbasteln. Kann ganz schön unübersichtlich werden.
Falls Du nur bestimmte ändern willst, muß man natürlich nicht mit For ... Each durch alle durchgehen.
Member: howToUse
howToUse Jan 26, 2008 at 13:31:09 (UTC)
Goto Top
Vielen Dank für die Hilfe,
hat geklappt.