WinHttpRequest bejelentkezéssel és jelszóval - Egyéb blogvonalak - Példák a VBA kódokra

Tartalomjegyzék

Az Amazon Web Services munkafüzetből megtudtam, hogy rendkívül könnyű elérni a REST webszolgáltatást VBA használatával, és importálni az adatokat egy XML listába.

Egy hiányzó rész az Amazon munkafüzet megtekintése után az volt, hogyan küldhet be bejelentkezést és jelszót kéréssel, ha szükséges. Nagyon egyszerűnek bizonyul. A bejelentkezési név és a jelszó elküldéséhez csak adjon hozzá egy további WinHttpRequest.SetCredentials parancsot (Példakód alább)

Az utóbbi időben (vagy annak hiányában) az XML ismereteimet próbálom fejleszteni azzal, hogy egy tanulási projekten dolgozom a Bloglines Web Services használatával, amely lehetővé teszi a HTTP kéréseket, és XML -t (OPML, olvasatlan elemek stb.) Ad vissza.

A tanulási görbe, amellyel találkoztam, ahelyett, hogy egyszerűen az XML -t egy térképen keresztül cellákba taszítottam volna, az MSXML2 (Excel XML -elemzője) segítségével szereztem teljes ellenőrzést az adatok felett a Treeview, Listboxes és egyéb UserForm tartalmak feltöltéséhez.

A projekt célja az, hogy Excelben elolvassam a blogvonalak előfizetéseit (60% -ban kész vagyok), úgy, mint a Colo EZRSS Bloglines verzióját, majd az erőfeszítéseket esetleg áthelyezem az OutLook -ba, amikor befejeztem (egy másik tanulási görbe).

Íme egy példakód, amellyel Bloglines -előfizetéseit Excelbe húzhatja, és elküldi felhasználónevét és jelszavát a hitelesítéshez:

 'HttpRequest SetCredentials jelzők. Const HTTPREQUEST_SETCREDENTIALS_FOR_SERVER = 0 Private Sub ListSubs () Dim MyRequest as New WinHttpRequest MyRequest. HTTPREQUEST_SETCREDENTIALS_FOR_SERVER 'Kérés küldése. MyRequest.Send 'És ezt a választ kapjuk MsgBox MyRequest.ResponseText End Sub 

Megjegyzések:

Állítson be hivatkozást a Microsoft WinHTTP szolgáltatásokra

Cserélje USERNAME és PASSWORD helyére a Bloglines információit

Ez visszaadja az XML -t egy msgbox -ba bemutatás céljából, importálhatja azt térképként, vagy betöltheti egy MSXML2.DOMDocument fájlba (van működő kódom, még kísérletezek, nyomon követem). Itt egy részlet az msgboxból:

Segít a fejlesztés a helyszínen, megosztva az oldalt a barátaiddal

wave wave wave wave wave