Utiliser un DataSet rempli de données

Bonjour,

Je poste ici, car j'ai lu des centaines de lignes de tuto de livres et de code, mais je trouve pas ce que je cherche.

En fait, j'ai fait un bout de code en VB.NET qui se connecte a une base mysql pour aller chercher des infos.

J'arrive bien as récupérer ce que je veut (avec les commandes sql select...) mais je bloque au niveau de traiter les données.

D'après les tuto, j'arrive a prendre les données du dataset et les envoyer dans un datagrid, mais ce que je veut faire c'est les envoyer vers une textbox (multiligne).

Voila mon bout de code actuel :

Code:

---

1 2 3 4 5 6 7 8 9

Public Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click laConnection.ConnectionString = "database=" + sqlbase + ";server=" + sqladdress + ";user id=" + sqluser + ";password=" + sqlpass + ";" laConnection.Open() ' requete affiche la table selectionner laReqette = New MySqlDataAdapter("SELECT nom FROM inscriptions", laConnection) ' charge le DataSet sour laReqette.Fill(sour, "inscriptions") 'afficher la table dans datagrid DataGrid1.DataSource = sour.Tables("inscriptions")

---

Donc j'affiche les nom de la table insciprtions dans le datadrid, ok, mais je voudrais les mettre dans une textbox et plus tard dans un label (mais si je comprends comment on les mets dans une textbox, ce sera pareil..

Avez vous une idée ?

Hello, tu es sûr d'avoir lu le bon tuto? :mouarf:
pour afficher le nom d'une table dans un textbox :

Code:

---

Label1.Text = CStr(ds.Tables(0).TableName)

---

pour afficher le nom d'une colonne dans un textbox :

Code:

---

1 2 3

Label1.Text = ds.Tables(0).Columns(0).Caption ou Label1.Text = ds.Tables("nomTable").Columns("nomColonne").Caption

---

pour afficher le contenu d'une cellule :

Code:

---

Label1.Text = CStr(ds.Tables("nomTable").Rows(0).Item("nomColonne"))

---

ne pas oublier que les table, les rows et itemarray sont des collections donc tu peux les énuméré avec un for each :

Code:

---

1 2 3 4 5 6 7

For Each table As DataTable In ds.Tables For Each row1 As DataRow In table.Rows For Each item As String In row1.ItemArray 'de cette manière on passe sur toutes les cases de toutes les tables du dataset... Next Next Next

---

Bonjour,

En effet, je suis passé assez vite sur msdn... (leur interface est tellement attractive... :oops::oops:).

Merci pour le lien, je scrutte le msdn :) la prochaine fois...

Voila ce que je cherchais :

Code:

---

Label22.Text = CStr(sour.Tables("inscriptions").Rows(0).Item("nom")) + " " + CStr(sour.Tables("inscriptions").Rows(0).Item("prenom"))

---

Ou "sour" est ma source...

Cordialement