Bonjour a la communauté....


DAns prj j'ai une page sur la quelle se trouve 2 ddlist un bouton (ajout) et un gridview

le but étant de sélectionner des articles dans une ddlist, la quantité dans une autre ddlist et le bouton qui ajoute la sélection dans le gridview
Jusque là tout fonctionne bien

MAIS lorsque je veux supprimer une ligne là j'ai systématiquement le message "aucune ligne a cette position"


ici je regarde et peuple le gridview si des livraison existe déjà
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
                   DsLivraisons = New DataSet
                  DsLivraisons = GetData.GetDatas("SELECT LIV_Quantite, LIV_Livraison FROM Livraisons WHERE LIV_IdContrat=1 ", "Livraisons", Connexion)
                  DtLivraisons = DsLivraisons.Tables("Livraisons")
                  DgLivraisons.DataSource = DtLivraisons
                  DgLivraisons.DataBind()

voici le code d'ajout dans le gridview
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
 
 
     If CInt(ddQuantiteLivraison.Text) > 0 Then
                  Dim MyCol As DataColumn
                  Dim MyRow As DataRow
                  Dim i As Integer
 
                  MyCol = New DataColumn
                  MyCol.ColumnName = "LIV_Quantite"
                  MyCol.DataType = System.Type.GetType("System.Int32")
                  DtLivraisons.Columns.Add(MyCol)
 
                  MyCol = New DataColumn
                  MyCol.ColumnName = "LIV_Livraison"
                  MyCol.DataType = System.Type.GetType("System.String")
                  DtLivraisons.Columns.Add(MyCol)
 
                  For i = 0 To DgLivraisons.Rows.Count - 1
 
                        MyRow = DtLivraisons.NewRow
                        MyRow("LIV_Quantite") = DgLivraisons.Rows(i).Cells(0).Text
                        MyRow("LIV_Livraison") = DgLivraisons.Rows(i).Cells(1).Text
                        DtLivraisons.Rows.Add(MyRow)
 
                  Next
 
                  MyRow = DtLivraisons.NewRow
                  MyRow("LIV_Quantite") = CInt(ddQuantiteLivraison.Text)
                  MyRow("LIV_Livraison") = DdProduitLivraison.Text
                  DtLivraisons.Rows.Add(MyRow)
 
                  DgLivraisons.DataSource = DtLivraisons
                  DgLivraisons.DataBind()
 
            End If
suppression de la ligne selectionnée -> enfin j'essaye....
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
  DtLivraisons.Rows.RemoveAt(e.RowIndex)
            DgLivraisons.DeleteRow(e.RowIndex)