none
Error de Data reader RRS feed

  • Pregunta

  • Hola a todos

    tengo una pequeño problema al realizar un consulta verán este es el código 

    Private Sub TxtID_Leave(sender As Object, e As EventArgs) Handles TxtID.Leave

            If Me.TxtID.Text <> "" Then
                consultar(Me.TxtID.Text)

                If dr.Read Then
                    Me.TxtTipo.Text = dr(0).ToString
                    Me.TxtNombres.Text = dr(1).ToString
                    Me.TxtApellidos.Text = dr(2).ToString
                    Me.TxtFicha.Text = dr(3).ToString
                    Me.TxtFormacion.Text = dr(4).ToString
                    Me.TxtCurso.Text = dr(5).ToString
                    Me.BtnActualizar.Enabled = True

                Else
                    MsgBox("no existe")
                    Me.BtnActualizar.Enabled = False
                End If
            Else
                Me.BtnActualizar.Enabled = False
            End If

            dr.Close()

        End Sub

    el problema esta en que cuando yo paso de un formulario a otro consulta la información pero si algo de este formulario y vuelvo a entrar me sale un error en " If dr.Read Then  " y me dice que requiere de una conccion abierta y el estado actual de la coneccion es cerrada pero yo ya abrí la conexión ala base de datos.


    • Cambiado Enrique M. Montejo sábado, 25 de octubre de 2014 15:12 Pregunta relacionada con objetos de acceso a datos.
    martes, 21 de octubre de 2014 15:55

Todas las respuestas