Bonjour et bon retour de vacances...
Mon code VB.net est le suivant:
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
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
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> <MsgId>AAAAAAAAAA</MsgId> <CreDtTm>2012-08-27 18:12:55</CreDtTm> <NbOfTxs>7</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 <?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"> ...
L'erreur de compilation est la suivante: '>' expected
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
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
Partager