Listbox e metodi di caricamento

[elisa_rm74]

Lo so che vi sto massacrando!!!

Non riesco a capire se esite un modo di caricare valore e nome diversi in una list box con il metodo che segue o analogo

Dim values As New ArrayList()

values.Add("Item 1")
values.Add("Item 2")
values.Add("Item 3")
values.Add("Item 4")
values.Add("Item 5")
values.Add("Item 6")

ListBox1.DataSource = values
ListBox1.DataBind()

[elisa_rm74]

Avevo provato una cosa del genere ma evidentemente c'è qualcosa di sbagliato, nn da errore ma nn visualizzo nulla:

Dim CmdCliente as New SqlCommand (sqlClienti,Conn)
Dim rCliente as SqlDataReader = CmdCliente.ExecuteReader()
While rCliente.Read()
lbCliente.DataValueField=rCliente("cod_cliente")
lbCliente.DataTextField=rCliente("Nominativo")
end while
lbCliente.DataSource=rCliente
lbCliente.DataBind

[DeBe99]

Originariamente inviato da elisa_rm74
Avevo provato una cosa del genere ma evidentemente c'è qualcosa di sbagliato, nn da errore ma nn visualizzo nulla:

Dim CmdCliente as New SqlCommand (sqlClienti,Conn)
Dim rCliente as SqlDataReader = CmdCliente.ExecuteReader()
While rCliente.Read()
lbCliente.DataValueField=rCliente("cod_cliente")
lbCliente.DataTextField=rCliente("Nominativo")
end while
lbCliente.DataSource=rCliente
lbCliente.DataBind

non devi ciclare il datareader, e le proprietà "DataValueField" e "DataTextField" sono dei testi che prendono il nome del campo da cui prendere poi i valori:

Dim CmdCliente as New SqlCommand (sqlClienti,Conn)
Dim rCliente as SqlDataReader = CmdCliente.ExecuteReader()
lbCliente.DataValueField="cod_cliente"
lbCliente.DataTextField="Nominativo"
lbCliente.DataSource=rCliente
lbCliente.DataBind()

[elisa_rm74]

ok grazie ho capito. Ma alla lista che ho ottenuto e poi possibile aggiungere manualmente, cioè nn da db, altra campi mettendoli per primi e nn per ultimi?

[DeBe99]

se li aggiungi prima di aggiungere quelli dal db dovrebbe farlo :master:

[riccardone]

Originariamente inviato da elisa_rm74
Avevo provato una cosa del genere ma evidentemente c'è qualcosa di sbagliato, nn da errore ma nn visualizzo nulla

quando usi un datareader per popolare una dropdownlist non e' possibile effettuare un collegamento tra la proprieta' datasource del controllo e la collection delle righe contenute nel datareader (come invece avviene quando usi una datatable). Nel caso del datareader e' necessario effettuare un ciclo (come vedo che hai fatto) all'interno del quale aggiungere uno per uno gli item al dropdownlist. Es.:

Dim m_item As ListItem
Dim CmdCliente As New SqlCommand(sqlClienti, SqlConnection1)
SqlConnection1.Open()
Dim rCliente As SqlDataReader = CmdCliente.ExecuteReader()
While rCliente.Read()
m_item = New ListItem
m_item.Value = rCliente(0)
m_item.Text = rCliente(1)
ddl.Items.Add(m_item)
End While
rCliente.Close()
SqlConnection1.Close()

[elisa_rm74]

grazie mille per l'esauriente risposta (effettivamente mancava qualcosa al mio codice! )

Elisa