Click here to Skip to main content
Click here to Skip to main content

A Simple Example of RSS Feed Reader

, 1 Aug 2009 CPOL
Rate this:
Please Sign up or sign in to vote.
This article will demonstrate how to read RSS feeds

Introduction 

Nowadays, RSS is a great features of web / windows platform as well. What is RSS?

RSS (Rich Site Summary) is a format for delivering regularly changing web content. Many news-related sites, weblogs and other online publishers syndicate their content as an RSS Feed to whoever wants it.

It allows you to easily stay informed by retrieving the latest content from the sites you are interested in. In this article, I would like to demonstrate how we can read RSS feeds.

Background 

For seeking information, traditionally we visit various sites individually which is time consuming & also very dull. Use of RSS will save your time by not needing to visit each site individually. It also ensures privacy, by not needing to join each site's email newsletter.

The number of sites offering RSS feeds is growing rapidly and includes big names like Yahoo News.

Using the Code  

Using the code is pretty simply; let’s take a simple example to implement this. Our requirement will be reading an RSS feed and displaying it into datagrid view control. We are using a very common & popular RSS feed (http://www.cricinfo.com/rss/livescores.xml) of a wonderful sports news site cricinfo.com.

Here we need a simple basic concept on Dataset class, which will be found at System.data namespace.

More details can be found at this link.

Imports System
Imports System.Data.DataSet
Imports System.IO
Imports System.Web
Imports System.Xml
Imports System.Net

Public Class rssFeed
    Public objDataset As DataSet = New DataSet
    ' Button event 
    Private Sub ButtonClose_Click(ByVal sender As System.Object, _
	ByVal e As System.EventArgs) Handles ButtonClose.Click
        Application.Exit()
    End Sub

    Private Sub ButtonGet_Click(ByVal sender As System.Object, _
	ByVal e As System.EventArgs) Handles ButtonGet.Click
        Try
            If Me.TextBoxWebAddress.Text.Trim <> vbNullString Then
                Me.dgViewPreview.DataSource = Nothing
                objDataset.ReadXml(Me.TextBoxWebAddress.Text.Trim, _
                                   XmlReadMode.Auto)
                dgViewPreview.DataSource = objDataset.Tables(2)
                Me.WebBrowser1.Navigate(Me.TextBoxWebAddress.Text.Trim)
                Me.WebBrowser1.Refresh()

            End If
        Catch ex As Exception
            objDataset = Nothing
            MessageBox.Show(ex.Message.ToString)
        End Try
    End Sub

    Private Sub LinkLabelAuthor_LinkClicked(ByVal sender As System.Object, _
	ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) _
	Handles LinkLabelAuthor.LinkClicked
        Try
            Me.WebBrowser1.Navigate("http://www.codeproject.com/Members/Md-Marufuzzaman")
            Me.WebBrowser1.Refresh()
        Catch ex As Exception
            MessageBox.Show(ex.Message.ToString)
        End Try

    End Sub
    
    Private Sub dgViewPreview_MouseClick(ByVal sender As System.Object, _
	ByVal e As System.Windows.Forms.MouseEventArgs) _
	Handles dgViewPreview.MouseClick
        Dim intRow As Integer = 0
        Dim intItems As Integer = 0
        Dim strText As String = vbNullString

        Try
            intRow = CInt(Me.dgViewPreview.CurrentCell.RowNumber)
            intItems = CInt(Me.dgViewPreview.CurrentCell.ColumnNumber)
            strText = objDataset.Tables(2).Rows(intRow).Item(intItems)
            MessageBox.Show(strText, _
                            "Selected text", _
                            MessageBoxButtons.OK, _
                            MessageBoxIcon.Information, _
                            MessageBoxDefaultButton.Button1, _
                            MessageBoxOptions.DefaultDesktopOnly)
        Catch ex As Exception
            MessageBox.Show(ex.Message.ToString)
        End Try

    End Sub
End Class       

Conclusion

I hope you like this article. Enjoy!

History

  • 1st August, 2009: Initial post

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Share

About the Author

Md. Marufuzzaman
CEO
Bangladesh Bangladesh
A highly experienced leader with successful track record of software development, product innovations, brand management and corporate communication etc. Some successful product innovations have also achieved and awards “Most Valuable Professional” (MVP) at 2010 and 2011 by codeproject.com and also selected as a mentor of codeproject.com. Published over 100 technical articles in various software development resource sites (i.e., codeprojetc.com, Microsoft MSDN, and IEEE & IBM (In progress)) and various IT Forums, Blogs etc.
 
Over ten years of professional experiences in ICT field having extensive experience in formulating corporate vision and long term strategy. Leading development related functions including design, development, services, data management and analytics, customer experience management, content services, digital analytics and optimization.
 
An individual with results-driven approach and relentless in pursuit of excellence from a business and organizational standpoint. Believes in transparency, commitment and teamwork.
 
Expertise: Software/Solution Architect, SaaS platform base application, Large scale win32/web based business software solutions, enterprise applications, integration, etc.
 
Technologies/Tools: Microsoft.Net version 05/08/10/12, Microsoft SQL Server version 7/2K/05/08/12 , Oracle version 10/11, MySql version 5.1, 5.5, PS2, Visual C#, R, VB.NET, ASP.NET, PHP, API, MVC, WebAPI , Add-In Visual Basic etc.,. I have also more than two years’ of strong experience in mobile-VAS (platform development).
 
Points of Interest: Technology and research & development especially focused on business functionalities and social business areas as well, few stuff including:
 
1.R&D on new techniques as required to increase business revenue.
2.Urban and rural sectors to improve people’s lifestyle, better medical facilities, education, social business etc., using innovative technical solutions.
3.Research and innovative product development.
4.Etc.
Follow on   Twitter   LinkedIn

Comments and Discussions

 
GeneralI always thought RSS stood for Really Simple Syndication... Pinmemberkaschimer28-Jun-10 5:44 
GeneralRe: I always thought RSS stood for Really Simple Syndication... PinmvpMd. Marufuzzaman28-Jun-10 21:52 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Mobile
Web02 | 2.8.141015.1 | Last Updated 1 Aug 2009
Article Copyright 2009 by Md. Marufuzzaman
Everything else Copyright © CodeProject, 1999-2014
Terms of Service
Layout: fixed | fluid