Salut,
voilà la base de données :



Je me demande si je veux extraire les données afin de remplir la dataset qu'est ce qui est mieux à faire ?

voilà se que j'ai fait pour l'instant:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Imports System
Imports System.Data
Imports System.Data.OleDb
 
Public Class Form1
 Dim ConStr As String = "Provider=Microsoft.Jet.OleDb.4.0 ; Data Source= " & Application.StartupPath & "\Bijouterie.mdb"
 Dim con As New OleDbConnection(ConStr)
 Dim ds As New DataSet
 
 Dim Sql1 As String = "SELECT * FROM Client"
 Dim Sql2 As String = "SELECT * FROM Produit"
 Dim Sql3 As String = "SELECT * FROM Details_Achat"
 Dim Sql4 As String = "SELECT * FROM Details_Payement"
 
 
 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
     con.Open()
 
     Dim da1 As New OleDbDataAdapter(Sql1, con)
     Dim da2 As New OleDbDataAdapter(Sql2, con)
     Dim da3 As New OleDbDataAdapter(Sql3, con)
     Dim da4 As New OleDbDataAdapter(Sql4, con)
 
     ds.Clear()
     da1.Fill(ds, "Client")
     da2.Fill(ds, "Produit")
     da3.Fill(ds, "Details_Achat")
     da4.Fill(ds, "Details_Payement")
 
     con.Close()
est ce que c'est correcte afin de continuer et mettre les relations avec les datarelations (je connais juste le nom ) ou bien faire un requete SQL dès le debut de type:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
 Dim SqlStr As String = "SELECT Client.*,Produit.*,Details_Achat.*,Details_Payement.* FROM (((Client INNER JOIN Details_Achat ON Client.ID_Clt = Details_Achat.ID_Clt) INNER JOIN Details_Payement ON Client.ID_Payement = Details_Payement.ID_Payement) INNER JOIN Produit ON Details_Achat.ID_Produit = Produit.ID_Produit)"

sans datarelations..?
si j'ai des erreurs ..merci d'avoir m'indiquer où sont ils !