XML EM VARIAVEL
Caros amigos,
Alguém sabe como faço, para em vez de gerar realmente o xml adicionar o valor no xml em uma variavel.
Estou gerando o xml como segue:
Open App.Path & [Ô]\XML\[Ô] & chave & [Ô]-cte[Ô] & [Ô].xml[Ô] For Output As #1
Print #1, [Ô]<?xml version=[ô]1.0[ô] encoding=[ô]UTF-8[ô]?>[Ô]
print #1, [Ô]<infCte versao=[ô]1.03[ô] Id=[Ô] + X & [Ô]CTe[Ô] & chave & X & [Ô]>[Ô]
e assim por diante
Alguém sabe como faço, para em vez de gerar realmente o xml adicionar o valor no xml em uma variavel.
Estou gerando o xml como segue:
Open App.Path & [Ô]\XML\[Ô] & chave & [Ô]-cte[Ô] & [Ô].xml[Ô] For Output As #1
Print #1, [Ô]<?xml version=[ô]1.0[ô] encoding=[ô]UTF-8[ô]?>[Ô]
print #1, [Ô]<infCte versao=[ô]1.03[ô] Id=[Ô] + X & [Ô]CTe[Ô] & chave & X & [Ô]>[Ô]
e assim por diante
Não sei se entendi direito, mais você já tentou assim:
Dim vXML As String
vXML = [Ô]<?xml version=[ô]1.0[ô] encoding=[ô]UTF-8[ô]?>[Ô] & vbCrLf
vXML = vXML & [Ô]<infCte versao=[ô]1.03[ô] Id=[Ô] + X & [Ô]CTe[Ô] & chave & X & [Ô]>[Ô] & vbCrLf
Open App.Path & [Ô]\XML\[Ô] & chave & [Ô]-cte[Ô] & [Ô].xml[Ô] For Output As #1
Print #1, vXML
Dim vXML As String
vXML = [Ô]<?xml version=[ô]1.0[ô] encoding=[ô]UTF-8[ô]?>[Ô] & vbCrLf
vXML = vXML & [Ô]<infCte versao=[ô]1.03[ô] Id=[Ô] + X & [Ô]CTe[Ô] & chave & X & [Ô]>[Ô] & vbCrLf
Open App.Path & [Ô]\XML\[Ô] & chave & [Ô]-cte[Ô] & [Ô].xml[Ô] For Output As #1
Print #1, vXML
Tópico encerrado , respostas não são mais permitidas