dataset de vb.net

j'ai l'habitude d'utiliser des requêtes SQL pour remplir le dataset de vb.net. Seulement les informations proviennent d'une seule table.
exemple: Supposons les informations suivantes:
dim odataset as dataset =new dataset
dim OSQL as oledbcommand =new oledbcommand
dim adapter as oledbdataadapter = new oledbdataadapter

osql.commandtex="select * from TABLE"
osql.connection=cx
adapter.selectcommand=cx
adapter.fill(odataset,"TABLE")
le prolème que j'ai présentement c'est si dans la requête SQL , il ya intervention de plusieurs tables comment on va remplir le dataset puisque dans la syntaxe
c'est nom de l'adaptateur.fill(nom du dataset, nom de la table)?
je vous remercie d'avance

2 heures que je cherche ... Bon ce message date de 2004, mais ca peux peut etre aider quelqu'un.

Dim MyPath AsString = "C:\data\"
Dim strConnexion AsString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MyPath & "" & _
";Extended Properties='Text;HDR=Yes;FMT=Delimited'"

'Oledb ne supporte pas la clause JOIN, alors j'en met pas
Dim strRequete AsString = "SELECT A.Nom, A.Prenom, B.Pays " & _
"FROM [Personnes.csv] A, [Societe.csv] B " & _
"WHERE A.id_societe= B.id_societe ;"

'initialisation et ouverture de la connexion
Dim objConnexion AsNew OleDb.OleDbConnection(strConnexion)
objConnexion.Open()

'initialisation de l'adapteur SQL
Dim objAdapter AsNew OleDb.OleDbDataAdapter(strRequete, objConnexion)

'initialisation et remplissage du dataset ici je met "test" et ca fonctionne très bien
Dim dst_set AsNew DataSet()
objAdapter.Fill(dst_set, "test")

'#########################################
'Lecture des données du Dataset
'#########################################

Dim ObjetDataTable As DataTable
'Le nom "test" ne correspond pas au vrai nom de la table, il semble être utilisé uniquement
pour créer une référence au Dataset que je veux manipuler (au cas ou j'en ai plusieurs)
ObjetDataTable = dst_set.Tables("test")

Dim nb_ligne AsInteger = ObjetDataTable.Rows.Count - 1
Dim i AsInteger

      For i = 0 To nb_ligne

      Dim Nb_colonne AsInteger = ObjetDataTable.Columns.Count() - 1
      Dim j AsInteger

            For j = 0 To Nb_colonne

                  'lecture d'une colonne
                  Dim result AsString = ObjetDataTable.Rows(i).Item(j) & ";"
                  Console.Write(result)

            Next
      'nouvelle ligne
      Next

ANKOU22