Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Tabellverknüpfung
Autor: Arrowlight
Datum: 26.01.07 22:34
Ich habe hier den Code für eine Verknüpfung von einer Master- und einer Detailtabelle: Private Sub Form_Load() 'Form Laden Me.Left = GetSetting(App.Title, "Settings", "MainLeft", 1000) Me.Top = GetSetting(App.Title, "Settings", "MainTop", 1000) Me.Width = GetSetting(App.Title, "Settings", "MainWidth", 6500) Me.Height = GetSetting(App.Title, "Settings", "MainHeight", 6500) Set db = New Connection db.CursorLocation = adUseClient db.Open "PROVIDER=MSDataShape;Data _ PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Roger\VB\Test\Weben.mdb;" Set adoPrimaryRS2 = New Recordset 'Kettfäden adoPrimaryRS2.Open "SHAPE {select * from tabGrundlage Order by intGrundNr}_ AS ParentCMD APPEND ({select * from tabKettfäden Order by intKettNr } AS_ ChildCMD RELATE intGrundNr TO intGrundNr) AS ChildCMD", db, adOpenStatic,_ adLockOptimistic For Each txtRS2 In Me.txtKettfäden Set txtRS2.DataSource = adoPrimaryRS2 Next Set dbgGitter(2).DataSource = adoPrimaryRS2("ChildCMD").UnderlyingValue End Sub Gibt es eine Möglichkeit eine Mastertabelle mit mehreren detailtabellen zu verknüpfen und wie sieht der Code dann aus? Arrowlight

Tabellverknüpfung	852	Arrowlight	26.01.07 22:34
Re: Tabellverknüpfung	538	srcdbgr	15.02.07 12:56

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen