tried playing with magpie?
Magpie RSS - PHP RSS Parser
I have been looking into building an RSS feed for our school. We would like to take an RSS feed from another site ( Bible Gateway's Verse of the Day ) and combine it with a feed we wish to build at our own site.
I would like to be able to take the feed and covert it to HTML as well as have it as a normal RSS Feed.
I have found a lot of web services, such as yahoo pipes (Pipes: Redlands College / Bible Gateway) and dapper ( Verse of the Day Dapp ) that work, but I am concerned about the possibility of the services crashing and not showing the results at our end.
I then thought.... "Well someone must make some software to do the same thing???"
I would like some software that:
1) Can take another RSS Feed, allow you to swap items in it, to other fields (E.g. Move Content to Description ).
2) Can take a web page and filter out the elements I wish to add to the RSS feed.
3) Publish the RSS feed.
4) Convert the RSS feed to a HTML output
I might be asking for a bit to much from what I have seen out there, but I thought perhaps someone else may have come across something that might fit the bill?
rrichmond (8th June 2008)
you can run php & apache (&mysql) on windows using wamp.
Here's the ASP code I use to display the Bible Gateway verse of the day on my local church site:
And it's called with:Code:Function getXML2(feedURL) Dim XmlDocument Set XmlDocument = Server.CreateObject("Msxml2.DOMDocument.6.0") XmlDocument.setProperty "ServerHTTPRequest", true XmlDocument.async = False Dim Loaded Loaded = XmlDocument.load(feedURL) If Loaded Then Dim Items, Item, Title, Link, Description, TitleText, DescriptionText, LinkURL, Content2, Contenttext XmlDocument.setProperty "SelectionNamespaces","xmlns:content='http://purl.org/rss/1.0/modules/content/'" Set Items = XmlDocument.selectNodes("//item") Response.Write "<ul>" & VbCrLf For Each Item in Items Set Title = Item.selectSingleNode("title/text()") If Title Is Nothing Then TitleText = "" Else TitleText = Title.data End If Set Link = Item.selectSingleNode("guid") If Link Is Nothing Then LinkURL = "" Else LinkURL = Trim(Link.Text) End If Set Content2 = Item.selectSingleNode("content:encoded/text()") If Content2 Is Nothing Then Contenttext = "NULL" Else Contenttext = Content2.Data Contenttext = replace(ContentText,"Brought to you by <a href="http://www.edugeek.net/forums/web-development/"http://www.biblegateway.com"">BibleGateway.com</a>. Copyright (C) NIV. All Rights Reserved.","<span class=""biblegateway""><i>Brought to you by <a href="http://www.edugeek.net/forums/web-development/"http://www.biblegateway.com"">BibleGateway.com</a>. Copyright (C) NIV. All Rights Reserved.</i></span>") End If Set Description = Item.selectSingleNode("description/text()") If Description Is Nothing Then DescriptionText = "" Else DescriptionText = Description.data End If Response.Write "<li><a href="http://www.edugeek.net/forums/web-development/"" & LinkURL & """>" & TitleText & "</a></li>" & VbCrLf response.Write Contenttext Next Response.Write "</ul>" & VbCrLf End If End FunctionI forget where I got the original function from, and I've tweaked it a bit (with my crude replace function to italicise the "From Bible Gateway" message.)Code:getxml2("http://www.biblegateway.com/usage/votd/rss/votd.rdf")
I also have some ASP to generate an RSS feed from an access database if you're interested.
It shouldn't be too much work to combine them.
There are currently 1 users browsing this thread. (0 members and 1 guests)