Activar botones en tabla de base de datos
Publicado por maldini_bm (2 intervenciones) el 09/12/2008 11:00:40
Buenas estoy haciendo un programa en el que quiero hacer visibles una serie de botones que tengo introducidos en una tabla de una base de datos, yo lo que intento es esto:
Dim botones As New Collection
Dim conexion As SqlConnection = CreaConexion()
Dim sql As String = "SELECT boton,inicial from equipos" & nombre & " order by inicial"
Dim comm As New SqlCommand(sql, conexion)
conexion.Open()
Dim dr As SqlDataReader = comm.ExecuteReader()
While dr.Read
Dim btn As New Button
btn.Name = dr("boton")
btn.Visible = True
End While
conexion.Close()
Pero el problema es que no me hace visibles los botones.
Que estoy haciendo mal??
Muchas Gracias
Dim botones As New Collection
Dim conexion As SqlConnection = CreaConexion()
Dim sql As String = "SELECT boton,inicial from equipos" & nombre & " order by inicial"
Dim comm As New SqlCommand(sql, conexion)
conexion.Open()
Dim dr As SqlDataReader = comm.ExecuteReader()
While dr.Read
Dim btn As New Button
btn.Name = dr("boton")
btn.Visible = True
End While
conexion.Close()
Pero el problema es que no me hace visibles los botones.
Que estoy haciendo mal??
Muchas Gracias
Valora esta pregunta


0