De VB 6.0 à VB.net

Bonjour, depuis de nombreuses années je fais appel dans mon code à des requêtes SQL.

Voici l'exemple qui m'interesse sous VB 6.0

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim rs As ADODB.Recordset   Data.rsPsRibbon "MDIFORM" Set rs = Data.rsPsMenuRibbon   Do Until rs.EOF Debug.Print rs("RIBBON_KEY") Debug.Print rs("RIBBON_FR") rs.MoveNext Loop rs.Close

---

Je n'arrive pas à reproduire la même chose sous VB.net :

Code:

---

1 2	Dim tb As New LTEDATADataSetTableAdapters.PsMenuRibbonTableAdapter() tb.Fill(LTEDATADataSet.PsMenuRibbon, "'MDIFrm'")

---

Principalement dans la lectue de la table :

do while ???


loop

Merci de me donner un coup de main, malgré des heures de tests j n'arrive pa à trouver la solution qui est certainement très simple.

et bien sa dépend,
je connais pas très bien vb6, je suis très rapidement arrivé sur vb 2008 (ou vb.net)

que cherche tu a faire exactement?
plutôt que d'essayer de reprendre le même code, essaye de trouver un maniére de le faire différement en vb.net

tu te connecte a ta base ou ?

si c'est juste pour afficher les données, faut binder ton DataTable sur un DGV.

@++ ;)

J'ai rien compris !

Binder.

Je lis la table, en je récupère les valeurs des champs je ne remplis pas un datagrid etc..

cpest simplemnent une lecture.
salutations

Ca peut parraitre con et je sais pas si c'est bien ce qu'il vous faut...

Code:

---

1 2 3 4 5 6 7 8 9 10

dim myCommand as new OdbcCommand dim myReader as OdbcDataReader   myCommand.Connection = laconnection myCommand.CommandText = "SELECT * FROM table" myReader = myCommand.executeReader do while myReader.read = true msgbox(myReader("nomduchamp")) loop myreader.close

---

C'est ca?

Merci pour ton info, je connais cette methode, mais je souhaite lire l'objet TB déclaré plus haut de la même façon que ton exemple.

Salutations