This means we can call it with appropriate arguments, in this example to do a patent search on the term “excel”
Public Sub testOneOff() Dim cr As cRest Set cr = restQuery("patent", , "excel", , _ "https://ajax.googleapis.com/ajax/services/search/patent?v=1.0&rsz=8&q=", _ "responseData.results", False) End Sub
WIth patents as a preset in the library, This would be equivalent to
Public Sub testLibrary() Dim cr As cRest Set cr = restQuery("patent","google patents" , "excel") End Sub
bruce mcpherson is licensed under a Creative Commons Attribution-ShareAlike 4.0 International License. Based on a work at http://www.mcpher.com. Permissions beyond the scope of this license may be available at code use guidelines