Mondays at 9:00 EST on NBC
TV Home / Entertainment Channel / Bullz-Eye Home
Feedback: Let's hear your opinion!
<%
' +---------------------------------------------+
' | 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.premiumhollywood.com/tag/heroes-blog/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
%>
" & CStr(CDate(mid(rss.pubDates(i),6,11))) & "
" descr = rss.Descriptions(i) descr = replace(descr,"
You can follow us on Twitter and Facebook for content updates. Also, sign up for our email list for weekly updates and check us out on Google+ as well.