Discussion :

[mehdiyou]

salut tout le monde, je voudrai construire un graphe à partir d'un requête Sql directement parce que maintenant quand je créé un graphe il faut que je mette les valeurs dans u DataGrid et ensuite la création se fait à partir du DataGrid !!!

[tomlev]

j'ai rien compris... sois plus précis dans tes questions, sinon personne ne pourra t'aider

[mehdiyou]

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
32
33
34
35
36
37
38
39
40
41
42
43
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Sql As String
        Dim Table As String
        Sql = "SELECT  MATRICULE , SUM(MONTANT) FROM MEHDI.AVANCE GROUP BY MATRICULE "
        'Sql = "SELECT  MATRICULE , SUM(MONTANT) FROM MEHDI.AVANCE GROUP BY MATRICULE "
        Table = "AVANCE"
        LoadInDatagridView(Sql, Table)
        source_graph()
    End Sub
    Public Sub LoadInDatagridView(ByVal Sql As String, ByVal Table As String)
        Me.CC.LoadBase(Sql, Table)
        Grille.DataSource = Me.CC._Dtt
 
 
    End Sub
 
    Private Sub source_graph()
        If Mode.Checked Then
            Graf.Title.Text = "Représentation des chiffres d'affaires par rapport aux objectifs."
 
            Dim tab_valeurs(Grille.VisibleRowCount - 1, Grille.VisibleColumnCount - 1)
 
            Dim compteur As Short
            For compteur = 0 To Grille.VisibleRowCount - 1
                tab_valeurs(compteur, 0) = Grille.Item(compteur, 0)
                tab_valeurs(compteur, 1) = Grille.Item(compteur, 1)
                tab_valeurs(compteur, 2) = Grille.Item(compteur, 2)
            Next
            Graf.ChartData = tab_valeurs
        Else
            Graf.Title.Text = "Représentation des chiffres d'affaires seuls."
 
            Dim tab_valeurs(Grille.VisibleRowCount - 1, Grille.VisibleColumnCount - 1)
            Dim compteur As Short
            For compteur = 0 To Grille.VisibleRowCount - 1
                tab_valeurs(compteur, 0) = Grille.Item(compteur, 1)
                'tab_valeurs(compteur, 1) = Grille.Item(compteur, 1)
                'tab_valeurs(compteur, 2) = Grille.Item(compteur, 2)
 
            Next
            Graf.ChartData = tab_valeurs
        End If
    End Sub

ce code me permet de charger les données de la requête dans un DataGrid et ensuite je passe les valeurs du datagrid à un autre tableau et puis ce tableau va me permettre de construire le graph. je voudrai que à partir de la requête je passe directement au graph

[tomlev]

OK... et c'est gênant de passer par le datagrid ?

Utilise un DataReader pour lire les résultats de ta requête, et mets les directement dans le tableau qui sert de source de données au graph.

Si tu ne connais pas le DataReader, va voir un tutoriel ADO.NET ici :
http://dotnet.developpez.com/cours/?...bnet#sqlservvb

[mehdiyou]

ok Merci Tomlev.

[tomlev]

si c'est résolu, pense au tag ...