leggere rss

[pietro09]

:master: è corretto leggere un rss in questo modo? o ci sono metodi migliori?

    Private Function getRSS(ByVal url As String) As String
        Dim myWebClient As System.Net.WebClient
        Dim myStream As System.IO.Stream = Nothing
        Dim xmldoc As XmlDocument

        Dim sb As New StringBuilder

        Try
            myWebClient = New System.Net.WebClient
            myStream = myWebClient.OpenRead(Url)

            xmldoc = New XmlDocument
            xmldoc.Load(myStream)

            Dim items As XmlNodeList = xmldoc.GetElementsByTagName("item")

            For Each elemento As XmlElement In items
                Dim titles As XmlNodeList = elemento.GetElementsByTagName("title")
                Dim descriptions As XmlNodeList = elemento.GetElementsByTagName("description")
                sb.Append("<h3>" & titles(0).InnerText & "</h3>" & descriptions(0).InnerText & "<hr/>")
            Next


        Catch ex As Exception
            Throw

        Finally
            myStream.Close()

        End Try

        Return sb.ToString

    End Function

[tyson69]

Ciao io uso questo:

Try
If (Cache("MSDNVBRSS") Is Nothing) Then
Cache.Insert("MSDNVBRSS", GetRSS("http://msdn.microsoft.com/vbasic/rss.xml"), Nothing, DateTime.Now.AddMinutes(20), TimeSpan.Zero)
End If
RepeaterVB.DataSource = Cache("MSDNVBRSS")
RepeaterVB.DataBind()
Catch ex As Exception
Response.Write(ex.Message)
End Try



Private Function GetRSS(ByVal RSSUrl As String) As DataTable

Dim reader As New XmlTextReader(RSSUrl)
Dim ds As New DataSet
ds.ReadXml(reader)

Dim rssTable As DataTable = ds.Tables(2)

ds.Dispose()
reader.Close()

Return rssTable

End Function

[pietro09]

effettivamente è molto più semplice come usu tu.

ciao

[tyson69]

...ti sono debitore...

[pietro09]

Originariamente inviato da tyson69
...ti sono debitore...

boh! ho fatto qualche buona azione in passato? :master:

[pietro09]

Originariamente inviato da tyson69
Ciao io uso questo:

ho provato con siti diversi e sono giunto alla conclusione che è meglio leggere la tabella per nome e non per indice:

io uso ds.Tables("item") al posto di ds.Tables(4). Per il resto ok