Hi, Is this code speedy enough? Im new with xml and asp. This script does is transform the data there as what you say or does it? :)default.asp<% dim xmlhttp,xmlDom,xsldom,Query set xmlhttp=createobject("MSXML2.XMLHTTP") set xmlDom=createobject("MSXML2.domdocument") set xslDom=createobject("MSXML2.domdocument") xmldom.async=false xsldom.async=false query = "<main><sql>select * from product</sql></main>" xmlhttp.Open "POST","http://localhost/www\XML\xml_27/data.asp", false xmlhttp.send query if xmlhttp.status <> 200 then response.write "Error !!!" end if xmldom.load xmlhttp.responseXML xsldom.load server.mappath(".")+"/"+view response.write XMLDom.transformNode(XSLDom)%><%set xmlhttp = nothingset xmldom= nothingset xsldom = nothing%>
data.asp
<% Option Explicit %><%Response.ContentType = "text/xml"%><?xml version="1.0"?><% dim xmlDom dim Conn,rs,fld,query set xmlDom=createobject("MSXML2.domdocument") Set Conn = server.CreateObject("adodb.connection") set rs = server.createobject("adodb.recordset") xmldom.load request query = xmldom.documentElement.childNodes(0).text Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath(".")+"\database.mdb;Persist Security Info=False" rs.open query,conn,3,1 %><recordset total="<%=rs.recordcount%>"><head><%for each fld in rs.fields%><field name="<%=fld.name%>"/><%next%></head><rows><%do until rs.eof%><row><%for each fld in rs.fields%><col><%=fld.value%> </col><%next%></row><%rs.movenext%><%loop%></rows></recordset><%rs.closeconn.closeset conn = nothingset rs= nothingset xmldom = nothing%>