none
Cargar nombres de tablas en un ComboBox RRS feed

Respuestas

  •  Dim dt As New DataTable
            Dim laRestricciones() As String = {Nothing}
            Try
                Using CON As New MySqlConnection("server=localhost;User Id=root;database=ventas_dap")
                    CON.Open()
                    Using da As New MySqlDataAdapter("SELECT TABLE_NAME FROM information_schema.tables  where TABLE_SCHEMA = 'ventas_dap' ", CON)

                        da.Fill(dt)

                        ComboBox2.DataSource = dt

                        ComboBox2.DisplayMember = "Table_Name"

                    End Using
                End Using
            Catch ex As Exception
                MessageBox.Show(ex.Message, "error", MessageBoxButtons.OK, MessageBoxIcon.Information)
            End Try
    • Marcado como respuesta Mauricio Hamak sábado, 9 de febrero de 2013 14:57
    sábado, 9 de febrero de 2013 14:57