Can't locate resource specified - display RSS


A

Anthony

I am trying to make a simple page display a rss news feed.. I don't want the
web server to connect to remote site because it doesn't work. I want the
client to do it because my web server is behind a proxy (Tried proxycfg.exe
on web server with no success)

I am going nuts.. something that should be so simple for me...

The following will just not work and I give up.. so now I want client side
code (Unless someone can fix my problem):
ALWAYS Give's me
msxml3.dll error '800c0005'

The system cannot locate the resource specified.

/readnews.asp, line 12

SOURCE ---
<%
response.write "WOW!<br>"
Call getNews(10)
response.write "<BR>WOW!"
'http://www.redbooks.ibm.com/rss/xseries.xml
Sub getNEWS(howManyResults)
myRSSfile = "http://www.redbooks.ibm.com/rss/xseries.xml"

Set xmlHttp = Server.CreateObject("MSXML2.XMLHTTP")
xmlHttp.Open "Get", myRSSfile, false
xmlHttp.Send()
myXML = xmlHttp.ResponseText

Set xmlResponse = Server.CreateObject("MSXML2.DomDocument")
xmlResponse.async = false
' oxml.setProperty "ServerHTTPRequest", true
xmlResponse.LoadXml(myXML)
Set xmlHttp = Nothing

Set objLst = xmlResponse.getElementsByTagName("item")
Set xmlResponse = Nothing

intNoOfHeadlines = objLst.length -1

For i = 0 To (intNoOfHeadlines)
Set objHdl = objLst.item(i)

for each child in objHdl.childNodes
Select case lcase(child.nodeName)
case "title"
title = child.text
case "link"
link = child.text
case "description"
description = child.text
'You can also use the following:
author,category,comments,enclosure,guid,pubDate,source
End Select
next

kk = kk+1
if kk < howManyresults+1 then
Response.Write "<br /><a href=""" & link & """>" & title & "</a> <br> "
& description

end if

Next
End Sub
%>

%>

End News.
 
Ad

Advertisements


Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top