Riempire una DropDownList in VB.NET da database

Per motivi lavorativi sono approdato al VB.NET.

Non era nei miei obiettivi, ma a questo punto ne approfitto!

Oggi vediamo come riempire una DropDownlist in Asp.NET da database.

Quindi, nella pagina avremmo una cosa del genere:

<asp:DropDownList runat="server" ID="dropCategorie" required></asp:DropDownList>

Nel nostro code-behind:

Imports System.IO
Imports System.Data
Imports System.Data.SqlClient

Partial Class HTML_Default
    Inherits System.Web.UI.Page
    Private oConn As New 
			SqlConnection(ConfigurationManager.ConnectionStrings("db_NeroAddressConnection")
			.ConnectionString)

    Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
        If Not IsPostBack Then
            RiempiCategorie()
        End If
    End Sub

    Protected Sub RiempiCategorie()
        Dim cmd As String = "SELECT idCategoria, Titolo FROM Categorie"
        Dim command As New SqlCommand(cmd, oConn)
        If oConn.State = Data.ConnectionState.Closed Then
            oConn.Open()
        End If
        dropCategorie.DataSource = command.ExecuteReader()
        dropCategorie.DataTextField = "Titolo"
        dropCategorie.DataValueField = "idCategoria"
        dropCategorie.DataBind()
        If oConn.State = Data.ConnectionState.Open Then
            oConn.Close()
        End If
        dropCategorie.Items.Insert(0, New ListItem("--Seleziona--", ""))
    End Sub

End Class

Come vedete abbiamo aggiungo anche una voce come prima, giusto per "costringere" l'utente a selezionarne una valida.

Dopo aver impostato la connessione, impostiamo il datasource del componente, indicando anche quale sia il value e quale sia la parte visibile all'utente.

Ricordatevi che un componente DropDownlist si traduce nel cassico select di HTML.

Enjoy!