Sain Amazon Web Services töövihikust teada, et RBA veebiteenusele on VBA abil äärmiselt lihtne juurde pääseda ja andmed XML -i loendisse importida.
Üks Amazoni töövihiku vaatamise järel puuduv osa oli vajaduse korral ka sisselogimise ja parooli saatmine koos päringuga. Selgub, et see on väga lihtne. Sisselogimise ja parooli saatmiseks lisage lihtsalt üks täiendav käsk WinHttpRequest.SetCredentials (näidiskood allpool)
Olen viimasel ajal püüdnud oma XML -teadmisi (või nende puudumist) parandada, töötades õppeprojekti kallal, kasutades Bloglinesi veebiteenuseid, mis lubavad HTTP -päringuid ja tagastab XML -i (OPML, lugemata üksused jne).
Õppimiskõver, millega ma kokku puutusin, oli selle asemel, et lihtsalt XML -i läbi kaardi lahtritesse suruda, tahtsin kasutada MSXML2 -d (Exceli XML -parserit), et saada täielik kontroll andmete üle, mida saab kasutada Treeview'de, Listboxide ja muu UserFormi sisu täitmiseks.
Projekti eesmärk on lugeda minu ajaveebi tellimusi Excelis (olen 60% valmis), sorteerida nagu Colo EZRSS -i Bloglinesi versioon ja seejärel, kui olen lõpetanud, jõupingutused OutLook -i teisaldada (teine õppimiskõver).
Siin on näite kood Bloglines'i tellimuste Excelisse tõmbamiseks, see saadab autentimiseks teie kasutajanime ja parooli:
'HttpRequest SetCredentials lipud. Const HTTPREQUEST_SETCREDENTIALS_FOR_SERVER = 0 Privaatne alamloendi alam () Dim MyRequest kui uus WinHttpRequest MyRequest.Avage "GET", _ "http://rpc.bloglines.com/listsubs" 'Määra mandaat MyRequest.SetCredentials "USERNAME", "PASS HTTPREQUEST_SETCREDENTIALS_FOR_SERVER 'Taotluse saatmine. MyRequest.Send 'Ja me saame selle vastuse MsgBox MyRequest.ResponseText End Sub
Märkused:
Määrake viide Microsofti WinHTTP teenustele
Asendage USERNAME ja PASSWORD oma Bloglinesi teabega
See tagastab XML -i näitamiseks sõnumikasti, saate selle kaardi importida või MSXML2.DOMDocumentisse laadida (mul on töökood, katsetan endiselt, jälgin). Siin on katkend sõnumikastist:
