2

XML からの情報を表示する際に問題が発生しました。正しいノード (会社名) を選択することと関係があると思います。新鮮な意見が必要です...本当に単純なことを見落としているのではないかと感じました。コードは次のとおりです。

XML

<GovTalkMessage>
    <EnvelopeVersion>1.0</EnvelopeVersion>
    <Header>
        <MessageDetails>
            <Class>CompanyDetails</Class>
            <Qualifier>response</Qualifier>
            <TransactionID>9999999999999</TransactionID>
            <GatewayTest>TRUE</GatewayTest>
            <GatewayTimestamp>2013-09-24T17:51:41-00:00</GatewayTimestamp>
        </MessageDetails>
        <SenderDetails>
            <IDAuthentication>
                <SenderID>******</SenderID>
                <Authentication>
                    <Method>CHMD5</Method>
                    <Value></Value>
                </Authentication>
            </IDAuthentication>
            <EmailAddress>rte@rrfsolicitors.com</EmailAddress>
        </SenderDetails>
    </Header>
    <GovTalkDetails>
        <Keys/>
    </GovTalkDetails>
    <Body>
        <CompanyDetails>
            <CompanyName>MILLENNIUM STADIUM PLC</CompanyName>
            <CompanyNumber>03176906</CompanyNumber>
            <RegAddress>
                <AddressLine>MILLENNIUM STADIUM</AddressLine>
                <AddressLine>WESTGATE STREET</AddressLine>
                <AddressLine>CARDIFF</AddressLine>
                <AddressLine>CF10 1NS</AddressLine>
            </RegAddress>
        </CompanyDetails>
    </Body>
</GovTalkMessage>

ASP コード:

Set XMLDom = CreateObject("MSXML2.DomDocument.6.0")
XMLDom.Async = False
XMLDom.LoadXML (theXML)

theNode = "/GovTalkMessage/Body/CompanyDetails"

Set NodeList = XMLDom.SelectNodes(theNode)
nodeCount = XMLDom.SelectNodes(theNode).Length
If XMLDom.ParseError = 0 Then
    Response.Write(nodeCount)
    For Each Node in NodeList 
        response.Write(Node.Text & "<br>")
    Next
Else
    response.Write("Error Parsing Results")
End If
Set XMLDom = Nothing

結果: nodeCount = 0

4

2 に答える 2

5

XML ファイルは名前空間を使用します。ノード

<CompanyDetails xmlns="http://xmlgw.companieshouse.gov.uk/v1-0/schema"
   xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
   xsi:schemaLocation="http://xmlgw.companieshouse.gov.uk/v1-0/schema
     http://xmlgw.companieshouse.gov.uk/v1-0/schema/CompanyDetails-v2-1.xsd">

デフォルトの名前空間を定義しますhttp://xmlgw.companieshouse.gov.uk/v1-0/schema。ノードが明示的な名前空間 (例: <xsi:Something>) を使用していない限り、デフォルトの名前空間が使用されます。コードでもそのデフォルトの名前空間を定義して使用する必要があります。このようなものが動作するはずです:

uri = "http://xmlgw.companieshouse.gov.uk/v1-0/schema"
XMLDom.setProperty "SelectionNamespaces", "xmlns:ns='" & uri & "'"

theNode = "//ns:CompanyDetails"
Set NodeList = XMLDom.SelectNodes(theNode)
nodeCount = NodeList.Length

WScript.Echo nodeCount
于 2013-09-26T21:41:40.320 に答える