Sì esatto, sei disconnesso.
Con datareader
codice:
what.Items.Add(New ListItem("Tutti",""))
dim conn as New Oledb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dire & "Annunci.mdb")
dim cmd as New Oledb.OleDbCommand("SELECT id,nome FROM marche",conn)
dim Reader as OledbDataReader
conn.open()
Reader=cmd.ExecuteReader()
while Reader.Read()
what.Items.Add(New ListItem(reader(1),reader(0)))
end while
conn.close()
Scusa se non l'ho adattato al tuo esempio. Con il datareader si è connessi e quindi si risparmiano risorse. In questo caso però devi fare un loop per aggiungere item con il metodo add al listbox.
Il costruttore Listitem accetta come primo parametro il valore del campo testo e come secondo il valore del campo value
Ciao[]