begin process at 2008 08 22 05:21:56
1 229 779 membres
50 nouveaux aujourd'hui
14 267 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Plusieurs requetes dans une datagrid [ Archives Visual Basic / J'AI BESOIN D'AIDE !!!! :) ] (visualresine)

Plusieurs requetes dans une datagrid le 02/11/2005 17:42:57

visualresine
Bonjour,

Je travaille sur plusieurs tables et je voudrais pouvoir faire plusieurs requetes imbriquées qui m'affichent qu'un seul resultat. Je m'explique :

J'ai une table tbl_fabrication avec :
- num_produit
- caract_produit
....

Une autre table tbl_controle :
- num_controle
- couleur
- nom_controle
- num_produit

LEs 2 tables sont liés par les champs num_produit.

J'aimerai afficher ds ma datagrid la requete :  num_produit,  caract_produit,  "nombre de controle" et pas numero...

Quelqu'un peut il m'aider ?

Merci d'avance




Re : Plusieurs requetes dans une datagrid le 03/11/2005 10:09:32

TrafMaxime
Réponse acceptée !
Voilà, j'espère que t'es en vb.net, sinon je te garantie rien.. :

Dim st As String = "SELECT table1.champ1, table1.champ2, table2.champ1, tables 2.champ2 from table1 inner join table2 on table1.champ1 = table2.champ1 where table1.champ2 like '"+ un_string+"'"

        Dim oledb As New OleDbDataAdapter(st, cn)
        k = oledb.Fill(dsdatk, "Table1")
        dtgrid.DataSource = dsdatk.Tables("Table1")
        dtgrid.SuspendLayout()
        Dim ag As New DataGridTableStyle()
        Dim bg As DataGridColumnStyle

        bg = New DataGridTextBoxColumn()
        bg.MappingName = "table1.champ1"
        bg.HeaderText = "Youpi"
        bg.Width = 60
        ag.GridColumnStyles.Add(bg)

        bg = New DataGridTextBoxColumn()
        bg.MappingName = "table2.champ2"
        bg.HeaderText = "Bezeichnung"
        bg.Width = 120

        ag.GridColumnStyles.Add(bg)
        ag.MappingName = "Table1"
        ag.AlternatingBackColor = Color.AliceBlue
        Try
            dtgrid.TableStyles.Add(ag)
        Catch ex As Exception
        End Try
        dtgrid.ResumeLayout()

.Maytheforcebewithyou.Maxime.




Classé sous : controle, datagrid, num, produit, requetes

Participer à cet échange

Pub



Appels d'offres

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Téléchargements

Boutique

Boutique de goodies CodeS-SourceS