<COLOR COLORCD="79" CODE="09" CODENAME="09 클래식블랙"/><COLOR COLORCD="9366" CODE="92" CODENAME="92 차콜+네이비옥스포드"/><COLOR COLORCD="9367" CODE="93" CODENAME="93 블랙+차콜하운드투스"/>
변수에서 가져오는 방법은 여기에서 확인 하였다.
위와 같이 해서 확인 하면 에러 발생.
XML 문서에서는 최상위 요소 하나만 허용됩니다.
변수 앞뒤로 <root>, </root> 를 붙여서 사용.
최종 코드
dim nodeCount, XMLDom,NodeList,theNode,Node, tmp
Set XMLDom = CreateObject("MSXML2.DomDocument.6.0")
XMLDom.async = false
tmp = "<root>"+rs("COLOR_XML")+"</root>"
XMLDom.LoadXML ( tmp )
theNode = "//COLOR"
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.GetAttribute("CODENAME") & "<br>")
Next
else
response.Write("Error Parsing Results")
end if
Set XMLDom = Nothing