Ver Mensaje Individual
  #1 (permalink)  
Antiguo 03/10/2011, 09:39
Avatar de stuart_david3
stuart_david3
 
Fecha de Ingreso: agosto-2011
Mensajes: 215
Antigüedad: 12 años, 8 meses
Puntos: 1
Pregunta Generar listbox en base a otro listbox en una base de datos sql, asp.net

Hola!!! Buen día a todos!!! Pues verán tengo una duda y no eh encontrado como solucionarla, tengo 1 listbox, el cuál me muestra las tablas de mi base de datos, me gustaría saber como al hacer la selección de uno o varios elementos de la lista me generará otro listbox en el que aparecieran las columnas de la tabla o tablas que seleccione, lo único que eh logrado es mostrar los 2 listbox uno con las tablas de la base de datos, y el otro con TODAS las columnas de TODAS las tablas de mi base de datos, el problema como les dije es este, no se como hacerle por medio de la selección de uno o varios elementos del listbox para que solo me muestre los elementos seleccionados, aquí les dejo el código de lo que hasta el momento tengo :s...

Código ASP:
Ver original
  1. <%@ Import Namespace="System.Data.SQLClient" %>
  2. <script language="vbscript" runat="server">
  3. Sub Page_Load(Sender As Object, E As EventArgs)
  4.         Dim conn As SqlConnection =
  5.          New SqlConnection("server=myhost;database=mydb;User ID=myuser;Password=mypass;Trusted_Connection=no")
  6.         Dim sql As String =
  7.          "SELECT TABLE_NAME FROM INFORMATION_SCHEMA.COLUMNS GROUP BY TABLE_NAME"
  8.         Dim sql2 As String =
  9.          "SELECT COLUMN_NAME FROM INFORMATION_SCHEMA.COLUMNS GROUP BY COLUMN_NAME"
  10.         Dim dr As New SqlCommand(sql, conn)
  11.         Dim dr2 As New SqlCommand(sql2, conn)
  12.         Dim reader As SqlDataReader
  13.         Dim values As ArrayList = New ArrayList()
  14.         Dim values2 As ArrayList = New ArrayList()
  15.         conn.Open()
  16.         reader = dr.ExecuteReader()
  17.         While reader.Read()
  18.             values.Add(reader.Item("TABLE_NAME").ToString())
  19.         End While
  20.         reader.Close()
  21.         reader = dr2.ExecuteReader()
  22.         While reader.Read()
  23.             values2.Add(reader.Item("COLUMN_NAME").ToString())
  24.         End While
  25.         lb.DataSource = values
  26.         lb.DataBind()
  27.         lb2.DataSource = values2
  28.         lb2.DataBind()
  29.         reader.Close()
  30.         conn.Close()
  31.     End Sub
  32. </script>
  33. <html>
  34. <head>
  35. <title>Tablas y Columnas</title>
  36. </head>
  37. <body>
  38.     <asp:Label ID="Label1" runat="server" Text="RPE del Empleado"></asp:Label>
  39. <form id="Form1" method="post" runat="server">
  40. <asp:ListBox id="lb" SelectionMode="Multiple" runat="server" Height="643px"
  41.     Width="196px"/>
  42.     <asp:ListBox id="lb2" SelectionMode="Multiple" runat="server" Height="643px"
  43.     Width="196px"/>
  44. </form>
  45. </body>
  46. </html>

Muchas gracias de antemano, eh buscado pero no he encontrado una solución hasta ahora, de nuevo gracias...