Código:
  
Cuando el codigo llega a la linea:    sql = "SELECT RECIPE_RECIPE.NDB_No_Con, RECIPE_RECIPE.Recipe_Can FROM RECIPE_RECIPE WHERE RECIPE_RECIPE.NDB_No_Recipe = " & Codigo
        cmd = New SqlCommand(sql, conexionSqlEx)
        rs = cmd.ExecuteReader()
        While rs.Read
            'POR CADA SUBRECETA
            Dim CodigoSubReceta As String = rs.GetOrdinal("NDB_No_Con")
            Dim CanSubReceta As Decimal = rs.GetOrdinal("Recipe_Can")
            'Codigo y cantidad de subreceta
            CodigoSubReceta = rs.GetString(CodigoSubReceta)
            CanSubReceta = rs.GetDecimal(CanSubReceta)
            'OBTENGO LOS VALORES NUTRICIONALES DE LAS SUBRECETAS
            Dim GramosSubReceta As Decimal = (CanSubReceta * 100) / CanTotalIngrediente
            Dim sql3 As String = "SELECT RECIPE_NUT_DATA.NDB_No, RECIPE_NUT_DATA.Nutr_Val FROM RECIPE_NUT_DATA WHERE NDB_No = " & CodigoSubReceta
            Dim cmd3 As SqlCommand = New SqlCommand(sql3, conexionSqlEx)
           Dim rs3 As SqlDataReader = cmd3.ExecuteReader()
        
        End While
Dim rs3 As SqlDataReader = cmd3.ExecuteReader()
Se produce el problema (al menos eso creo yo pq si lo comento los demas datagridview se llenan bien) no da ningun error eso si.
Tengo definido MultipleActiveResultSets=True
Estoy haciendo algo mal?
 
 




