bonsoir s il vous plait j ai un petit probleme ,je veux deserialiser des enregistrements d un fichier et ajouter d autres a la collection ,j ai essayé mais y a un message qui me dit que j ajoute une clé en double ,ca veut dire le hashtable recommence a 0 et ne continue pas l incrementation du matricule .
code restauration
code ajout ds la collection:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 If File.Exists("E:\test_vb\Gestion Personnel(heritage)\fichier_yassine") = True Then Dim fic_lect As New FileStream("E:\test_vb\Gestion Personnel(heritage)\fichier_yassine", FileMode.Open) Dim format As New BinaryFormatter ht = DirectCast(format.Deserialize(fic_lect), Hashtable) fic_lect.Close() End If
merci d avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Try Dim emp As New employe(txtnom.Text, CInt(txtage.Text), CInt(Me.txtsal.Text), Me.txtentr.Text, Me.result_assure) ht.Add(emp._ncarte, emp) Catch ex As AgeException MsgBox(ex.tostring) End Try
Partager