DevTrain Forum - Rekursion in Tabelle funktioniert nicht

Forum: VB.NET | Thema: Rekursion in Tabelle funktioniert nicht | Von: G. Guest ( 23.09.2005 16:36)

		Hallo,

klassisches, eigentlich einfaches Problem: In einer Tabelle mit den Spalten DataID, ParentID, Name sind hierarchische Daten gespeichert.
Diese möchte ich nun durch eine rekursive Funktion auslesen. Aus irgendeinem Grund funktioniert das aber nicht: alles was ich bekomme ist eine Endlosschleife.

Hier der Code:

   Dim dbConn As New db
    Dim sqlQuery As String

    Dim sqlTemplate As String = "Select Name, ParentID, DataID from Table Where ParentID = "

Private Sub recursiveFileList(ByVal inParentID As String)
        Dim ds As New DataSet
        Dim dt As New DataTable
        Dim s As String
        ds = dbConn.execSql(sqlTemplate & inParentID)

        dt = ds.Tables(0)

        For Each dr As DataRow In dt.Rows
            s = dr.Item("Name").ToString & " (" & dr.Item("ParentID").ToString & ")"
            Debug.WriteLine(s)
            recursiveFileList(dr.Item("DataID").ToString)
        Next dr
    End Sub

Aufgerufen wird die Funktion mit der DataID des aktuellen Objekts (also dem aktuellen Standpunkt in der Hierarchie) und sollte mir eigentlich alle Kinder dieses Punktes zurückliefern.

Wieso funktioniert das nicht?

Danke für alle Antworten!

Was ist das Problem?


	

Betreff Von Datum

Re: Rekursion in Tabelle funktioniert nicht

Hat sich erledigt. War ein Fehler in meiner DB-Klasse, der dafür gesorgt hat, dass immer dasselbe Dataset zurückgegeben wurde (Objektreferenz).<br><br>Topic closed ;-)

G. Guest 24.09.2005 03:00

Antworten Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!