Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Pessoal bom dia, estou com um grande problema em fazer uma concatenação entre dois xml, eu preciso juntar os dois em um unico.
Na vdd vai retornar do banco de dado MainFrame N blocos xml, porém vou ter que ficar fazendo um loop até juntar todos em apenas um.
Ex de como um xml vai vir do banco:
<DADOS-NEGOCIO>
<LISTA-DADOS>
<DADO>1</DADO>
<DADO>2</DADO>
</LISTA-DADOS>
</DADOS-NEGOCIO>
O segundo xml vai retornar no mesmo padrão, porém vou ter que juntar todos em uma unica LISTA-DADOS
Exemplo do terceiro xml:
<DADOS-NEGOCIO>
<LISTA-DADOS>
<DADO>3</DADO>
</LISTA-DADOS>
</DADOS-NEGOCIO>
Resultado final:
<DADOS-NEGOCIO>
<LISTA-DADOS>
<DADO>1</DADO>
<DADO>2</DADO>
<DADO>3</DADO>
</LISTA-DADOS>
</DADOS-NEGOCIO>
Eu consigo chegar na Tag LISTA-DADOS para começar a ler cada Tag DADO que tenha dentro da lista, porém nao consigo ADD cada TAG dentro da LISTA-DADOS do xml.
Eu estou tentando fazer exatamente isso para adicionar um filho dentro de xml:
xml.documentElement.selectNodes("/DADOS-NEGOCIO/LISTA-DADOS").appendChild node
Meu código ASP esta assim:
Dim xml
Dim xmlAux
Dim strXml
Dim strXmlAux
strXml = "<DADOS-NEGOCIO>" _
& "<LISTA-DADOS>"_
& "<DADO>1</DADO>"_
& "<DADO>2</DADO>"_
& "</LISTA-DADOS>"_
& "</DADOS-NEGOCIO>"
strXml = "<DADOS-NEGOCIO>" _
& "<LISTA-DADOS>"_
& "<DADO>3</DADO>"_
& "</LISTA-DADOS>"_
& "</DADOS-NEGOCIO>"
set xml = Server.CreateObject("Microsoft.XMLDom")
set xmlAux = Server.CreateObject("Microsoft.XMLDom")
xml.async = false
xmlAux.async = false
xml.LoadXML(strXml)
xmlAux.LoadXML(strXmlAux)
Dim objNodeList
Dim node
set objNodeList = xmlAux.documentElement.selectNodes("/DADOS-NEGOCIO/LISTA-DADOS")
For Each node in objNodeList
'response.write node.text & "<br />"
xml.documentElement.selectNodes("/DADOS-NEGOCIO/LISTA-DADOS").appendChild nodeMuito obrigado e fico no aguardo.
Carregando comentários...