Info

sURI = "http://xml.amazon.com/onca/xml2?t=webservices-20"

& "&dev-t=D3VCCO47XZEQFA" _

& "&PowerSearch=author:Bill Jelen and pubdate:2002" _ & "&mode=books&type=heavy&page=1&f=xml"

& "&dev-t=D3VCCO47XZEQFA" _

& "&PowerSearch=author:Bill Jelen and pubdate:2002" _ & "&mode=books&type=heavy&page=1&f=xml"

whr.Open "GET", sURI whr.Send

ActiveWorkbook.XmlMaps(1).ImportXml whr.ResponseText Application.Cursor = xlDefault End Sub

After the query has run, the results are written to the List object on sheetl. Note that because I asked for an Author field and Author is a repeating element along the ProductInfo node, any titles with two authors appear twice: one with each author.This query is useful for tracking sales rank and knowing the current used price for various titles (see Figure 15.8).

Figure 15.8

The. ImportXML method returns the search results to the worksheet. Only the mapped fields that were dragged from the XML Source pane are displayed.

0 0

Post a comment