![]() |
|
|
| 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 |
|
| There is no answer at this time. |
|
| 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 |
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 Home - Answers FAQ - Terms of Service - Privacy Policy |