解析XML InnerXML

Question

我喜欢能够像asp.net一样解析这个值，不幸的是，asp经典也像<div>everything within it</div>标签一样返回标签。

我尝试解析路径"/root/div“并返回其中的所有内容，但不包括"<div></div>"，结果应该是"<p>abc <span>other span</span></p>”

<%
    Set CurrentXML=Server.CreateObject("Microsoft.XMLDOM")
    CurrentXML.LoadXml("<root><div><p>abc <span>other span</span></p></div></root>")'Load string into CurrentXML

    Response.Write("<BR>"&Server.HTMLEncode(CurrentXML.SelectSingleNode("/root/div").XML)) 'I want to return  without the div, the correct result should be <p>abc <span>other span</span></p>
 %>

Answer 1

试试这个：

<%
Option Explicit

    Dim xml: Set xml = Server.CreateObject("MSXML2.DOMDocument.3.0") 
    xml.LoadXml("<root><div>Text Start<p>abc <span>other span</span></p></div></root>")

    Dim sResult: sResult = ""

    Dim node
    For Each node in xml.selectSingleNode("/root/div").childNodes
        sResult = sResult & node.xml
    Next

    Response.Write Server.HTMLEncode(sResult) 

%>

不幸的是，MSXML元素没有innerXml属性。因此，您需要按照示例中的循环来连接每个子节点的xml，以生成元素的内部XML。

Answer 2

这应该会让你得到你想要的：

Response.Write("BR>"&Server.HTMLEncode(CurrentXML.SelectSingleNode("/root/div").childNodes.item(0).XML))

我不确定您的确切情况，但在假设之前，您可能希望确保您有子节点，您可以使用：

CurrentXML.SelectSingleNode("/root/div").hasChildNodes ' Should be "True"

祝好运!