Discussion :

[pimos]

Bonjour et bon retour de vacances...

Mon code VB.net est le suivant:

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
43
44
45
46
47
 
Option Explicit On
Option Strict On
 
Imports System.Xml.Serialization
 
Public Class GroupHeader
 
    ' File ID
    Private mMsgId As String
    Public Property MsgId() As String
        Get
            Return mMsgId
        End Get
 
        Set(ByVal Value As String)
            mMsgId = Value
        End Set
 
    End Property
 
    ' Date de création du fichier
    Private mCreDtTm As String
    Public Property CreDtTm() As String
        Get
            Return mCreDtTm
        End Get
 
        Set(ByVal Value As String)
            mCreDtTm = Value
        End Set
 
    End Property
 
    ' Nombre de transactions de mandats
    Private mNbOfTxs As Integer
    Public Property NbOfTxs() As Integer
        Get
            Return mNbOfTxs
        End Get
 
        Set(ByVal Value As Integer)
            mNbOfTxs = Value
        End Set
 
    End Property
End Class

qui par sérialization me génère le xml suivant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
  <?xml version="1.0" encoding="utf-8"?>
<Document ...>
  <Sdds>
    <GrpHdr>
      <MsgId>AAAAAAAAAA</MsgId>
      <CreDtTm>2012-08-27 18:12:55</CreDtTm>
      <NbOfTxs>7</NbOfTxs>
    </GrpHdr>
    <SddTxInf txId="1">
...

mais je souhaite générer le xml suivant avec le préfice "emdd:"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
  <?xml version="1.0" encoding="utf-8"?>
<Document ...>
  <Sdds>
    <GrpHdr>
      <emdd:MsgId>AAAAAAAAAA</emdd:MsgId>
      <emdd:CreDtTm>2012-08-27 18:12:55</emdd:CreDtTm>
      <emdd:NbOfTxs>7</emdd:NbOfTxs>
    </GrpHdr>
    <SddTxInf txId="1">
...

La solution que j'ai trouvé sur le net est la suivante avec "<xmlelement" mais le code le compile pas:

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
43
44
45
46
47
48
 
Option Explicit On
Option Strict On
 
Imports System.Xml.Serialization
 
Public Class GroupHeader
 
    ' File ID
    <XmlElement ElementName ="emdd:mMsgId">
    Private mMsgId As String
    Public Property MsgId() As String
        Get
            Return mMsgId
        End Get
 
        Set(ByVal Value As String)
            mMsgId = Value
        End Set
 
    End Property
 
    ' Date de création du fichier
    Private mCreDtTm As String
    Public Property CreDtTm() As String
        Get
            Return mCreDtTm
        End Get
 
        Set(ByVal Value As String)
            mCreDtTm = Value
        End Set
 
    End Property
 
    ' Nombre de transactions de mandats
    Private mNbOfTxs As Integer
    Public Property NbOfTxs() As Integer
        Get
            Return mNbOfTxs
        End Get
 
        Set(ByVal Value As Integer)
            mNbOfTxs = Value
        End Set
 
    End Property
End Class

L'erreur de compilation est la suivante: '>' expected

J'ai une bonne dizaine de classes imbriquées et je ne souhaite pas mettre à la poubelle le travaille de mes prédécesseurs.
Je ne vois pas comment traiter ce problème sans tout réécrire.
Pour le moment je re-parcours tout le fichier ligne par ligne et remplace les balises une par une: très long et performances médiocre.

Si je suis obligé de tout réécrire pouvez-vous me conseiller une méthodes?

Merci de votre aide

[pimos]

Le code suivant génère le fichier xml

Code :

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

1
2
 
XmlFunctions.Serialize(doc, ns, ".\fichier.txt", (GetType(DocumentPrlvmt))) Then

[tomlev]

Il y a plusieurs problèmes :

- la syntaxe pour l'attribut n'est pas bonne ; il ne faut pas utiliser "=" mais ":=" pour initialiser les propriété d'un attribut

- le préfixe ("emdd") doit être lié à un namespace (généralement représenté par une URL), via un objet XmlSerializerNamespaces (je suppose que c'est ta variable ns)

- au niveau de la propriété, il ne faut pas spécifier directement le préfixe, mais le namespace ; ça prendra automatiquement le préfixe correspondant.

Donc au final tu devrais avoir quelque chose comme ça :

Code :

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

1
2
3
' Avant l'appel à Serialize
ns.Add("emdd", "http://blabla.blabla.com/blabla...")
...

Et cet attribut sur la propriété (pas sur le champ ; le champ est privé et n'est donc pas sérialisé)

Code :

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

1
2
3
<XmlElement(ElementName := "MsgId", Namespace := "http://blabla.blabla.com/blabla...")>
Public Property MsgId() As String
...

[pimos]

Comme d'habitude les réponses sont toujours claires et rapides.

Ce qui donne pour mon cas:

Code :

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

ns.Add("emdd", "urn:awl:emdd:tech:xsd:common.001")

Il faut penser à mettre le '_' en fin de ligne:

Code :

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

1
2
<XmlElement(elementName:="MsgId", Namespace:="urn:awl:emdd:tech:xsd:common.001")> _
Public Property MsgId() As String

Mais pfff ce que c'est compliqué pour ajouter un simple libellé.
Merci!