A continuacion le dejo los codigos:
Código ActionScript 3:
Ver original
import fl.controls.ComboBox; import fl.data.DataProvider; import flash.net.navigateToURL; //Combo de actividades stop(); //Asigno la url que se va a cargar //var url:String = "discos.xml"; //Carga el XML function CargarXML() { //Creo el objeto cargador //Le añado los listeners ponerListeners(loader); //Creo el objeto que contendrá la petición //Cargo la petición loader.load(peticion); } //Añade los listeners al cargador } //Funcion que se ejecuta cuando termina la descarga. //Devuelve el atributo puntuacion trace(nodo.nombre); //Devuelve el contenido del nodo <grupo> trace(nodo.apellido); //Devuelve el valor del atributo id dentro del nodo <grupo> trace(nodo.telefono); //Devuelve el contenido del nodo titulo trace(nodo.ciudad); } } //Empezamos CargarXML();
Y el codigo de asp:
Código ASP:
Ver original
<% Dim conn_string conn_string = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;Port=3306;Database=agenda;Uid=root;Pwd=123456" Response.ContentType="text/xml" Set conn = Server.CreateObject("ADODB.Connection") conn.Open (conn_string) set RSC=createObject("ADODB.recordset") sqlString = "SELECT CONTACTO.NOMBRE, CONTACTO.APELLIDO, CONTACTO.TELEFONO, CONTACTO.CIUDAD FROM CONTACTO" Set RSC = conn.Execute(sqlString) rsc.MoveFirst() response.write("<contactos>") while (not rsc.EOF) response.write("<contacto>") response.write("<nombre>" & rsc("nombre") & "</nombre>") response.write("<apellido>" & rsc("apellido") & "</apellido>") response.write("<telefono>" & rsc("telefono") & "</telefono>") response.write("<ciudad>" & rsc("ciudad") & "</ciudad>") response.write("</contacto>") rsc.MoveNext() wend response.write("</contactos>") rsc.close() conn.close() %>