codice:
Dim objDataReader As OleDbDataReader 
objDataReader = comando.ExecuteReader(CommandBehavior.CloseConnection)
DropDownList1.DataSource() = objDataReader
DropDownList1.DataBind()
:master: