Funciones para llenado DropDownList

[ISAANALISIS]

Hola,
Alguien conoce alguna función para llenar varios dropdownlist??? pero debo utilizar tres capas.

Saludos!!

Atte
ISA

[okhosting]

Si puedes cargar un DataTable con tus datos, entonces nada mas le asignas al DropDownList.DataSource = tuDataTable, luego le asignas el DataTextField con el campo que se mostrara como texto, el DataValueField con el campo que tenga la llave primaria y le das DataBind()

Suerte!

[ISAANALISIS]

si.,. y le tengo que pasar mis parametros de procedimiento almacenado y los nombres de los campos.. pero no se como :(!

[okhosting]

Al dropdown no le pasas parametros, mas bien tienes que seguir estos pasos:

1- Llenar un DataTable con tus datos (aqui es donde usas los parametros de un store procedure)

2- Una vez que tienes lod atso en el datatable, sigues los pasos que te indique antes

Para que puedas ejecutar el store procedure tienes las instrucciones que te pase en el otro tema http://www.forosdelweb.com/f78/proce...enados-795815/

Es decir primero ejecutas el store procedure y llenas un DataTable, y ya despues con el DataTable llenas el dropdown

Suerte!

[jsrc1990]

Él a lo que se refiere es a esto, que pena que no te pude escribir en el otro post que hicistes en el de hannah_banana ya que donde trabajo tienen los foros bloqueados y aunque me la safe XD con ultrasurf... tuve problemas, aqui va:

Tienes 2 Posibilidades:

Crear un Metodo la cual cargue de UN DropDownList (El que tu quieras) al invocar el susodicho:

Código ASP:

Llenar_DropDownLists(TuDropDownList1, "Tu_Campo_Texto", "Tu_Campo_Valor")
Llenar_DropDownLists(TuDropDownList2, "Tu_Campo_Texto", "Tu_Campo_Valor")
Llenar_DropDownLists(TuDropDownList3, "Tu_Campo_Texto", "Tu_Campo_Valor")
 

Código ASP:

Protected Sub Llenar_DropDownLists(ByVal DropDownListLlenador As DropDownList, ByVal Texto As String, ByVal Valor As String)
DropDownListLlenador.DataSource = "Tu_Source"
DropDownListLlenador.DataTextField = Texto
DropDownListLlenador.DataValueField = Valor
DropDownListLlenador.DataBind()
End Sub
 

o bien crear un Metodo la cual contenga como parametro un Array de Dropdownlist's la cual te cargue VARIOS a la vez:

Código ASP:

Llenar_DropDownLists(New DropDownList() {TuDropDownList1, TuDropDownList2, TuDropDownList3}, New String() {"Tu_Texto_DropDownList1", "Tu_Texto_DropDownList2", "Tu_Texto_DropDownList3"}, New String() {"TuValor_DropDownList1", "TuValor_DropDownList2", "TuValor_DropDownList3"})
 

Código ASP:

Protected Sub Llenar_DropDownLists(ByVal DropDownListLlenador() As DropDownList, ByVal Textos() As String, ByVal Valores() As String)
For Indice = 0 To DropDownListLlenador.Length - 1
DropDownListLlenador(Indice).DataSource = "Tu_Source"
DropDownListLlenador(Indice).DataTextField = Textos(Indice)
DropDownListLlenador(Indice).DataValueField = Valores(Indice)
DropDownListLlenador(Indice).DataBind()
Next
End Sub
 

Si quieres ademas que te retorne un valor que diga cuantos items se crearon haz una function asi:

Código ASP:

Llenar_DropDownLists(TuDropDownList1, "Tu_Campo_Texto", "Tu_Campo_Valor")
Llenar_DropDownLists(TuDropDownList2, "Tu_Campo_Texto", "Tu_Campo_Valor")
Llenar_DropDownLists(TuDropDownList3, "Tu_Campo_Texto", "Tu_Campo_Valor")
 

Código ASP:

Protected Function Llenar_DropDownLists(ByVal DropDownListLlenador As DropDownList, ByVal Texto As String, ByVal Valor As String) As Integer
DropDownListLlenador.DataSource = "Tu_Source"
DropDownListLlenador.DataTextField = Texto
DropDownListLlenador.DataValueField = Valor
DropDownListLlenador.DataBind()
Return DropDownListLlenador.Items.Count
End Function
 

y en Array que retorne el numero de items de cada dropdownlist:

Código ASP:

Llenar_DropDownLists(New DropDownList() {TuDropDownList1, TuDropDownList2, TuDropDownList3}, New String() {"Tu_Texto_DropDownList1", "Tu_Texto_DropDownList2", "Tu_Texto_DropDownList3"}, New String() {"TuValor_DropDownList1", "TuValor_DropDownList2", "TuValor_DropDownList3"})
 

Código ASP:

Protected Function Llenar_DropDownLists(ByVal DropDownListLlenador() As DropDownList, ByVal Textos() As String, ByVal Valores() As String) As Integer()
Dim Numeros_de_Items(DropDownListLlenador.Length - 1) As Integer
For Indice = 0 To DropDownListLlenador.Length - 1
DropDownListLlenador(Indice).DataSource = "Tu_Source"
DropDownListLlenador(Indice).DataTextField = Textos(Indice)
DropDownListLlenador(Indice).DataValueField = Valores(Indice)
DropDownListLlenador(Indice).DataBind()
Numeros_de_Items(Indice) = DropDownListLlenador(Indice).Items.Count
Next
Return Numeros_de_Items
End Function
 

Espero haberte ayudado

Jsrc1990

[ISAANALISIS]

Perfecto!!!

Voy a implementarlo muchas gracias por su apoyo.

Saludos!!!



Atte
ISA