hjælp til at læse fra raw xml
hejjeg står og skal læse noget info fra en xml fil og derefter udskrive det på min side.
jeg har følgende script indtil videre men kan ikke få det til at virke og kan ikke se hva jeg har gjort forkert
<%
RESPONSE.EXPIRES=-1
Response.Buffer = True
percent = 10
Dim xml
Set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = False
xml.setProperty "ServerHTTPRequest", true
xml.load ("http://1268309.shop11.dandomain.dk/shop/basket.html&rawxml=1")
t = 1
' Parse XML
if xml.parseError.errorcode <> 0 then
' oops error in xml
Response.Write("XML Error...<br>")
else
' get xml data
' Response.Write(xml.documentElement.childNodes(0).attributes.getNamedItem("code").nodeValue)
'x=xml.documentElement.childNodes
for i=0 to xml.documentElement.childNodes.length-1
TotalProducts = xml.documentElement.childNodes(i).getElementsByTagName("TotalProducts")(1).text
if t = 2 then
response.write (xml.documentElement.childNodes(i).getElementsByTagName("TotalProducts")(1).text & "<br>" )
%>
<%
END IF
next
end if
Set xml = Nothing
%>
håber der er en der kan hjælpe. xml filen kan ses her http://1268309.shop11.dandomain.dk/shop/basket.html&rawxml=1
hvis det er nødvendigt