title image


Smiley Re: Intern verknüpfte Datensätze ermitteln
Hallo Hans-Wilhelm,Deine Tabelle sehe mal so aus:id vater_id fluss1 NULL Rhein2 1 Mosel3 NULL Weser4 3 Werra5 3 Fulda6 3 Leine7 6 InnersteDie folgende Funktion wird zum Suchen benötigt:Function umfasst(fluss1 As Long, fluss2 As Long) As Boolean Dim lfd_fluss As Variant '=true, wenn fluss1 ein "Oberfluß" von fluss2 ist lfd_fluss = fluss2 Do'Vater zu LFD_FLUSS lesen lfd_fluss = DLookup("[vater_id]", "Fluss", "[id] = " & lfd_fluss) If IsNull(lfd_fluss) Then Exit Do umfasst = lfd_fluss = fluss1 If umfasst Then Exit Do LoopEnd FunctionDiese Funktion kasst Du in einer Abfrage (SQL-Ansicht) wie folgt verwenden:SELECT *FROM [fluss]WHERE umfasst([id],7))=True;Gruß K.K

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: