afficher résultat dans des labels

Version imprimable

salut à tous!
j'ai ce code qui fonctionne correctement,sauf qu'il m'affiche tous les résultats dans un seul label.
et j'aimerai afficher chaque champ dans un label mais je plante un peu.
ci joint mon code,merci pour votre aide!

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
         Dim cnAccess As Data.OleDb.OleDbConnection
        cnAccess = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Visual Studio 2005\WebSites\WebSites4\App_Data\Bdd.mdb;")
      cnAccess.Open()
        Dim sSelectSQL As String
        sSelectSQL = "select RefEmployes,NomFamille from Employes"
         Dim cmdSelect As New Data.OleDb.OleDbCommand(sSelectSQL, cnAccess)
         Dim drEmp As Data.OleDb.OleDbDataReader, sbResults As New StringBuilder()
        drEmp = cmdSelect.ExecuteReader()
        sbResults.Append("<Table>")
        Do While drEmp.Read()
            sbResults.Append("<TR><TD>")
            sbResults.Append(drEmp.GetString(0))
            sbResults.Append("</TD><TD>")
            sbResults.Append(drEmp.GetString(1))
            sbResults.Append("</TD><TD>")
            Loop
        sbResults.Append("</Table>")
        lblResult.Text = sbResults.ToString()
 
    End Sub

01/09/2008, 14h33
Promesses

Salut,
il faut en créer plusieurs à la volée
01/09/2008, 14h51
alicia26

merci mais peux tu être un peu plus clair!
c'est vrai qu'il faudra déclarer plusieurs labels, mais comment affecter à chacun la valeur retournée par sbResults?
01/09/2008, 18h00
Promesses

En plus, je viens de voir ton code, tu mets un tableau dans un label, c'est moyen.

Je te conseillerais plutot d'utiliser un literal ou tout simplement un tableau que tu remplirais (avec des cell et des row)

Pour etre plus clair dans ta boucle, il faut que tu crée tes objets, tu ajoutes le texte. Enfin, tu ajoute l'objet créé à ta page.

merci,j'ai essayé ce code,mais je coince toujours

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 Dim drEmp As Data.OleDb.OleDbDataReader, sbResults As New StringBuilder()
        drEmp = cmdSelect.ExecuteReader()
 
        Do While drEmp.Read()
 
            sbResults.Append(drEmp.GetString(0))
 
            sbResults.Append(drEmp.GetString(1))
 
        Loop
 
        lblResult.Text = sbResults.ToString()

quelques exemples pourrais m'aider!

02/09/2008, 08h08
lutecefalco

Passe par un GridView
02/09/2008, 19h29
alicia26

oui,exactement j'ai opté pour un gridview. Le seul hic c'est qu'il a besoin d'un datalist sur la page suivante pour afficher les données.
Par contre,j'ai besoin d'afficher chaque champs dans un label.
je vois plus comment contourner cela:aie: