Skip to main content
adicionou 472 caracteres ao conteúdo
Fonte Link

como posso efetuar a leitura de um arquivo XML via VBScript onde o arquivo possui 2 tags (Nodes) principais iguais conforme o exemplo abaixo:

Arquivo XML:

<?xml version="1.0" encoding="utf-8"?>
<!-- Primeiro details -->
<details>
  <title>aaaaaaaaa</title>
  <number>5</number>
</details>

<!-- Segundo details -->
<details>
  <title>bbbbbbbbbb</title>
  <number>6</number>
</details>

Estou querendo obter o conteúdo do primeiro e segundo "details" capturando o "title" e o "number", porém só consigo pegar do primeiro.

Código Atual:

SET objXML = CreateObject("Microsoft.XMLDOM")
objXML.async = False
objXML.load("E:\tmp\xml.xml")

DIM root, i

SET root = objXML.documentElement
MsgBox "Numeros de TAGs (Nodes): " & root.childNodes.length

FOR i = 0 TO (root.childNodes.length)-1
  MsgBox(root.childNodes.item(i).text)
NEXT

Da forma como está ele ira exibir 3 (Três) mensagem...

  1. "Numeros de TAGs (Nodes): 2"
  2. "aaaaaaaaa"
  3. "5"

como posso efetuar a leitura de um arquivo XML via VBScript onde o arquivo possui 2 tags (Nodes) principais iguais conforme o exemplo abaixo:

Arquivo XML:

<?xml version="1.0" encoding="utf-8"?>
<!-- Primeiro details -->
<details>
  <title>aaaaaaaaa</title>
  <number>5</number>
</details>

<!-- Segundo details -->
<details>
  <title>bbbbbbbbbb</title>
  <number>6</number>
</details>

Estou querendo obter o conteúdo do primeiro e segundo "details" capturando o "title" e o "number", porém só consigo pegar do primeiro.

como posso efetuar a leitura de um arquivo XML via VBScript onde o arquivo possui 2 tags (Nodes) principais iguais conforme o exemplo abaixo:

Arquivo XML:

<?xml version="1.0" encoding="utf-8"?>
<!-- Primeiro details -->
<details>
  <title>aaaaaaaaa</title>
  <number>5</number>
</details>

<!-- Segundo details -->
<details>
  <title>bbbbbbbbbb</title>
  <number>6</number>
</details>

Estou querendo obter o conteúdo do primeiro e segundo "details" capturando o "title" e o "number", porém só consigo pegar do primeiro.

Código Atual:

SET objXML = CreateObject("Microsoft.XMLDOM")
objXML.async = False
objXML.load("E:\tmp\xml.xml")

DIM root, i

SET root = objXML.documentElement
MsgBox "Numeros de TAGs (Nodes): " & root.childNodes.length

FOR i = 0 TO (root.childNodes.length)-1
  MsgBox(root.childNodes.item(i).text)
NEXT

Da forma como está ele ira exibir 3 (Três) mensagem...

  1. "Numeros de TAGs (Nodes): 2"
  2. "aaaaaaaaa"
  3. "5"
Fonte Link

Lendo XML com Tag (Nodes) Iguais

como posso efetuar a leitura de um arquivo XML via VBScript onde o arquivo possui 2 tags (Nodes) principais iguais conforme o exemplo abaixo:

Arquivo XML:

<?xml version="1.0" encoding="utf-8"?>
<!-- Primeiro details -->
<details>
  <title>aaaaaaaaa</title>
  <number>5</number>
</details>

<!-- Segundo details -->
<details>
  <title>bbbbbbbbbb</title>
  <number>6</number>
</details>

Estou querendo obter o conteúdo do primeiro e segundo "details" capturando o "title" e o "number", porém só consigo pegar do primeiro.