Verknüpfte Tabellen ermitteln

Wenn Sie ein Abonnement des Magazins 'Access im Unternehmen' besitzen, können Sie sich anmelden und den kompletten Artikel lesen.
Anderenfalls können Sie das Abonnement hier im Shop erwerben.

Verknüpfte Tabellen ermitteln

Wenn Sie herausfinden wollen, welche Tabellen über ein Fremdschlüsselfeld mit einer gegebenen Tabelle verknüpft sind, benötigen Sie ein paar Zeilen DAO-Code. Die hier vorgestellte Funktion erwartet den Namen der zu untersuchenden Tabelle und enthält zwei weitere Parameter, die zur Rückgabe der Ergebnisse vorgesehen sind.

Da wir nicht nur die verknüpften Tabellen, sondern auch noch die Namen der Fremdschlüsselfelder der Tabellen ermitteln wollen, können wir hier nicht mit einem einfachen Rückgabewert arbeiten, sondern benötigen eben diese zwei Rückgabeparameter.

Beide Parameter sind als Arrays ausgelegt, da ja auch einmal mehrere Tabellen über ein Fremdschlüsselfeld mit einer Tabelle verknüpft sein können.

In diesem Fall durchläuft die Funktion alle Elemente der Relations-Auflistung der Datenbank. Dabei vergleicht sie den Namen der Tabelle der einen Seite der Relation mit dem Namen der zu untersuchenden Tabelle. Stimmen beide überein, folgen weitere Schritte.

Die Funktion erweitert die Arrays dann um ein Element und trägt den Namen der verknüpften Tabelle (aus der Eigenschaft ForeignTable des Relation-Objekts) und den Namen des Fremdschlüsselfeldes (aus der Eigenschaft ForeignName) als neue Elemente in die beiden Arrays strVerknuepfteTabellen und strFremdschluesselfelder ein:

Public Function VerknuepfteTabellen(strTabelle As String, _
         strVerknuepfteTabellen() As String, _
         strFremdschluesselfelder() As String)

Dies war die Leseprobe dieses Artikels.
Melden Sie sich an, um auf den vollständigen Artikel zuzugreifen.

Bitte geben Sie die Zahlenfolge in das nachfolgende Textfeld ein

Die mit einem * markierten Felder sind Pflichtfelder.

Aktuell im Blog
Onlinebanking mit Access

Es ist geschafft: Endlich ist das Buch Onlinebanking mit Access fertiggeschrieben. Das war... [mehr]

Direktzugriff auf Tabellen und Felder

Die IntelliSense-Erweiterung für Tabellen und Felder hat mir soviel Spaß gemacht, dass ich gleich... [mehr]

IntelliSense für Tabellen und Felder

Wenn Sie mit dem VBA-Editor arbeiten und dort gelegentlich SQL-Anweisungen eingeben, müssen Sie... [mehr]

Download Access und SQL Server

Erfahren Sie, welche Schritte zum Download des aktuellen Stands des Buchs "Access und SQL Server"... [mehr]

Bilder in Access 2013

Wer die Bibliothek mdlOGL0710 von Sascha Trowitzsch oder ein ähnliches Modul aus meinen... [mehr]

Dynamische Ribbons

Immer wieder fragen Leser, wie man Ribbon-Elemente wie etwa Schaltflächen in Abhängigkeit... [mehr]

Die Blogmaschine

Einen kleinen Blog zusätzlich zum Shop zu betreiben ist eine tolle Sache. Hier lassen sich... [mehr]

Wegwerfadressen für die Newsletteranmeldung

Die Verwendung von Wegwerf-Adressen für die Nutzung aller möglichen Online-Dienste nimmt... [mehr]

Access und Facebook

Facebook und Access - das ist eine der wenigen Kombinationen, die ich noch nicht in die Mangel... [mehr]

Access und SQL Server - das Projekt

Mein neues Buch Access und SQL Server (gemeinsam mit Bernd Jungbluth) geht in die Endphase. Wer... [mehr]