none
Problemas con conexion. RRS feed

  • Pregunta

  • Hola 

    Tengo este código en el Load de un formulario que lista productos.

     Dim comando As New SqlCommand("SELECT codigo, descripcion, medida, precio, existencia FROM Productos")
            Using connection As New SqlConnection(FacturaSQL.Conex)
                    connection.Open()
                Dim adapter As New SqlDataAdapter(comando)
                Dim table As New DataTable
                adapter.Fill(table)
    
                DataGriProductos.DataSource = table
                ColumnasDetalles()
    
                End Using

    Cuando intento abrir el formulario, me da el siguiente error.

    jueves, 25 de enero de 2018 0:07

Respuestas

  • Hola, pruebalo asi, el connecion.Open() no es necesario porque el objeto dataAdapter abre y cierra conexiones

         Using connection As New SqlConnection(FacturaSQL.Conex)
               Dim comando As New SqlCommand("SELECT codigo, descripcion, medida, precio, existencia FROM Productos",connection)
                Dim adapter As New SqlDataAdapter(comando)
                Dim table As New DataTable
                adapter.Fill(table)
    
                DataGriProductos.DataSource = table
              
               End Using


    Votar es agradecer.
    Saludos.
    Lima-Perú


    • Editado Augusto1982 jueves, 25 de enero de 2018 0:24
    • Propuesto como respuesta Pablo Rubio jueves, 25 de enero de 2018 15:58
    • Marcado como respuesta Pablo Rubio jueves, 25 de enero de 2018 20:01
    jueves, 25 de enero de 2018 0:20

Todas las respuestas

  • Hola, pruebalo asi, el connecion.Open() no es necesario porque el objeto dataAdapter abre y cierra conexiones

         Using connection As New SqlConnection(FacturaSQL.Conex)
               Dim comando As New SqlCommand("SELECT codigo, descripcion, medida, precio, existencia FROM Productos",connection)
                Dim adapter As New SqlDataAdapter(comando)
                Dim table As New DataTable
                adapter.Fill(table)
    
                DataGriProductos.DataSource = table
              
               End Using


    Votar es agradecer.
    Saludos.
    Lima-Perú


    • Editado Augusto1982 jueves, 25 de enero de 2018 0:24
    • Propuesto como respuesta Pablo Rubio jueves, 25 de enero de 2018 15:58
    • Marcado como respuesta Pablo Rubio jueves, 25 de enero de 2018 20:01
    jueves, 25 de enero de 2018 0:20
  • Muchísimas gracias Augusto1982.

    Funcionó como un caballo de carreras en su mejor momento.

    jueves, 25 de enero de 2018 0:31