Amazon Web Hizmetleri çalışma kitabından, VBA kullanarak bir REST Web Hizmetine erişmenin ve verileri bir XML listesine aktarmanın son derece kolay olduğunu öğrendim.
Amazon çalışma kitabını görüntüledikten sonra eksik olan bir parça, gerekirse bir istekle birlikte bir kullanıcı adı ve parolanın nasıl gönderileceğiydi. Çok Basit olduğu ortaya çıkıyor. Bir kullanıcı adı ve parola göndermek için WinHttpRequest.SetCredentials ek bir komut eklemeniz yeterlidir (Örnek kod aşağıdadır)
Son zamanlarda, HTTP isteklerine izin veren ve XML (OPML, Okunmamış Öğeler, vb.)
Karşılaştığım öğrenme eğrisi, XML'i bir harita üzerinden hücrelere itmek yerine, Ağaç Görünümlerini, Liste Kutularını ve diğer UserForm öğelerini doldurmak için verilerin tam kontrolünü ele geçirmek için MSXML2'yi (Excel'in XML ayrıştırıcısı) kullanmak istedim.
Proje hedefi, bloglines aboneliklerimi Excel'de okumak (%60 bitirdim), Colo'nun EZRSS'sinin bir Bloglines sürümü gibi, daha sonra muhtemelen işim bittiğinde (başka bir öğrenme eğrisi) OutLook'a çaba göstermek.
İşte Bloglines aboneliklerinizi Excel'e çekmek için örnek kod, kimlik doğrulama için Kullanıcı Adınızı ve Parolanızı gönderir:
'HttpRequest SetCredentials bayrakları. Const HTTPREQUEST_SETCREDENTIALS_FOR_SERVER = 0 Private Sub ListSubs() Dim MyRequest As New WinHttpRequest MyRequest.Open "GET", _ "http://rpc.bloglines.com/listsubs" 'Kimlik bilgilerini ayarla MyRequest.SetCredentials "USERNAME", "PASS_WORD" HTTPREQUEST_SETCREDENTIALS_FOR_SERVER ' İstek Gönder. MyRequest.Send 'Ve bu yanıtı alıyoruz MsgBox MyRequest.ResponseText End Sub
Notlar:
Microsoft WinHTTP Hizmetlerine bir başvuru ayarlayın
KULLANICI ADI ve ŞİFRE'yi Bloglines bilgilerinizle değiştirin
Bu, gösterim için XML'i bir msgbox'a döndürür, onu bir haritaya aktarabilir veya bir MSXML2.DOMDocument'a yükleyebilirsiniz(Çalışan kodum var, hala deniyorum, takip edeceğim). İşte msgbox'ın bir parçası:
