15-mar-2007, 12:23
|
#1 (permalink) |
139 Mensajes  
|
Crear rss desde ASP
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.
__________________
-.No Sueñes tu Vida, Vive tus Sueños.- |
|
|
15-mar-2007, 13:12
|
#2 (permalink) |
|
Colaborador
2.197 Mensajes Ubicación: Desde una destilería
|
Re: Crear rss desde ASP
Ejemplo de código para un fichero que llamaremos noticias.asp
Código:
Si quisieras poner la fecha al lado de cada item, habría que pasarla a formato RFC-822.<%
'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
%>
Salu2 |
|
|
|
15-mar-2007, 14:12
|
#3 (permalink) |
|
139 Mensajes
|
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"
__________________
-.No Sueñes tu Vida, Vive tus Sueños.- |
|
|
|
15-mar-2007, 15:40
|
#5 (permalink) |
|
139 Mensajes
|
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>
__________________
-.No Sueñes tu Vida, Vive tus Sueños.- |
|
|
 |
| Herramientas | |
| Desplegado | |
|
|
Modo lineal
