Tak for tippet.
Nu har jeg brugt HTTP-komponentet til at smide xml'en ind i en streng.
Det virker, men kun på nogle feeds!
Af de tre url'er jeg har i nedenstående kode, er det kun
scriptingnews-feed'et, jeg rent faktisk kan få til at virke. Resten
kommer med denne fejl:
fejl: No data is available for the requested resource. fejl:
-2146697209
<%
url="
http://www.daypop.com/top/rss.xml"
url="
http://scriptingnews.userland.com/xml/scriptingNews2.xml"
url="
http://p.moreover.com/cgi-local/page?indextopasia+xml"
Set objSvrHTTP =
Server.CreateObject("Msxml2.ServerXMLHTTP.4.0")
objSvrHTTP.open "GET", url, false
objSvrHTTP.send()
set objXML = CreateObject("MSXML2.FreeThreadedDOMDocument.4.0")
objXML.async = false
objXML.load (objsvrhttp.responsexml)
if not (objXML.readyState = 4 AND objXML.parseError.errorCode = 0)
then
response.write "fejl: "&objXML.parseError.reason
response.write "fejl: "&objXML.parseError.errorcode
response.write "<br>Parse Error line " &
objXML.parseError.line & ", character "&_
objXML.parseError.linePos & vbCrLf &
objXML.parseError.srcText
end if
set objNode=objXML.documentElement.selectsinglenode("//article/title")
response.write objNode.text
%>