Pessoal,
Estou enfrentando um problema com abertura de sqldatareader. Criei uma função na qual eu passo uma instrucao SQL mais um datareader como parametro e a função preenche esse datareader com os dados do comando SQL. Porém preciso abrir um datareader e percorrer os seus dados, para cada registro do datareader necessito abrir um novo datareader.
Esta aparecendo uma mensagem que o segundo datareader não pode ser aberto enquanto o primeiro não for fechado.
Isso é correto?
Eu naum posso ter dois datareaders abertos ao msm tempo?
Como faço pra solucionar esse problema???
Abaixo segue o trecho que codigo que esta com problemas:
Dim dr_Lote_Producao As SqlDataReader = Nothing
cn_SQL_Server.Consulta_DataReader(lc_SQL_Lote.ToString, dr_Lote_Producao)
If dr_Lote_Producao.HasRows ThenDim dr_Ordem_Producao As SqlDataReader = Nothingdr_Lote_Producao.Read()
cn_SQL_Server.Consulta_DataReader(
String.Concat("sp_CONSULTA_tb_ORDENS_PRODUCAO_CODIGONPN ", gl_ID_Planta, ",'", dr_Lote_Producao("CódigoNPN"), "'"), dr_Ordem_Producao)'=== Buscando Ordem de Producao do NPN ===================================IfNot dr_Ordem_Producao.HasRows Then"ESTE ORDEM DE PRODUÇÃO NÃO FOI ENCONTRADA!!!", "ERRO LOTE", MessageBoxButtons.OK, MessageBoxIcon.Information)MessageBox.Show(
Else
End If
End If
Aguardo retorno.