Доступ к определенному атрибуту внутри XML-файла

Я пытаюсь получить текст внутри определенных атрибутов этого файла XML. Например, текст внутри описания, тип и т. Д.

В настоящее время я получаю сообщение об ошибке:

Линия: 23
Ошибка: требуется объект: 'objNode.attributes.getNameItem(....)'

Как я могу получить доступ к определенным атрибутам загружаемого XML-файла? описание, подробности->serviceName, тип

<!DOCTYPE html>
<html lang="en">
<head>
    <title>XML</title>
    <HTA:APPLICATION
        APPLICATIONNAME = "XPOS removal tool"
    />
</head>
<script language="VBScript">
    Sub Window_onLoad
        Set xmlDoc = CreateObject("Microsoft.XMLDOM")
        xmlDoc.Async = "False"
        xmlDoc.Load("programs1.xml")

        strQuery = "/steps/step"

        Set colNodes = xmlDoc.selectNodes( strQuery )

        htmlString = "<table><tr><th>Description</th><th>Type</th><th>Status</th></tr>"

        For Each objNode in colNodes
            htmlString = htmlString & "<tr><td>"& objNode.attributes.getNamedItem("description").value &"</td><td>test</td></tr>"
            // htmlString = htmlString & "<tr><td>"& objNode.text &"</td><td>test</td></tr>"
        Next

        htmlString = htmlString & "</table>"

        DataArea.innerHTML = htmlString
    End Sub
</script>

<body>
<div id="DataArea"></div>
</body>
</html>

Данные XML:

<?xml version='1.0'?> 
<steps>
<step>
    <description>Description 1</description>
    <type>Type 5</type>
    <details>
      <runFolder>c:\windows</runFolder>
      <runFile>v3-x86.exe</runFile>
    </details>
  </step>
  <step>
    <description>Description 2</description>
    <type>Type 4</type>
    <details>
      <serviceName>COMRedirector</serviceName>
      <processName>COMRedirectorServ</processName>
    </details>
  </step>
  <step>
    <description>Description 3</description>
    <type>Type 3</type>
    <details>
      <serviceName>OSUpdate</serviceName>
      <processName>OSUpdateServ</processName>
    </details>
  </step>
</steps>
Источник

2 ответа

Решение

По сути, это то, что я хотел сделать.

    Set xmlDoc = CreateObject("Microsoft.XMLDOM")
    xmlDoc.Async = "False"
    xmlDoc.Load("programs.xml")

    strQuery = "/steps/step"

    Set colNodes = xmlDoc.selectNodes( strQuery )

    For Each objNode in colNodes
        strDescription = objNode.SelectSingleNode("description").text
    Next
Источник

Вы получаете атрибут .GetAttribute(...)не .Attributes.GetNamedItem(...), Тем не менее, после того, как вы увидите все ваши XML-данные, вы не будете искать атрибуты. Вы хотите выбрать текст / значение узлов XML:

For Each objNode in xmlDoc.selectNodes("//description")
    htmlString = htmlString & "<tr><td>" & objNode.text & _
                 "</td><td>test</td></tr>"
Next
Источник
Другие вопросы по тегам