Ciao non capisco come mai mi legge solo l'ultimo record.
Grazie, ciao
-------------------------
codice:
 
 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim leggi As OleDbCommand
        Dim messaggi As OleDbDataReader

        Dim Connection As New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath("App_data/discussioni.mdb"))
        Connection.Open()


        leggi = New OleDbCommand("SELECT oggetto from messaggi", Connection)

        messaggi = leggi.ExecuteReader()
        While messaggi.Read()

           

            h1.InnerHtml = messaggi("oggetto").ToString
        End While


        messaggi.Close()
        Connection.Close()