Sports Humor
Sports Channel / Bullz-Eye Home
Sports fans love a good laugh, especially when it comes at the expense of some of the idiots on the field and in front offices.
<%
' +---------------------------------------------+
' | RSS Content Feed VBScript Class 1.0 |
' | © 2004 www.tele-pro.co.uk |
' | http://www.tele-pro.co.uk/scripts/rss/ |
' +---------------------------------------------+
'
' Sample VBScript Code for the RSSContentFeed Class
' Example Code - Simple
' sample_code1.asp
%>
<%
'create object
Dim rss
Set rss= New RSSContentFeed
'get content
'////////////////////////// Change Feed Address Here: ///////////////////////
rss.ContentURL = "http://www.scoresreport.com/tag/new-bang-cartoon/feed/"
'/////////////////////////////////////////////////////////////////////////////////
rss.GetRSS()
Dim i
Dim descr
For Each i in rss.Results
response.write ""
descr = rss.Descriptions(i)
descr = replace(descr,"","")
descr = replace(descr,"","")
response.write "" & Server.HTMLEncode(rss.Titles(i)) & " " & Escape_Chars(mid(rss.Contents_Encoded(i),4,len(rss.Contents_Encoded(i)))) & ""
response.write ""
Next
'release object
Set rss= Nothing
%>