Zo zošita Amazon Web Services som sa dozvedel, že je veľmi ľahké získať prístup k webovej službe REST pomocou VBA a importovať údaje do zoznamu XML.
Jeden chýbajúci kúsok po zobrazení zošita Amazonu bol spôsob, ako v prípade potreby odoslať aj prihlasovacie meno a heslo so žiadosťou. Ukázalo sa, že je to veľmi jednoduché. Na odoslanie prihlasovacieho mena a hesla stačí pridať jeden ďalší príkaz WinHttpRequest.SetCredentials (ukážkový kód nižšie)
V poslednej dobe sa pokúšam zlepšiť svoje znalosti XML (alebo ich nedostatok) prácou na vzdelávacom projekte pomocou webových služieb Bloglines, ktoré umožňujú požiadavky HTTP a vracajú XML (OPML, neprečítané položky atď.).
Učebná krivka, s ktorou som sa stretol, bola namiesto jednoduchého tlačenia XML cez mapu do buniek, chcel som použiť MSXML2 (analyzátor XML programu Excel), aby som získal úplnú kontrolu nad údajmi na naplnenie zobrazení Treeviews, Listboxes a ďalších vecí UserForm.
Cieľom projektu je prečítať si predplatné mojich bloglines v Exceli (som hotový na 60%), podobne ako verzia Colours EZRSS od Bloglines, a potom prípadne preniesť úsilie na OutLook, keď skončím (ďalšia krivka učenia).
Tu je ukážkový kód na stiahnutie vašich predplatných Bloglines do Excelu, ktorý odošle vaše používateľské meno a heslo na overenie:
„Príznaky HttpRequest SetCredentials. Const HTTPREQUEST_SETCREDENTIALS_FOR_SERVER = 0 Private Sub ListSubs () Dim MyRequest As New WinHttpRequest MyRequest.Open "GET", _ "http://rpc.bloglines.com/listsubs" 'Set credentials MyRequest.SetCredentials "USERNAME", "PASSWORD" HTTPREQUEST_SETCREDENTIALS_FOR_SERVER 'Žiadosť o odoslanie. MyRequest.Send 'A dostaneme túto odpoveď MsgBox MyRequest.ResponseText End Sub
Poznámky:
Nastavte odkaz na služby Microsoft WinHTTP
Nahraďte USERNAME a HESLO svojimi informáciami o Bloglines
Tým sa XML vráti na ukážku do msgboxu, môžete ho importovať ako mapu alebo načítať do dokumentu MSXML2.DOM (Mám pracovný kód, stále experimentujem, budem pokračovať). Tu je úryvok z poľa msgbox:
