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?