Бұл VBA шақыруы proxyServer ішінде сақталған проксиді таңдап жатқан сияқты көрінеді:

http.setProxy 1, proxyServer, bypassList

MSXML ServerXMLHTTP үшін бірінші аргумент прокси режимін таңдайды. Құжатталған мәндер: 0 — әдепкі конфигурация, 1 — тікелей қосылым және 2 — анық берілген прокси. 1-ден кейін мекенжай беру тікелей режимді қолмен прокси режиміне айналдырмайды.

Қолмен проксидің ең қысқа мысалы:

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

Мысалдағы соңғы нүкте — орын толтырғыш. Жалпыға ашық проксиді тексеру үшін оны HTTP проксилер тізімінен алынған HTTP мекенжайымен ауыстырыңыз. Үшінші аргумент — айналып өту тізімі; мұнда <local> құжатталған жергілікті атау ерекшелігін қолданады. Бұл біріншісі сәтсіз болса сынайтын екінші прокси емес. Сондықтан ол жерге басқа проксидің IP және портын қою қате параметр түрін білдіреді.

VBA сілтемелеріңіз оларды ұсынатын жерде атаулы тұрақтыларды қолданыңыз немесе кешіктірілген байланыстыруды пайдаланғанда тиісті тұрақтыны жергілікті түрде анықтаңыз, осылайша режим қарау кезінде көрінеді.

Нысан түрін де назарда ұстаңыз. ServerXMLHTTP, браузерге бағытталған XMLHTTP және WinHttpRequest әртүрлі COM интерфейстері. Біреуі үшін жұмыс істейтін мысал екіншісінің конфигурация көзін дәлелдемейді. Дұрыс нысан қолмен прокси режимін таңдағаннан кейін сол маршрутта қалған кез келген қосылым, аутентификация немесе TLS қатесін зерттеңіз.

Қатысты мақалалар