![]() |
XML downlaod through visual basic - tag problem
Hi there,
I am working my way through xml and am stuck with a small problem. I am currently downloading all of the xml of a particular site but I only want the tag of ("Openings"). Below is the code that I am using to download the data: Sub stockp() Dim oXMLDOMElement As New MSXML2.DOMDocument30 Dim nodelistOpenings As IXMLDOMNodeList Dim TestWebService As New clsws_stocks Set nodelistOpenings = oXMLDOMElement.getElementsByTagName("Openings") Set nodelistOpenings = TestWebService.wsm_stocks("1234", "ASX") Application.Goto Reference:="stockTarget" ActiveCell.FormulaR1C1 = nodelistOpenings.Item(0).Text End Sub The above doesn't provide the filter that I wanted ie I only wanted "Openings" but it provides all the data on the applicable page. Does anybody have any ideas? Regards, Andrew |
XML downlaod through visual basic - tag problem
Andrew,
I think you need to be more specific in your "Openings" - this should be a well formed XPath query. I think you need to give the root detail (something like "x/y/Openings"?). Regards, Chris. -- Chris Marlow MCSD.NET, Microsoft Office XP Master "Andrew Yates" wrote: Hi there, I am working my way through xml and am stuck with a small problem. I am currently downloading all of the xml of a particular site but I only want the tag of ("Openings"). Below is the code that I am using to download the data: Sub stockp() Dim oXMLDOMElement As New MSXML2.DOMDocument30 Dim nodelistOpenings As IXMLDOMNodeList Dim TestWebService As New clsws_stocks Set nodelistOpenings = oXMLDOMElement.getElementsByTagName("Openings") Set nodelistOpenings = TestWebService.wsm_stocks("1234", "ASX") Application.Goto Reference:="stockTarget" ActiveCell.FormulaR1C1 = nodelistOpenings.Item(0).Text End Sub The above doesn't provide the filter that I wanted ie I only wanted "Openings" but it provides all the data on the applicable page. Does anybody have any ideas? Regards, Andrew |
All times are GMT +1. The time now is 12:24 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com