AutoHotkey 2 lè lo ohun WinHttpRequest COM ti Windows fún ìbéèrè nípasẹ̀ aṣojú tí ó ṣe kedere:

request := ComObject("WinHttp.WinHttpRequest.5.1")
request.SetTimeouts(5000, 5000, 10000, 20000)
request.SetProxy(2, "proxy.example.net:8080", "localhost")
request.Open("GET", "https://example.net/status", false)
request.Send()
MsgBox request.Status " " request.StatusText

2 yan ìṣètò aṣojú tí a pèsè. Fún àyẹ̀wò HTTPS gbangba tí a fihàn, àkójọ aṣojú HTTP ń pèsè àwọn iye olùgbàlejò àti ibùdókọ̀ tí ó ṣeéṣe fún alárinà nígbà tí a gbà àwọn ọ̀nà gbangba àti pé kò sí ẹ̀rí ìdánimọ̀ aṣojú tí a ṣètò. Àríyànjiyàn kẹta tí ó jẹ́ àṣàyàn ni àkójọ àfojúrí; níbí localhost ń lọ tààrà.

false ìkẹyìn nínú Open yan ìbéèrè ìgbàkan. Script kékeré yìí ń dúró de ìparí kí ó tó ka ipò náà. Ìdánáṣẹ̀dá desktop tí ó ń ṣiṣẹ́ pẹ́ gbọ́dọ̀ ka ìdúró yẹn sínú ìṣàn ìbáraẹnisọ̀rọ̀ rẹ̀.

Bí aṣojú náà bá béèrè ẹ̀rí ìdánimọ̀, ṣètò wọ́n lẹ́yìn Open àti kí Send tó ṣẹlẹ̀:

request.SetCredentials(proxyUser, proxyPassword, 1)

Ìṣe náà ń pèsè àwọn oníyípadà méjì yẹn. Àmì ìkẹyìn, 1, yan ẹ̀rí ìdánimọ̀ aṣojú. Àmì 0 yan ẹ̀rí ìdánimọ̀ fún sáfíà ìdí.

Lẹ́yìn ìdáhùn ọ̀rọ̀ tí ó jáde dáadáa, request.ResponseText ní ọ̀rọ̀ tí a dá padà. Fún gbígbé àkójọpọ̀ aláṣepọ̀, lo ResponseBody àti ọ̀nà kíkọ aláṣepọ̀ tí ó yẹ dípò fífi àwọn báìtì yẹn kọjá ìyípadà ọ̀rọ̀.

Àwọn àpilẹ̀kọ tó jọra