[Vb.net].[datagrid] Master datagrid

Version imprimable

09/06/2006, 15h25
dyree

[Vb.net].[datagrid] Master datagrid

bonjour, je travaile avec web matrix, et j'ai 2 datagrids lié. Lorsque je choisi une ligne de la 1ere, la 2ème ouvre la table correspondante au choix.

Code:

Dim nom_test As String = CStr(MasterGrid.DataKeys(MasterGrid.SelectedIndex)).Replace("'", "''")

ici on recupere le nom du test de la 1ere datagrid

Code:

Dim CommandText As String = "select * from " & nom_test & " where [N° de Tri]=" & num_tri

je voudrais récuperer un 2e parametre de la 1ère datagrid (num tri) mais je ne sais pas trop comment faire. sachant quil etait a la 5e colonne jai essayé ca :

Code:

Dim num_tri As String = CStr(MasterGrid.Columns(5)(MasterGrid.SelectedIndex)).Replace("'", "''")

mais ca ne marche pas

des idées ?

bonjour,

je met en plus la partie de mon code sur le 2e datagrid, j'espere que cela pourra vous aider...

Code:

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
Sub BindDetailGrid()

    ' get the filter value from the master Grid's DataKeys collection
    If MasterGrid.SelectedIndex <> -1 Then

        ' TODO: update the ConnectionString value for your application
        Dim ConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=Y:\bd\mirroir_bd_mobile.mdb"

        ' TODO: update the CommandText value for your application
        Dim nom_test As String = CStr(MasterGrid.DataKeys(MasterGrid.SelectedIndex)).Replace("'", "''")
        Dim num_tri as string = "333"
        Dim CommandText As String = "select * from " & nom_test & " where [N° de Tri]=" & num_tri

        Dim myConnection As New OledbConnection(ConnectionString)
        Dim myCommand As New OledbCommand(CommandText, myConnection)

        myConnection.Open()

        DetailsGrid.DataSource = myCommand.ExecuteReader(CommandBehavior.CloseConnection)

    End If

    DetailsGrid.DataBind()

End Sub

voila, j'aimerai dans la variable numtri, on est le contenu d'une cellule d'une autre datagrid, appelé masterdatagrid. comment faire ?

J'ai enfin reussi ,

je met mon code si ca peut aider certaine personne :

Code:

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
Sub BindDetailGrid()

    ' get the filter value from the master Grid's DataKeys collection
    If MasterGrid.SelectedIndex <> -1 Then

        response.write(MasterGrid.SelectedIndex)
        ' TODO: update the ConnectionString value for your application
        Dim ConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=Y:\bd\mirroir_bd_mobile.mdb"

        ' TODO: update the CommandText value for your application
        Dim nom_test As String = CStr(MasterGrid.DataKeys(MasterGrid.SelectedIndex)).Replace("'", "''")
     
        Dim num_tri = MasterGrid.items(MasterGrid.SelectedIndex).cells(5).text
        Dim CommandText As String = "select * from " & nom_test & " where [N° de Tri]=" & num_tri

        Dim myConnection As New OledbConnection(ConnectionString)
        Dim myCommand As New OledbCommand(CommandText, myConnection)

        myConnection.Open()

        DetailsGrid.DataSource = myCommand.ExecuteReader(CommandBehavior.CloseConnection)

    End If

    DetailsGrid.DataBind()

End Sub

la ligne en bleu me permet de recuperer un champ de la premiere table et donc ma requete peut etre plus souple : Le Datakey me permet de choisir la table a interoger, et le numtri de me ballader dans cette table.