Discussion :

[meryDev]

bonjour tout le monde.
je suis entrain de créer une application de gestion de stock et je travaille avec le language vb.net 2005.quand je Modifier/Supprimer une Ligne Dans une ticket un bonRetourClient sera authomatiquement crée :

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
 
dim listRetourMarchandise as new List(of LigneRetourMarchandise)
dim RetourMarchandise as new LigneRetourMarchandise
 
Sub ModifierLigne_click(sender,e)
retourMarchandise.numRetour=..
RetourMarchandise.numLigne=...
RetourMarchandise.CodeaArticle=...
listRetourMarchandise.add(RetourMarchandise)
End sub
 
Sub SupprimerLigne_Click(sender;e)
 
retourMarchandise.numRetour=..
RetourMarchandise.numLigne=...
RetourMarchandise.CodeaArticle=...
listRetourMarchandise.add(RetourMarchandise)
 
End sub
Sub ValiderTicket_click(sender,e)
for each elt as ligneRetourMarchandise in listRetourMarchandise
elt.Ajouter 'et j'ajoute les Ligne dans la base de donnée'
End sub

si je clique sur ModifierLigne et ensuite sur supprimerligne Et enfin sur ValiderTicket;le nombre de ligneRetourMarchandise est 2 mais il ajoute seulement un seul RetourMarchandise en double.j'éspère vivement que j'ai bien expliquer le problème

[Philippe Vialatte]

et c'est...tout à fait normal...

quand tu appelles ModifierLigne_Click, tu affectes un ensemble de données à un objet, et tu ajoutes une référence à cet objet dans une liste, puis, dans SupprimerLigne_Click, tu affectes un ensemble de données à l'objet, et tu ajoutes une seconde référence à ce même objet dans la liste...

Tu dois créer un nouvel objet avant de l'ajouter, genre :

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
 
dim listRetourMarchandise as new List(of LigneRetourMarchandise)
 
Sub ModifierLigne_click(sender,e)
   dim retourMarchandiseas new LigneRetourMarchandise
   retourMarchandise.numRetour=..
   retourMarchandise.numLigne=...
   retourMarchandise.CodeaArticle=...
   listRetourMarchandise.add(retourMarchandise)
End sub
 
Sub SupprimerLigne_Click(sender;e)
   dim retourMarchandiseas new LigneRetourMarchandise
   retourMarchandise.numRetour=..
   retourMarchandise.numLigne=...
   retourMarchandise.CodeaArticle=...
   listRetourMarchandise.add(retourMarchandise)
End sub
 
Sub ValiderTicket_click(sender,e)
   for each elt as LigneRetourMarchandisein listRetourMarchandise
      elt.Ajouter 'et j'ajoute les Ligne dans la base de donnée'
End sub

au passage, avoir le meme code dans supprimer et modifier, c'est strange

[meryDev]

ah oui merci ça m'échappe,merci beaucoup