Rss dinamico ?

[lucky2]

Ho realizzato in ASP un file rss.asp che genera un feed rss dinamico pescando i dati da un database.

Ora il mio problema è il seguente:

Il file generato è ovviamente con estensione ASP come faccio a renderlo in automatico con estensione xml per farlo leggere ai lettori rss (i dati variano ogni 5 minuti) ?

Grazie per le indicazioni

[weppos]

L'estensione non importa. Un file rss può essere benissimo .asp, l'importante è sparargli il giusto content type.

Se lo vuoi .xml il metodo più opportuno è quello di creare l'rss e poi con il file system object scrivere il file fisicamente sul server salvandolo con estensione .xml.

[lucky2]

Il file che ho generato in formato .asp è il seguente (vedi code), ma se provo a pubblicare il file ed inserire il link in un lettore rss nn mi restituisce nulla

<%
Response.ContentType = "text/xml"
%>
<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE rss PUBLIC "-//Netscape Communications//DTD RSS 0.91//EN" "http://my.netscape.com/publish/formats/rss-0.91.dtd">
<rss version="0.91">
  <channel>
    <title>Feed di prova</title>
    <link>http://www.miosito.it/</link>
    <description>Un feed RSS di prova</description>
    <language>it</language>

<%
Dim MM_ospedali_STRING
MM_ospedali_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/mdb-database/ospedali.mdb")

' estrazione dei dati
Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open MM_ospedali_STRING

set rs = objConn.execute("SELECT top 4 *  FROM SegnalazWeb  ORDER BY DataRec DESC")

URL = "www.miosito.it"

Do until rs.eof
  response.write "    <item>" &VbCrLf
  response.write "      <title>"& rs("ospedale") &"</title>" &VbCrLf
  response.write "      <link>" & (URL) &"</link>" &VbCrLf
  response.write "      <description>"& rs("motivo") &"</description>" &VbCrLf
  response.write "    </item>" &VbCrLf
  rs.movenext
loop
rs.close
set rs = nothing

objConn.close
set objConn = nothing

%>
  </channel>
</rss>

[weppos]

Ma se lo visiti leggi qualcosa?

[lucky2]

premesso che ho dovuto commentare questa voce :

<%
Response.ContentType = "text/xml"
%>

poichè mi da errore, se visito comunque la pagina creata mi restituisce a video :

 http://www.miosito.it/ Un feed RSS di prova  it   www.miosito.it Saturazione    www.miosito.it Saturazione    www.miosito.it Saturazione    www.miosito.it Saturazione

se visuualizzo il codice sorgente generato sembra compilato correttamente :

<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE rss PUBLIC "-//Netscape Communications//DTD RSS 0.91//EN" "http://my.netscape.com/publish/formats/rss-
0.91.dtd">
<rss version="0.91">
   <channel>
    <title>Feed di prova</title>
    <link>http://www.miosito.it/</link>
    <description>Un feed RSS di prova</description>
    <language>it</language>

    <item>
      <title>SACCO</title>
      <link>www.miosito.it</link>
      <description>Saturazione</description>
    </item>
    <item>
      <title>SACCO</title>

      <link>www.miosito.it</link>
      <description>Saturazione</description>
    </item>
    <item>
      <title>SACCO</title>
      <link>www.miosito.it</link>
      <description>Saturazione</description>

    </item>
    <item>
      <title>FATEBENEFRATELLI</title>
      <link>www.miosito.it</link>
      <description>Saturazione</description>
    </item>

  </channel>

</rss>

rimango in attesa

[weppos]

O mamma...
Dunque, prima cosa leva la DTD.

[QUOTE]<!DOCTYPE rss PUBLIC "-//Netscape Communications//DTD RSS 0.91//EN" "http://my.netscape.com/publish/formats/rss-
0.91.dtd">

Seconda cosa se possibile metti la codifica UTF-8.

Come contentType usa application/xml.

Gli URL nel tag link vanno assoluti.

[lucky2]

Ho fatto come da te suggerito, ho escluso la DTD ed inserito l'application/xml ma mi restituisce sempre questo errore :

Errore XML: istruzione di processamento XML non all'inizio di entità esterna
Percorso: http://www.118milano.it/provarss.asp
Linea numero 2, colonna 1:<?xml version="1.0" encoding="iso-8859-1"?>
^

il codice che uso modificato è il seguente :

<%
Response.ContentType = "application/xml"
%>
<?xml version="1.0" encoding="iso-8859-1"?>
<rss version="0.91">
   <channel>
    <title>Feed di prova</title>
    <link>http://www.118milano.it/</link>
    <description>Un feed RSS di prova</description>
    <language>it</language>

<%

' estrazione dei dati
Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open MM_ospedali_STRING

set rs = objConn.execute("SELECT top 4 *  FROM SegnalazWeb  ORDER BY DataRec DESC")

URL = "http://www.118milano.it"

Do until rs.eof
  response.write "    <item>" &VbCrLf
  response.write "      <title>"& rs("ospedale") &"</title>" &VbCrLf
  response.write "      <link>" & (URL) &"</link>" &VbCrLf
  response.write "      <description>"& rs("motivo") &"</description>" &VbCrLf
  response.write "    </item>" &VbCrLf
  rs.movenext
loop
rs.close
set rs = nothing

objConn.close
set objConn = nothing

%>
  </channel>
</rss>

[weppos]

Accertati che non stampi caratteri.

[lucky2]

negativo, al suo interno ha una connessione DNS :

Dim MM_ospedali_STRING
MM_ospedali_STRING = "dsn=ospedali;"

[Shagrat]

io proverei comunque a mettere

<%
Response.ContentType = "application/xml"
%>

prima dell'include

tanto non costa niente