If you need to generate a RSS Feed from scratch - for example for an html static website or a site which is not your own - you can of course download some softwares to do so but after trying many of them, I didn’t find them as productive as I wish so I decided to use my favorite scripting language to do so.

If you have followed past tutorials like this one, the script should be easy to understand so I won’t comment it as you should understand it by just reading the source code below. To test it, just copy and paste it in rebol’s console then type genrss and result should be copied to the clipboard.

datas: [
"Creating an OData API for StackOverflow including XML and JSON in 30 minutes"
http://www.hanselman.com/blog/CreatingAnODataAPIForStackOverflowIncludin...
{I emailed Jeff Atwood last night a one line email. "You should make a StackOverflow API using OData." Then I realized that, as Linus says, Talk is Cheap, Show me the Code. So I created an initial prototype of a StackOverflow API using OData on an Airplane. I allocated the whole 12 hour flight. Unfortunately it took 30 minutes so I watched movies the rest of the time.}
"2010-03-28 09:29"

"Web Deployment Made Awesome: If You're Using XCopy, You're Doing It Wrong"
http://www.hanselman.com/blog/WebDeploymentMadeAwesomeIfYoureUsingXCopyY...
{I did a talk on Deployment called "Web Deployment Made Awesome: If You're Using XCopy, You're Doing It Wrong." }
"2010-03-24 10:36"

"ASP.NET MVC 2 Released"
http://www.hanselman.com/blog/ASPNETMVC2Released.aspx
{ASP.NET MVC 2 is out. This means, it's released. It's final. Use it. Love it.

You can download it directly, or install it (and whatever else you like) with the Web Platform Installer.}
"2010-03-11 09:35"
]    

if exists? %datas.txt [
    datas: load %datas.txt
]

genrss: func[][

item-template: {    
      
      <%url%>
      <%description%>
      <%date%>
    
    }

  items: copy ""
  foreach [field-title field-url field-description field-date] datas [
    title: field-title
    url: field-url
    description: field-description
    date: field-date
    append items build-markup item-template
    append items newline
  ]

  template: {<?xml version="1.0" encoding="UTF-8"?>

  
    Sat, 03 Apr 2010 21:52:39 +0200
<%items%>
  
}  

  write clipboard:// build-markup template
]

0 people like this post.

Like 

<!-- Social Bookmarks BEGIN -->

Bookmark this

<!-- Social Bookmarks END -->