Google Answers Logo
View Question
 
Q: RichSiteSubmission Feed In ASP Pages ( No Answer,   3 Comments )
Question  
Subject: RichSiteSubmission Feed In ASP Pages
Category: Computers > Programming
Asked by: adii-ga
List Price: $4.00
Posted: 01 Mar 2005 01:36 PST
Expires: 21 Mar 2005 01:48 PST
Question ID: 482761
I  am working on my company website. i have been trying to figure out
how to insert RSS feeds on ASP pages.
pages in java script are easily added however i am not being able to
do the same thing with with RSS feeds that are in xml format.
eg on http://www1.info.indiatimes.com/rss/ they have givena list of
RSS feeds that you only have to cut and paste onto your site.
however the xml format is creating problems. 
could you tell me how to either convert the format or insert xml directly

thanks 
Aditi
Answer  
There is no answer at this time.

Comments  
Subject: Re: RichSiteSubmission Feed In ASP Pages
From: willcodeforfood-ga on 01 Mar 2005 12:25 PST
 
Here's an online example:

http://www.tele-pro.co.uk/scripts/rss/rss_content_feed_class_ex.htm

Use google.com search terms: asp rss sample code
Subject: Re: RichSiteSubmission Feed In ASP Pages
From: ullfindsmit-ga on 18 Mar 2005 22:56 PST
 
Consume XML from an rss feed using ASP

<marquee width="151" direction="up" height="82" scrollamount="1" scrolldelay="5">
	<%
	If DateDiff("h", Application("ssNewsUpdated"), Now()) >= 1 Or
Request.QueryString("force") <> "" Then

		Dim objXML
		Dim objItemList
		Dim objItem
		Dim strHTML

		Set objXML = Server.CreateObject("MSXML2.FreeThreadedDOMDocument")
		objXML.async = False

		objXML.setProperty "ServerHTTPRequest", True
		'REPLACE it with the URL you want from indiatimes
		objXML.Load("http://rss.news.yahoo.com/rss/tech")

		If objXML.parseError.errorCode <> 0 Then
		   Response.Write "<pre>" & vbCrLf
		   Response.Write "<strong>Error:</strong> " & objXML.parseError.reason
		   Response.Write "<strong>Line:</strong>  " & objXML.parseError.line & vbCrLf
		   Response.Write "<strong>Text:</strong>  " &
Server.HTMLEncode(objXML.parseError.srcText) & vbCrLf
		   Response.Write "</pre>" & vbCrLf
		End If

		Set objItemList = objXML.getElementsByTagName("item")
		Set objXML = Nothing

		For Each objItem In objItemList
		   strHTML = strHTML & "<a href=""" & objItem.childNodes(1).text &
""" target=""_blank"">"
		   strHTML = strHTML & objItem.childNodes(0).text
		   strHTML = strHTML & "</a><br /><br />" & vbCrLf
		Next

		Set objItemList = Nothing

		Application.Lock
		Application("ssNewsText") = strHTML
		Application("ssNewsUpdated") = Now()
		Application.UnLock
	End If
	%>
	<%= Application("ssNewsText") %>
</marquee>

the working demo is here
http://old.omegasoftinc.com/

Alwayz
-Smit.
Subject: Re: RichSiteSubmission Feed In ASP Pages
From: adii-ga on 21 Mar 2005 01:47 PST
 
thanks Smit that was a big help

Important Disclaimer: Answers and comments provided on Google Answers are general information, and are not intended to substitute for informed professional medical, psychiatric, psychological, tax, legal, investment, accounting, or other professional advice. Google does not endorse, and expressly disclaims liability for any product, manufacturer, distributor, service or service provider mentioned or any opinion expressed in answers or comments. Please read carefully the Google Answers Terms of Service.

If you feel that you have found inappropriate content, please let us know by emailing us at answers-support@google.com with the question ID listed above. Thank you.
Search Google Answers for
Google Answers  


Google Home - Answers FAQ - Terms of Service - Privacy Policy