Non e' piu' belloccio cosi?
(occhio a eventuali errori di battitura)
codice:
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not Page.IsPostBack Then
Mostra_Categorie()
End If
End Sub
Public Sub Mostra_Categorie()
dim dap as new OleDb.OledbDataAdapter("SELECT CategoriaID, Nome FROM Categorie", ConfigurationSettings.AppSettings("ConnectionString"))
dim dt as new datatable
dap.fill(dt)
dplCategorieImg.datasource = dt
dplCategorieImg.databind
end sub
edit
p.s. ricorda di impostare nella dropdownlist le proprieta' DataValueField e DataTextField con i relativi nomi delle colonne