Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   ASP Clásico (http://www.forosdelweb.com/f15/)
-   -   Crear rss desde ASP (http://www.forosdelweb.com/f15/crear-rss-desde-asp-473222/)

richard20 15/03/2007 11:23

Crear rss desde ASP
 
Estimados,

Necesito crear un RSS ya tengo creado el archivo xml ya se como crear un archivo xml y no tengo problemas pero para que quede como RSS tengo que agregarle

<rss version="0.91">
contenidoxml_Ok
</rss>

y es ahí el problema ya no se como puedo hacer para incluir la etiqueta rss con su versión y el valor correspondiente a este.

alguien me puede ayudar???.

Desde ya muchas Gracias.

3pies 15/03/2007 12:12

Re: Crear rss desde ASP
 
Ejemplo de código para un fichero que llamaremos noticias.asp
Código:

<%
'Creamos la conexión con la Base de Datos
set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("noticias.mdb"))
'Montamos la sentencia SQL, con las 5 cinco noticias
SQL="SELECT TOP 5 id, fecha, titulo, noticia, autor FROM noticias ORDER BY fecha DESC"
'Ejecutamos la consulta
set rs=oConn.Execute(SQL)
'Escribimos el código xml
response.write "<?xml version=""1.0"" encoding=""ISO-8859-1""?>"
response.write "<rss version=""2.0"" xmlns:dc=""http://purl.org/dc/elements/1.1/"" xmlns:content=""http://purl.org/rss/1.0/modules/content/"">"
response.write "<channel>"
response.write "<title>Noticias de mi web</title>"
response.write "<link>http://www.tuweb.com</link>"
response.write "<description>Mi web, y tal y tal...</description>"
response.write "<language>es-ES</language>"
'Vamos al primer registro
rs.MoveFirst
'Montamos el bucle
do while not rs.eof
 autor=rs("autor")
 response.write "<item>"
 'Mostramos los primeros 200 caracteres de la noticia
 if len(rs("noticia"))>200 then
  noticia=replace(left(rs("noticia"),200) & "...",vbCrLf,"<br />")
 else
  noticia=replace(rs("noticia"),vbCrLf,"<br />")
 end if
 'escribimos el nodo XML
 response.write "<title>" & rs("titulo") & "</title>"
 response.write "<link>http://www.tuweb.com/noticia.asp?id=" & rs("id") & "</link>"
 response.write "<description><![CDATA[" & noticia & "]]></description>"
 response.write "<guid>http://www.tuweb.com/noticia.asp?id=" & rs("id") & "</guid>"
 response.write "<dc:creator>" & autor & "</dc:creator>"
 response.write "</item>"
 'nos movemos al siguiente registro
 rs.MoveNext
loop
response.write "</channel>"
response.write "</rss>"
'Cerramos y limpiamos los objetos
rs.Close
oConn.Close
set rs=nothing
set oConn=nothing
%>

Si quisieras poner la fecha al lado de cada item, habría que pasarla a formato RFC-822.

Salu2

richard20 15/03/2007 13:12

Re: Crear rss desde ASP
 
mmmm. lo que pasa es que no quiero mostrarlo quiero guardarlo en un archivo

y para eso estoy ocupando el objeto

set xmldoc = server.createobject("MSXML2.DomDocument.3.0")

xmldoc.appendChild xmldoc.createProcessingInstruction("xml","version= ""1.0""")

xmldoc.appendChild xmldoc.createElement("rss version='0.91'") ' esta es linea que no me funcionaaaaaaaaaaaaaaaaaaaa.

xmldoc.save server.mappath(".") & "/rss/prueba.rss.xml"

daniel00 15/03/2007 14:18

Re: Crear rss desde ASP
 
Que tal Richard.

Ya probaste así:

xmldoc.appendChild xmldoc.createElement("rss version=""0.91""")

Saludos.

richard20 15/03/2007 14:40

Re: Crear rss desde ASP
 
si Daniel si probe de la manera en que me indicas pero me arroja de todas formas un error...

debe haber una forma de crear un item con subitem y valor dentro del mismo

se me ocurre que por ahí va la solución. onda

<fruta color=rojo>manzanas</fruta>


La zona horaria es GMT -6. Ahora son las 07:39.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.