Mostrare un feed RSS

di Daniele Bochicchio, in XML, Misc,

RSS è un particolare formato, inventato e messo punto da Netscape, per scambiare dati attraverso un file XML.
E' utilizzato dalla maggior parte dei siti, essendo in pratica uno standard per la creazione di feed.
Lo script di oggi si occupa proprio di mostrarne, dato un feed, i contenuti, utilizzando il parser XML di Microsoft per "navigare" tra i contenuti del file XML generato.

<%

Sub RSS (URL)

  Set objXML = Server.CreateObject("msxml2.DOMDocument.3.0")

  objXML.async = false
  objXML.setProperty "ServerHTTPRequest", True

  ' validazione
  objXML.validateOnParse =false' true

  ' non conservare spazi
  objXML.preserveWhiteSpace = false

  blnLoaded = objXML.Load(URL)

  If Not blnLoaded Then
    Response.write "<P>ERRORE<br>codice: " & _
                   objXML.parseError.errorCode & _
                   "<br>Linea/Col: " & _
                   objXML.parseError.line & "/" & _
                   objXML.parseError.linepos & "</P>"
  Else

    Set objNodeList = objXML.getElementsByTagName("item")

    For Each objNode In objNodeList

      For Each objNode2 In objNode.childNodes
        Select Case objNode2.nodeName
   Case "title"
     strTitle = objNode2.firstChild.nodevalue
          Case "link"
            strURL = objNode2.firstChild.nodevalue
          Case "description"
            strDescription = objNode2.firstChild.nodevalue
          End Select

        Next

        ' mostro a video
        Response.write "<li><a href=""" & strURL & """>" & _
                       strTitle & "</A><BR>" & strDescription

        strTitle = ""
        strURL = ""
        strDescription = ""

      Next

     set objNodeList = Nothing
  End if

End sub

' RSS di ASPItalia.com
call RSS("http://newsgroup.aspitalia.com/feed/feed.xml")

%>

Il feed utilizzato in questo esempio è quello relativo agli ultimi 6 contenuti pubblicati su ASPItalia.com
Ci sono comunque molti altri siti che offrono questo servizio, tra cui, ad esempio, moreover.com.

Commenti

Visualizza/aggiungi commenti

| Condividi su: Twitter, Facebook, LinkedIn

Per inserire un commento, devi avere un account.

Fai il login e torna a questa pagina, oppure registrati alla nostra community.

Approfondimenti

Nessuna risorsa collegata

I più letti di oggi