Discussion :

[dacid]

Bonjour @ tous,

Tout est dans le titre.
J'ai un objet avec une propriété de type "object".
C'est pour être générique, dedans, je peux mettre n'importe quel type de donnée.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private _Valeur As Object

Je le sérialise avec DataContractJsonSerializer , OK, ça donne ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
			}, {
				"Desc": "Date ouverture",
				"Id": "DatOuverture",
				"Mode": 0,
				"Valeur": "\/Date(1482966000000+0100)\/"
			}, {

Seulement, lorsque je le désérialize, il me le transforme en string:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Valeur = "\/Date(1482966000000+0100)\/"

J'ai mis en true "AlwaysTransmitTypeInformation", mais ça ne change rien, il ne met pas le type "DateTime", mais celui de la classe contenante ("__type": "tblFiltreChamp:#EspBTP_D",).
Lorsque j'écris la valeur dans la propriété, je la caste bien, j'ai regardé, le du sérialize, la propriété est bien de type DateTime.

Est ce que quelqu'un a une idée ?

Merci d'avance.

[dacid]

Je n'ai pas précisé, mais je suis en FrameWork 4.0.

Je suis arrivé à faire quelque chose avec un IDataContractSurrogate:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
    Public Function GetDeserializedObject(obj As Object, targetType As Type) As Object Implements IDataContractSurrogate.GetDeserializedObject
        If ((targetType = GetType(tblFiltreChamp)) AndAlso (CType(obj, tblFiltreChamp).Valeur IsNot Nothing)) Then
            If (CType(obj, tblFiltreChamp).Valeur.ToString().StartsWith("/Date(")) Then
                Dim strTmp As String = CType(obj, tblFiltreChamp).Valeur.ToString().Substring(6)
                Dim tmp As Long = 0
                If (Long.TryParse(strTmp.Substring(0, strTmp.Length - 7), tmp)) Then
                    CType(obj, tblFiltreChamp).Valeur = New DateTime(tmp)
                End If
            End If
        End If
        Return obj
    End Function

Ce n'est pas super propre, mais ça me dépanne pour le moment.

Mais par contre, la date n'est pas bonne, est ce que le Ticks a une règle particulière ? (je m'en fiche de l'heure).

[dacid]

Bion, pour les dates, fallait juste connaitre la règle..
http://stackoverflow.com/questions/1...eserialization

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
    ''' <summary>Convertir une date Json ("\/Date(1483457729360+0100)\/") en DateTime</summary>
    Public Shared Function DateJsonToDateTime(JsonDate As String) As DateTime?
        ' JavaScript uses the unix epoch of 1/1/1970. Note, it's important to call ToLocalTime() after doing the time conversion, otherwise we'd have to deal with daylight savings hooey.
        Dim unixEpoch As DateTime = New DateTime(1970, 1, 1, 0, 0, 0, DateTimeKind.Utc)
        Dim startMilliseconds As Double = 0
        If ((JsonDate.Length > 20) AndAlso (Double.TryParse(JsonDate.Substring(6, 13), startMilliseconds))) Then
            Dim startTime As DateTime = unixEpoch.AddMilliseconds(startMilliseconds).ToLocalTime()
            Return startTime
        End If
        Return Nothing
    End Function