Mostrando Codigo - Xml

<!-- Codigo ofrecido por Tutores.org -->
<% OPTION EXPLICIT %>
<%
'declaramos las variables
dim cuantos
dim muestra
dim conexion
dim sql
dim archivo_creado
dim fso
dim archivo
dim rs
dim basedatos
'final declaracion de variables
cuantos=0 ' iniciamos un contador
muestra = 20 'cuantos vamos a mostrar
archivo_creado= "urls.xml" 'nombre del archivo
basedatos = "urls.mdb" 'base de datos
set conexion=Server.CreateObject("ADODB.connection") 'conexion a la base de datos
conexion.provider="Microsoft.Jet.OLEDB.4.0;" 'tipo base de datos
conexion.open server.mappath(basedatos) ' abrimos la BD
sql="select * from urls order by titulo desc" 'hacemos la seleccion
set fso = createobject("scripting.filesystemobject") ' inicio para crear archivo
Set archivo = fso.CreateTextFile(server.mappath(archivo_creado), true) 'creamos el archivo para ser escrito
set rs=conexion.Execute(sql) 'ejecutamos conexion a la base de datos
archivo.WriteLine("<?xml version='1.0' encoding='ISO-8859-1'?>") 'Cabecera del archivo
archivo.WriteLine("<rss version='0.91'>")
archivo.WriteLine("<title>Crear archivo xml - Tutores.org</title>")
archivo.WriteLine("<scripts>")
'Final cabecera y empezamos a mostrar los registro
do while not rs.EOF and cuantos < muestra
archivo.WriteLine("<Script>")
archivo.WriteLine("<Titulo>" & rs("titulo") & "</Titulo>")
archivo.WriteLine("<Descripcion>" & replace(replace(replace(rs("descripcion"),">",""),"<",""),"&","") & "</Descripcion>")
archivo.WriteLine("<Url>"&rs("url")&"</Url>")
archivo.WriteLine("</Script>")
rs.MoveNext()' pasamos al siguite registro
cuantos=cuantos+1 'contamos
loop 'volvemos, hasta mostrar el ultimo
rs.close() ' cerramos la consulta
conexion.close()'cerramos la conexion a la base de datos
'escribimos en el archivo el pie de pagina
archivo.WriteLine("</scripts>")
archivo.WriteLine("</rss>")
archivo.close ' cerramos el archivo
%>

<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Creacion de Archivo Xml desde Base de Datos - ASP" href="http://www.tutores.org/codigo/1215/" target="_blank">Creacion de Archivo Xml desde Base de Datos - ASP</a>
<!-- Final enlace Tutores.org -->

Kargarof 07-05-2007 08:35:57

Necesitaría saber si alguien podría detallarme los cambios que debo hacer en el texto para que funcione con mi base de datos, es decir, explicarme un poco más cada parte, gracias de antemano

Tutores.org 19/04/2003

Hola
hemos comentado el codigo, a ver site sirve de ayuda
saludos

LokO

Necesitaria saber si tienen indea de como agregar en este archivo XML el servicio de GOOGLE ADSENSE PARA SINDICACION. Saludos Gracias !

melino

quiero leer un cd rom pero no se porque no puedo no mi sale el texto .... el cd es un archivo de typo xml

erikaemc

Hola quisiera saber si alguien me puede ayudar..
quiero cargar un archivo xml (el archivo ya esta creado xml) lo que debo hacer es un store procedure desde sql que cargue dicho archivo a una bd en sql..
es urgente!!!!!!!!!!!!!!!!!!!

Richy

Hola Amigos,hace una semana que ando dando vueltas por aqui

checando el codigo de creacion de un xml desde una mdb en asp, no me funciona nada no se que este mal, mi servidor se queda colgado, ya configure a la perfección el iis y todo pero se traba el server como que se queda pensando, en esta misma web encontre otro codigo parecido a este pero pasa lo mismo, no logro crear mi xml y me urge bastante ¿me podrian ayudar porfa? me urge muchisimo lo necesito para trabajar, mi correo es black_raven@live.com.mx muchas gracias espero su respuesta y que tengan un ecxelente día.

Saludos.

Richy.

Jorge 08/11/2004 18.01.55

Hola alguien me puede explicar como modifico el archivo asp para que cuando me genere el xml la estructura sea la siguiente:

<items>
<Item title="Noticias de hoy" url="http://.mypage.com"
description="Lea todos nuestros boletines del dia dehoy" />
</items>