Энэ 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 алдааг шалгана уу.

Холбоотой нийтлэлүүд