Bonsoir a tous,
J'ai vraiment besoin de votre aide. Cela fait un moment que je tourne autour du problème et je n'arrive pas a sérialiser la classe ci-dessous en XML.
Si je supprime la ligne 'Me._ChildTasks.Add(Task)' la sérialisation fonctionne mais forcement il n'y a plus d'objets 'TaskBase' a serializer dans la liste.
Si je serialize chaque Objet TaskBase un par un (en dehors de la classe) ceux-ci se serializent correctement. (Ce sont rigoureusement les mêmes objet que j'ajoute lors du Add).

Le Message d'erreur n'est pas très parlant :
Erreur lors de la génération du document XML.
J'ai déjà sérialisé des List(Of T) mais jamais a l’intérieur d'une classe. Le fait qu'elle soit dans la classe pose t'il un problème ?
Je sèche complètement j'espère que vous pourrez m'aider.

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
36
37
38
39
40
41
42
<Serializable()>
Public Class TaskParent
    Private _ParentTaskName As String
    Private _ChildTasks As New List(Of TaskBase)
    Private _PProgress As Single
    Private _Statut As Statut
    Public Sub New()
 
    End Sub
    Public Sub New(ByVal ParentTaskName As String)
        Me._ParentTaskName = ParentTaskName
    End Sub
    Public Sub Add(ByVal Task As TaskBase)
        Me._ChildTasks.Add(Task)
        UpdateMe()
    End Sub
    Public Property ChildTasks() As List(Of TaskBase)
        Get
            Return _ChildTasks
        End Get
        Set(ByVal value As List(Of TaskBase))
            _ChildTasks = value
        End Set
    End Property
    Public ReadOnly Property PProgress() As Single
        Get
            Return _PProgress
        End Get
    End Property
    Public Property Statut() As Statut
        Get
            Return _Statut
        End Get
        Set(ByVal value As Statut)
            _Statut = value
            UpdateMe()
        End Set
    End Property
    Public Sub UpdateMe()
....
    End Sub
End Class