Llenar un dropdown list con los datos de la base de datos

[imanol22]

hola compañeros bueno dias,estoi realiando una aplicacion y tengo unas dudas igual ustedes me podrian ayudar

tengo 2 dropdownlist uno que son tipos y otro familias lo que queria es que salgan en el primero los tipos de documentos y en el segundo segun ke tipo de documento he seleccionado en el anterior todas sus familias

como podria hacerlo??

un saludo.gracias

[Mitico]

En el primer combo le pones la propiedad AutoPostBack a True y en el evento SelectedIndexChanged haces la consulta que te llena el segundo combo pasándole como parámetro el combo1.SelectedValue()

[ah_puch]

nose muy bien si entendi que es lo que quieres pero asi es como llenas un dropDown y un ListBox.

Public cnx As new SqlConnection("server=Local);database=MiEjemplo;Tr usted_Connection=yes")
Public Adapter AS SqlDataAdapter
Public Ds As New DataSet

Adapter = new SqlDataAdapter(" tu Query")",cnx)
Adapter.fill(Ds,"tabla2")
cnx.close
with DropDown <--- el nombre de tu dropDown

.DataSource = Ds.Tables("tabla2").DefaultView
.DataTextField ="Valor que se vera en el Drop"
.DataValueField ="Valor que tendran los drop"
.DataBind
end With

tambien checa lo que te dice mitico tambien es importante para que tu drop's respondan ante algun evento.
Espero que te sea de ayuda.

[imanol22]

gracias compañeros aunque el selectindexchanged no lo entiendo muy bien como tendria ke hacer eso??

el codigo aora mismo seria este simplemente es una pagina de altas y asta aora solo displayo dos combos de tipo y familia y luego le quiero poner un campo para meter el nombre del fichero ,otro para el modelo y otro para la descripcion y esto ke luego mediante concatenacion de strings se vaya insertando.

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Str = "server=(local);database=TECNIPESA;trusted_connect ion=yes"
cn = New SqlClient.SqlConnection(Str)

If Not (IsPostBack) Then
llenar_tipo()
llenar_familia()

End If
End Sub


Sub llenar_tipo()
Dim dr As SqlClient.SqlDataReader
Dim cmd As SqlClient.SqlCommand
Dim str As String
Dim sql As String
str = "server=(local);database=TECNIPESA;trusted_connect ion=yes"
cn = New SqlClient.SqlConnection(str)

sql = "Select distinct kcRUT_TIPO from RUTAS"
cmd = New SqlClient.SqlCommand(sql, cn)
cn.Open()
dr = cmd.ExecuteReader()
While dr.Read()
ddlist.Items.Add(New ListItem(dr.Item("kcRUT_TIPO")))
End While
End Sub

Sub llenar_familia()
Dim dr As SqlClient.SqlDataReader
Dim cmd As SqlClient.SqlCommand
Dim str As String
Dim sql As String
str = "server=(local);database=TECNIPESA;trusted_connect ion=yes"
cn = New SqlClient.SqlConnection(str)

sql = "Select distinct kcRUT_FAMILIA from RUTAS"
cmd = New SqlClient.SqlCommand(sql, cn)
cn.Open()
dr = cmd.ExecuteReader()
While dr.Read()
ddlist2.Items.Add(New ListItem(dr.Item("kcRUT_FAMILIA")))
End While


End Sub



en definitiva mi b.d es asi para ke os hagais una idea


DOCUMENTOS RUTAS
------------- --------------
kcDOC_TIPO kcRUT_TIPO
KcDOC_FAMILIA kcRUT_FAMILIA
kcDOC_FICHERO
tDOC_FECHA
cDOC_MODELO
cDOC_DESCRIPCION


habria una ruta fija y segun se vaya cargando los combos se iria haciendo la ruta de insercion.nose si ustedes me podrian ayudar.

gracias de antemano.
un saludo

[Mitico]

Hola imanol22

lo que deberías de hacer es a la hora de cargar las familias añadir una condición para que sólo se seleccionen aquellas del tipo que seleccionaste en el primer dropdownlist

Sub llenar_familia()
Dim dr As SqlClient.SqlDataReader
Dim cmd As SqlClient.SqlCommand
Dim str As String
Dim sql As String
str = "server=(local);database=TECNIPESA;trusted_connect ion=yes"
cn = New SqlClient.SqlConnection(str)

sql = "Select distinct kcRUT_FAMILIA from RUTAS Where kcRUT_TIPO=" & ddlist.SelectedItem.Text()
cmd = New SqlClient.SqlCommand(sql, cn)
cn.Open()
dr = cmd.ExecuteReader()
While dr.Read()
ddlist2.Items.Add(New ListItem(dr.Item("kcRUT_FAMILIA")))
End While


End Sub


Luego capturar del evento del primer dropdownlist cuando cambia la selección y ahí mandar cargar de nuevo el segundo dropdownlist

Private Sub ddlist_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddlist.SelectedIndexChanged
llenar_familia()
End Sub


Otro pequeño consejo es que no llenes los dropdownlist recorriendo el datareader, sino:
dr = cmd.ExecuteReader()
ddlist2.DataSource=dr
ddlist2.DataTextField="kcRUT_FAMILIA"
'ddlist2.DataValueField="" <-- el que corresponda si procede
ddlist2.DataBind()

Espero que todo esto te sirva y te funcione.

Un saludo

[imanol22]

gracias mitico la idea ke tenia de hacer es esta , mas o menos seria el funcionamiento como el de la pagina de descargas de documentos de samsung,hechale un vistazo si puedes, mi duda es como podria relacionar estos listbox de esta forma, el codigo ke actualmente tengo esta en el post anterior.

gracias de antemano y un saludo

[imanol22]

el enlace es este

http://www.samsung.com/es/support/pr...oad/index.aspx