my question is very simple how can I do a nested datareader in my VB code , when i did an error message has been performed and told me "There is already an open DataReader associated with this Command which must be closed first." , please look at the folowing code (is very simple) for information

------------------------vb code-----------------

 Dim myConnection As SqlConnection = New SqlConnection("server=ISITC-A31266378;uid=dnnuser40;pwd=1311984;database=DotNetNuke40")

        Dim myCommand As SqlCommand

        Dim dr As SqlDataReader

        'establishing connection. you need to provide password for sql server

        myConnection.Open()

        'opening the connection

        'myCommand = New SqlCommand("SELECT TabName FROM Tabs WHERE ParentId = 69", myConnection)

        myCommand = New SqlCommand("SELECT TabName, TabID, ParentID FROM Tabs WHERE ParentId = 63", myConnection)

        'executing the command and assigning it to connection 

        dr = myCommand.ExecuteReader()

        While dr.Read()

            'reading from the datareader

            Response.Write(dr(0).ToString() & " ")

            Response.Write(dr(1).ToString() & " ")

            Response.Write(dr(2).ToString() & " ")

            Dim myCommand2 As SqlCommand

            Dim dr2 As SqlDataReader

            myCommand2 = New SqlCommand("SELECT TabName FROM Tabs WHERE ParentId = " & dr(1), myConnection)

            dr2 = myCommand2.ExecuteReader()

            While dr2.Read()

                Response.Write(dr2(0).ToString() & " -  ")

            End While

            dr2.Close()

        End While

        dr.Close()

        myConnection.Close()

 when I try to with your tips in the config file the debager made underline to  MultipleActiveResultSets="true and tell me that the  MultipleActiveResultSets attribute is not declared soo how can i declared this attribute and where

and this is a portion where I put the attribute in the config file 

<connectionStrings>

<add name="SiteSqlServer" connectionString="Data Source=ISITC-A31266378;Initial Catalog=DotNetNuke40;User ID=dnnuser40;Password=1311984" providerName="System.Data.SqlClient" />

<add name="DotNetNuke40ConnectionString1" connectionString="Data Source=ISITC-A31266378;Initial Catalog=DotNetNuke40;Integrated Security=True" MultipleActiveResultSets=True; providerName="System.Data.SqlClient" />

</connectionStrings>

 after doinig a lot of googling I realized that is not possible to do a nested loop with a datareder I found a solution by using the dataset like this 

 Dim DBConn As SqlConnection = New SqlConnection("server=ISITC-A31266378;uid=dnnuser40;pwd=1311984;database=DotNetNuke40")

        Dim DBCommand As SqlDataAdapter = New SqlDataAdapter("SELECT TabName, TabID, ParentID FROM Tabs WHERE ParentId = 63", DBConn)

        Dim DSPageData As New DataSet

        Dim i As Long

        Dim j As Long

        DBCommand.Fill(DSPageData, "Tabs")

        For i = 0 To DSPageData.Tables("Tabs").Rows.Count - 1 'Code to process record

            Response.Write("<BR>Processed Record: " & DSPageData.Tables("Tabs").Rows(i).Item("TabName"))

            Dim DBCommand1 As SqlDataAdapter = New SqlDataAdapter("SELECT TabName FROM Tabs WHERE ParentId = " & DSPageData.Tables("Tabs").Rows(i).Item("TabID"), DBConn)

            Dim DSPageData1 As New DataSet

            DBCommand1.Fill(DSPageData1, "Tabs")

            For j = 0 To DSPageData1.Tables("Tabs").Rows.Count - 1 'Code to process record

                Response.Write("<BR>Child Record: " & DSPageData1.Tables("Tabs").Rows(j).Item("TabName"))

            Next

        Next