Hi everbody, this is my first time in these list.
I' don't know if my question is pertinent to this list, if not, sorry.
Well I have an XSL that compares data from two XML files and I' trying to
display the results in MsExcel.
the usual macro that I work is:
----------------------------------------------------------------------------
---------
Sub Macro libr ()
'Load the XML and the XSL (the stylesheet).
Dim oXML As Object, oXSL As Object
Set oXML =3D CreateObject("MSXML.DOMDocument")
Set oXSL =3D CreateObject("MSXML.DOMDocument")
oXML.Load "c:\library.xml"
oXSL.Load "c:\compare_books.xsl"
'Transform the XML using the stylesheet.
Dim sHTML As String
sHTML =3D oXML.transformNode(oXSL)
'Save the results to an xls file.
Open "c:\BooksToBuy.xls " For Output As #1
Print #1, sHTML
Close #1
'Automate Excel to open the xls file.
Dim oApp As Excel.Application
Set oApp =3D CreateObject("excel.application ")
oApp.Visible =3D True
oApp.Workbooks.Open "c:\BooksToBuy. xls "
End Sub
---------------------------------------------------------------------------
When I use just one XML with XSL it works fine, but when I try to insert the
file orders.XML that is called into the XSL to do the comparation nothing
appears.
Any idea??
--
Nel
Vitoria/ES
Brasil
--~------------------------------------------------------------------
XSL-List info and archive: http://www.mulberrytech.com/xsl/xsl-list
To unsubscribe, go to: http://lists.mulberrytech.com/xsl-list/
or e-mail: <mailto:xsl-list-unsubscribe(_at_)lists(_dot_)mulberrytech(_dot_)com>
--~--