codice:
ci sto provando ma ancora non ho risolto, questo è il codice che ho già scritto, provaci tu....Ciao
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Page.IsPostBack = False Then
Mostra_Categorie()
lsbNewsImg.Items.Clear()
Else
.................cosa scrivo qua!!!............
End If
End Sub
Public Sub Mostra_Categorie()
Dim connectionString As String = ConfigurationSettings.AppSettings("ConnectionString")
Dim query As String = "SELECT CategoriaID, Nome FROM Categorie"
Dim conn As New OleDb.OleDbConnection(connectionString)
Dim cmd As New OleDb.OleDbCommand(query, conn)
Dim reader As OleDb.OleDbDataReader
Try
conn.Open()
reader = cmd.ExecuteReader
Dim i As Byte
While reader.Read
dplCategorieImg.Items.Add(reader("Nome"))
dplCategorieImg.Items(i).Value = reader("CategoriaID")
i += 1
End While
reader.Close()
Catch ex As Exception
lblErrore.Text = "Errore rilevato: " & ex.Message
End Try
If Not conn Is Nothing Then
conn.Close() ' chiudo la connessione
End If
End Sub