I used the below asp code to transform xml to a spreadsheet using a .xsl 
file.
It works great; problem is I want to transform several recordset to xml to
multiple worksheets in the workbook.  Should I use something other than the
"transformNodeToObject"?  I can't see how to direct the xml to different
worksheets.  I appreciate any help.


<%@ Language="vbscript"%>
<%
    sConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" &
Server.MapPath("mydb.mdb")
    sXSL = Server.MapPath("mydb.xsl")
    Response.Buffer = True
    'Retrieve an ADO recordset of the Orders Detail table in mydb
    Dim rs, nRecords
    Set rs = CreateObject("ADODB.Recordset")
    rs.Open "SELECT uDesc FROM mydbTable", sConn, 3, 3
    'Persist the recordset to a new DOMDocument and store the record count
    Dim oXML
    Set oXML = CreateObject("Microsoft.XMLDOM")
    rs.Save oXML, 1
    nRecords = rs.RecordCount
    rs.Close

    'Load the XSL (the workbook template with XSL directives) into a
DOMDocument
    Dim oXSL
    Set oXSL = CreateObject("Microsoft.XMLDOM")
    oXSL.Load sXSL

    'Transform the XML using the stylesheet
    Dim oResults
    Set oResults = CreateObject("Microsoft.XMLDOM")
    oXML.transformNodeToObject oXSL, oResults

    If oXSL.parseError.errorCode <> 0 Then
       Response.Write "Parse Error: " & oResults.parseError.reason
    Else

       'Modify the ss:ExpandedRowCount attribute for the <table> node in the
XSL.
        Dim oTable
        Set oTable = oResults.selectSingleNode("Workbook/Worksheet/Table")
        oTable.setAttribute "ss:ExpandedRowCount", nRecords + 2

        'Return the resulting XML Spreadsheet for display in Excel
        Response.ContentType = "application/vnd.ms-excel"
        Response.Charset = "ISO-8859-1"
        Response.Write oResults.XML
        Response.Flush

 end if

%>