none
error al cargar datasource RRS feed

  • Pregunta

  • Buenas, les escribo porque de repente me salta un error cada vez que cargo un datasource de un combobox, antes no me pasaba pero ahora si , mi codigo es:

     conn.Open()
            Dim ds As New DataSet
            Dim dt As New DataTable
             Dim strsql = "SELECT DISTINCT Nombre FROM Clientes"
            Dim adp As New OleDb.OleDbDataAdapter(strsql, conn)
     
            ds.Tables.Add("tablareparaciones")
            adp.Fill(ds.Tables("tablareparaciones"))


            Principal.ComboBoxUsuario.DataSource = ds.Tables("tablareparaciones") (aqui el error)
            Principal.ComboBoxUsuario.DisplayMember = "Nombre"
            Principal.ComboBoxUsuario.ValueMember = "Nombre"

           conn.Close()

    y el error es:

    Error al crear el formulario. Consulte Exception.InnerException para obtener más detalles. Error: La conversión de la cadena "" en el tipo 'Double' no es válida.



    • Editado Adm1990 miércoles, 7 de mayo de 2014 11:15
    miércoles, 7 de mayo de 2014 10:49

Respuestas

  • vale ya lo tengo, resulta que me iba a un evento textchanged de un textbox y ahi hacia la operacion, he debido de pasarme con el ctrl+z y me estaba volviendo loco, perdon por las molestias  y muchas gracias
    • Marcado como respuesta Adm1990 miércoles, 7 de mayo de 2014 11:33
    miércoles, 7 de mayo de 2014 11:33

Todas las respuestas

  • Prueba cambiando:

    ds.Tables.Add("tablareparaciones")
     adp.Fill(ds.Tables("tablareparaciones"))

    Por adp.Fill(ds,"tablareparaciones")

    miércoles, 7 de mayo de 2014 10:57
  • gracias por responder, pero sigue igual, no sé que ha podido pasar antes iba bien.
    miércoles, 7 de mayo de 2014 11:07
  • Ese error se da al tratar de hacer una conversión a Double de una cadena vacía. Por ejemplo

    Total = Total + CDbl(Dgv.Item("total", i).Value)

    dará ese error si Dgv.Item("total", i).Value está vacío.

    Esto se puede controlar mediante

    If Not String.IsNullOrEmpty(Dgv.Item("total", i).Value) then
       Total = Total + CDbl(Dgv.Item("total", i).Value)
    End If


    Saludos, Javier J

    miércoles, 7 de mayo de 2014 11:16
  • gracias por responder javier, pero esque me pasa con todas las llamadas a la bbdd, y no entiendo el porque iba todo bien y de golpe deja de funcionar, simplemente es un select que trae datos no hay operaciones de ningun tipo.

    miércoles, 7 de mayo de 2014 11:21
  • Pon más información para ver de donde puede venir el error. El código que has puesto, ¿donde lo tienes? Desde dónde lo usas y Principal.comboboxUsuario, el principal es el nombre de una variable de tipo form o es directamente el nombre del form ?

    miércoles, 7 de mayo de 2014 11:29
  • vale ya lo tengo, resulta que me iba a un evento textchanged de un textbox y ahi hacia la operacion, he debido de pasarme con el ctrl+z y me estaba volviendo loco, perdon por las molestias  y muchas gracias
    • Marcado como respuesta Adm1990 miércoles, 7 de mayo de 2014 11:33
    miércoles, 7 de mayo de 2014 11:33