ServerXMLHTTP setProxy: režiim 1 valib otseühenduse

See VBA-kutse näib valivat puhverserveri, mis on salvestatud muutujasse proxyServer:

http.setProxy 1, proxyServer, bypassList

MSXML ServerXMLHTTP puhul valib esimene argument puhverserveri režiimi. Dokumenteeritud väärtused on 0 vaikekonfiguratsiooni, 1 otseühenduse ja 2 selgesõnaliselt antud puhverserveri jaoks. Aadressi edastamine pärast 1 ei muuda otserežiimi käsitsi puhverserveri režiimiks.

Minimaalne käsitsi puhverserveri näide on:

Dim http As Object
Set http = CreateObject("MSXML2.ServerXMLHTTP.6.0")
http.setProxy 2, "proxy.example:8080", "<local>"
http.Open "GET", "https://example.com/", False
http.send

Näite lõpp-punkt on kohatäitja. Avaliku puhverserveri kontrollimiseks asendage see HTTP-aadressiga HTTP puhverserverite loendist. Kolmas argument on möödasõiduloend; siin kasutab <local> dokumenteeritud kohaliku nime erandit. See ei ole teine puhverserver, mida proovida, kui esimene ebaõnnestub. Teise puhverserveri IP ja pordi sinna panemine väljendab seega vale tüüpi seadet.

Kasutage nimetatud konstante seal, kus teie VBA viited need esile toovad, või määratlege asjakohane konstant kohapeal hilise sidumise korral, et režiim oleks ülevaatamisel nähtav.

Hoidke silmas ka objekti tüüpi. ServerXMLHTTP, brauserile suunatud XMLHTTP ja WinHttpRequest on erinevad COM-liidesed. Ühe toimiv näide ei tõenda teise konfiguratsiooni allikat. Kui õige objekt on valinud käsitsi puhverserveri režiimi, uurige sellel marsruudil kõiki allesjäänud ühendus-, autentimis- või TLS-vigu.