Datareader cosa sbaglio?

**Pinetto** · 14-09-2010, 14:51

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()

**sspintux** · 14-09-2010, 14:58

Originariamente inviato da Pinetto
Ciao non capisco come mai mi legge solo l'ultimo record.
Grazie, ciao
-------------------------

codice:

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

perchè è quello che gli hai detto di fare, o meglio
i record li leggi tutti ma in h1.InnerHtml resta solo l'ultimo

...forse volevi scrivere così ?

h1.InnerHtml &= messaggi("oggetto").ToString

**Pinetto** · 14-09-2010, 15:23

Ciao grazie ok funziona,
mi permetto di chiederti un'altra cosa.
come posso visualizzare il risultato nel html con poi i miei css??

Il ciclo di esempio mi estrae tutto ma ora ho bisogno di formattare i risultati.
Grazie, ciao

**pietro09** · 14-09-2010, 15:32

Devi partire dall'html che vuoi ottenere: tabella, div, ... etc.
Poi, invece di usare

h1.InnerHtml &= messaggi("oggetto").ToString

usa uno stringbuilder e, alla fine del ciclo fai:

h1.innerHtml = sb.tostring()

la formattazione dipende dallo stile che usi

**Pinetto** · 14-09-2010, 16:23

Ciao,scusa Pietro ma non so mettere in pratica quello che penso volessi dirmi.
Supponiamo che io abbia un div id="pippo"></div>
Dentro ci devo mettere il mio risultato dal reader e poi ciclo e ricomincio.
Mi faresti un semplice esempio per favore?
Grazie, ciao

**pietro09** · 14-09-2010, 16:31

questo è un esempio

codice:

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="a.aspx.vb" Inherits="prove_a" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
    <title></title>
    <style type="text/css">
        body
        {
            font-family: Verdana, Helvetica, sans-serif;
            font-size: 10pt;
        }
    
        li
        {
            list-style-type: none;
        }    

    </style>
</head>
<body>
    <form id="form1" runat="server">
    <div>
        <asp:Literal ID="Literal1" runat="server" EnableViewState="false"></asp:Literal>
    </div>
    </form>
</body>
</html>

codice:

Option Strict On
Imports l = libreria.ModuloWeb

Partial Class prove_a
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim sb As New StringBuilder()

        Using rd As OleDbDataReader = msole.GetDataReader(gl.StringaConnessione, "select nome_regione from regioni where 1=1 ")
            If rd.HasRows Then
                sb.Append("<ul>")
                Do While (rd.Read)
                    sb.Append("[*]")
                    sb.Append(rd("nome_regione").ToString)
                    sb.Append("")
                Loop
                sb.Append("[/list]")
            Else
                sb.Append("Non ci sono dati")
            End If
        End Using

        Me.Literal1.Text = sb.ToString

    End Sub
End Class

Discussione: Datareader cosa sbaglio?

Strumenti discussione

Ricerca discussione

Visualizza

Datareader cosa sbaglio?

Re: Datareader cosa sbaglio?

Permessi di invio