non ho problemi nel leggere il feed, ma nel risultato che ne ottengo pieno di "?"
il link è questo
http://www.mymovies.it/cinema/xml/rss/?id=palermo
il codice problematico questo
codice:
<item>
<title>Ultimatum alla Terra</title>
<link>http://www.mymovies.it/dizionario/re...e.asp?id=56567</link>
<guid isPermaLink="true">http://www.mymovies.it/dizionario/re...e.asp?id=56567</guid>
<description>
<a href= "http://www.mymovies.it/dizionario/recensione.asp?id=56567" alt="ULTIMATUM ALLA TERRA"" target="_blank"><img src= "http://www.mymovies.it/filmclub/2008/06/123/mini.jpg" align="left" style="border:solid 1px #aeaeae; padding:3px; float:left; margin-right:3px; margin-top:3px;"/></a><b>L’alieno Klaatu atterra sull’America post-undici settembre con un avvertimento per l’umanità: non fate la guerra e amate l’ambiente</b><br />
<![CDATA[
]]>
<![CDATA[
]]>
<![CDATA[
]]>
<![CDATA[
]]>
<![CDATA[
]]>
<![CDATA[<span style="font-size:80%; color:#696969; margin-left:3px">(mymo<em style="letter-spacing:1px;">net[/i]ro: 2,53)</span>
]]>
<br />
Regia di <a href="http://www.mymovies.it/biografia/?r=18325">Scott Derrickson</a>.
Con <a href="http://www.mymovies.it/biografia/?a=6583">Keanu Reeves</a>, <a href="http://www.mymovies.it/biografia/?a=10799">Jennifer Connelly</a>, <a href="http://www.mymovies.it/biografia/?a=66365">Jaden Smith</a>, <a href="http://www.mymovies.it/biografia/?a=6133">John Cleese</a>, <a href="http://www.mymovies.it/biografia/?a=121280">Jon Hamm</a>, <a href="http://www.mymovies.it/biografia/?a=4275">Kathy Bates</a>, <a href="http://www.mymovies.it/biografia/?a=96651">Brandon Jackson</a>, <a href="http://www.mymovies.it/biografia/?a=14982">James Hong</a>, <a href="http://www.mymovies.it/biografia/?a=60018">Aaron Douglas</a>, <a href="http://www.mymovies.it/biografia/?a=62674">Roger R. Cross</a>, <a href="http://www.mymovies.it/biografia/?a=61160">Lorena Gale</a>, <a href="http://www.mymovies.it/biografia/?a=64286">Alisen Down</a>, <a href="http://www.mymovies.it/biografia/?a=123239">Richard Tillman</a>, <a href="http://www.mymovies.it/biografia/?a=98086">J.C. MacKenzie</a>, <a href="http://www.mymovies.it/biografia/?a=123240">Mousa Kraish</a>.
<br />
Genere <a href= "http://www.mymovies.it/film/fantascienza/" title="Film fantascienza" target="_blank">Fantascienza</a>
- USA,
<a href= "http://www.mymovies.it/film/?anno=2008" title="Film 2008" target="_blank">2008</a>. Durata 103 minuti circa.<br/><br/><p style="text-align:justify; margin:0px; padding:0px;" >Rifacimento contemporaneo del celebre classico di fantascienza del 1951. La celebre scienziata Helen Benson si ritrova faccia a faccia con un alieno chiamato Klaatu, che ha viaggiato nell’universo per avvertire l’umanità di un’imminente crisi globale. Quando delle forze che sfuggono al controllo di Helen ritengono ostile l’extraterrestre e gli negano la possibilità di parlare ai leader del mondo come aveva richiesto, lei e il figliastro Jacob, con cui è in cattivi rapporti, scoprono rapidamente le conseguenze mortali della frase di Klaatu, che si reputa “un amico della Terra”. Ora Helen deve trovare un modo di convincere questa entità che è stata inviata per distruggerci che l’umanità in realtà merita di essere salvata. Ma potrebbe essere troppo tardi. Il processo ha avuto inizio.</b><br /><br /><b>A Palermo: </b><br /> - <a href= "http://www.mymovies.it/cinema/palermo/5681/" target="_blank">Cinema Dante</a> (16:30 - 18:30 - 20:30 - 22:30) <br /><br /><b>In provincia di Palermo: </b><a href="http://www.mymovies.it/cinema/palermo/bagheria/" target="_blank">Bagheria</a>, <a href="http://www.mymovies.it/cinema/palermo/terminiimerese/" target="_blank">Termini Imerese</a><div style="background-color:#D6D6D8; padding:3px;" ><a href= "http://www.mymovies.it/cinema/palermo/provincia/?f=56567" title="Orari e programmazione ULTIMATUM ALLA TERRA" target="_blank">Orari e Programmazione</a> | <a href= "http://www.mymovies.it/dizionario/recensione.asp?id=56567" title="Recensione Ultimatum alla Terra" target="_blank">Recensione</a> | <a href= "http://www.mymovies.it/recensioni/?id=56567" title="Critica Ultimatum alla Terra" target="_blank">Critica</a> | <a href= "http://www.mymovies.it/trailer/?id=56567" title="Trailer Ultimatum alla Terra" target="_blank">Trailer</a> | <a href= "http://www.mymovies.it/dizionario/colonnasonora.asp?id=56567" title="Colonna sonora Ultimatum alla Terra" target="_blank">Colonna sonora</a> | <a href= "http://www.mymovies.it/poster/?id=56567" title="Locandina Ultimatum alla Terra" target="_blank">Locandina</a></div><br /><br />
</description>
<category>film</category>
<category>recensioni</category>
<category>critica</category>
<category>trailer</category>
<category>locandine</category>
<category>cinema</category>
<category>di Palermo</category>
</item>
il problema è nel nodo description
per gli apostrofi viene usato il simbolo "’" che viene convertito automaticamente in lettura in un punto interrogativo
ho provato a fare un replace, ma non funziona
il codice che ho usato è questo:
codice:
dim mc_url
dim mc_objXML, mc_blnLoaded, mc_objRss, mc_objChannel, mc_objNode, mc_objNode_item, mc_temp_descr
'Rielabora un documento XML RSS e RDF
'e fornisce in output un documento HTML
mc_url = "http://www.mymovies.it/cinema/xml/rss/?id=palermo"
' Creo oggetto DOM XML
Set mc_objXML = Server.CreateObject("msxml2.DOMDocument.3.0")
mc_objXML.async = false
mc_objXML.setProperty "ServerHTTPRequest", True
' validazione del documento XML
mc_objXML.validateOnParse = false 'true
' non conservare spazi
mc_objXML.preserveWhiteSpace = false
mc_blnLoaded = mc_objXML.Load(mc_url)
If Not mc_blnLoaded Then
testo_evidenziato_info("Dati non disponibili.")
torna_indietro
Else
Set mc_objRss = mc_objXML.documentElement
For each mc_objChannel in mc_objRss.childNodes
For each mc_objNode in mc_objChannel.childNodes
If mc_objNode.nodename = "item" Then
For each mc_objNode_item in mc_objNode.childNodes
If mc_objNode_item.nodename = "title" Then
Response.Write("<div style=""font-size:16px; font-weight:bold; margin-bottom:5px;"">" & mc_objNode_item.text & "</div>")
End If
If mc_objNode_item.nodename = "description" Then
mc_temp_descr = mc_objNode_item.text
mc_temp_descr = Replace(mc_temp_descr, "’", "'")
mc_temp_descr = Left(mc_temp_descr, (Instr(mc_temp_descr, "<div style")-1))
Response.Write(mc_temp_descr)
End If
Next
Response.Write("<div style=""margin-bottom:20px;""><hr /></div>")
End If
Next
Next
End If
che sbaglio?