Publicentral.com - alta en buscadores, registro buscadores, promocionaPromocion en buscadores y negocios online
Mostrando Codigo - Xml
Code

Xml - Creacion de Archivo Xml desde Base de Datos - ASP

Códigos Xml

El script consigue crear un archivo Xml a partir de los datos obtenidos desde una base de datos .Mdb ( Access ). Contiene archivo descargable con base de datos Access. Modificaciones en código: Linea 13 - Cantidad de registros que se obtendran de la Db y se crearan en el archivo xml. Linea 14 - El nombre que le daremos al archivo Xml, hay que tener en cuanta que el archivo debe de crearse en una carpeta con permisos de escritura. Linea 15 - Nombre de la base de datos El resto de las variables debemos modificarlas acorde con nuestras conexiones a la base de datos.
Visitas: 46,432 - 31/07/2004 0:21:03
Archivo descargable »
CODIGO SIN DEMOSTRACIONDownloadComentario
CODIGO
Codigo probado en ChromeCodigo probado en Mozilla FirefoxCodigo probado en Internet Explorer 7+Codigo probado en OperaCodigo probado en Safari


<!-- Codigo ofrecido por Tutores.org -->

  1. <% OPTION EXPLICIT %>
  2. <%
  3. 'declaramos las variables
  4. dim cuantos
  5. dim muestra
  6. dim conexion
  7. dim sql
  8. dim archivo_creado
  9. dim fso
  10. dim archivo
  11. dim rs
  12. dim basedatos
  13. 'final declaracion de variables
  14. cuantos=0 ' iniciamos un contador
  15. muestra = 20 'cuantos vamos a mostrar
  16. archivo_creado= "urls.xml" 'nombre del archivo
  17. basedatos = "urls.mdb" 'base de datos
  18. set conexion=Server.CreateObject("ADODB.connection") 'conexion a la base de datos
  19. conexion.provider="Microsoft.Jet.OLEDB.4.0;" 'tipo base de datos
  20. conexion.open server.mappath(basedatos) ' abrimos la BD
  21. sql="select * from urls order by titulo desc" 'hacemos la seleccion
  22. set fso = createobject("scripting.filesystemobject") ' inicio para crear archivo
  23. Set archivo = fso.CreateTextFile(server.mappath(archivo_creado), true) 'creamos el archivo para ser escrito
  24. set rs=conexion.Execute(sql) 'ejecutamos conexion a la base de datos
  25. archivo.WriteLine("<?xml version='1.0' encoding='ISO-8859-1'?>") 'Cabecera del archivo
  26. archivo.WriteLine("<rss version='0.91'>")
  27. archivo.WriteLine("<title>Crear archivo xml - Tutores.org</title>")
  28. archivo.WriteLine("<scripts>")
  29. 'Final cabecera y empezamos a mostrar los registro
  30. do while not rs.EOF and cuantos < muestra
  31. archivo.WriteLine("<Script>")
  32. archivo.WriteLine("<Titulo>" & rs("titulo") & "</Titulo>")
  33. archivo.WriteLine("<Descripcion>" & replace(replace(replace(rs("descripcion"),">",""),"<",""),"&","") & "</Descripcion>")
  34. archivo.WriteLine("<Url>"&rs("url")&"</Url>")
  35. archivo.WriteLine("</Script>")
  36. rs.MoveNext()' pasamos al siguite registro
  37. cuantos=cuantos+1 'contamos
  38. loop 'volvemos, hasta mostrar el ultimo
  39. rs.close() ' cerramos la consulta
  40. conexion.close()'cerramos la conexion a la base de datos
  41. 'escribimos en el archivo el pie de pagina
  42. archivo.WriteLine("</scripts>")
  43. archivo.WriteLine("</rss>")
  44. archivo.close ' cerramos el archivo
  45. %>



ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
<!-- 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 -->
COMENTARIOS
Comentario usuario
07-05-2007 08:35:57
5 5
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
Comentario usuario
19/04/2003
3 5
Hola
hemos comentado el codigo, a ver site sirve de ayuda
saludos
Comentario usuario
07-07-2014 15:05:00
4 5
Necesitaria saber si tienen indea de como agregar en este archivo XML el servicio de GOOGLE ADSENSE PARA SINDICACION. Saludos Gracias !
Comentario usuario
melino
1 5
quiero leer un cd rom pero no se porque no puedo no mi sale el texto .... el cd es un archivo de typo xml
Comentario usuario
erikaemc
4 5
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!!!!!!!!!!!!!!!!!!!
Comentario usuario
Richy
1 5
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.
Comentario usuario
08/11/2004 18.01.55
2 5
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>
Comentario usuario
23-07-2013 13:21:32
3 5
ESTABA INTENTANDO DESCARGAR ESTE ARCHIVO PERO SOLO ME DICE QUE DEBO ESTAR REGISTRADO Y YA LO ESTOY, QUE MAL :(
INSERTAR COMENTARIO

Usuario:
Email:
Comentario:
Codigo Seguridad


Antes de enviar un comentario...
Todos los comentarios son revisados personalmente
Todo comentario que no haga relacion al codigo mostrado en esta pagina sera eliminado

Usuarios registrados tienen preferencia en recibir respuestas de ayuda!!
Ademas de poder insertar Imagenes,Enlaces y otras propiedades del editor.
Por favor, insertar los comentarios descriptivos.