Серый форум — Не работает URLGet() в Windows 7

Re: Не работает URLGet() в Windows 7

null@example.com (kolotilov256) — Mon, 07 Dec 2020 14:15:16 +0000

Хорошо) Спасибо за ответ.

Re: Не работает URLGet() в Windows 7

null@example.com (Malcev) — Mon, 07 Dec 2020 14:06:13 +0000

Возможно в этом причина.
http://forum.script-coding.com/viewtopic.php?id=11238
А вообще оставьте покойника в покое и переходите на десятку.

Re: Не работает URLGet() в Windows 7

null@example.com (kolotilov256) — Mon, 07 Dec 2020 14:04:28 +0000

teadrinker,

UrlGET("https://ipv4.icanhazip.com", 1, 5000)

Re: Не работает URLGet() в Windows 7

null@example.com (teadrinker) — Mon, 07 Dec 2020 07:33:03 +0000

kolotilov256 пишет:

HTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")

Этот хедер нужен только для POST и PUT запросов. Как вы вызываете эту функцию?

Не работает URLGet() в Windows 7

null@example.com (kolotilov256) — Mon, 07 Dec 2020 07:08:25 +0000

Добрый день. Помогите пожалуйста, не работает URLGet() на Windows 7. Просто выдаёт пустое окно. Может быть кому-то известны пути решения.

UrlGET(URL, upd=0, timer=0) {

   ComObjError(false)
   HTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
   HTTP.Open("GET", URL, false)
   HTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")
   
   if timer
      HTTP.SetTimeouts(timer, timer, timer, timer)
   if upd
      HTTP.SetRequestHeader("Connection", "close")
   
   try {
      HTTP.Send()
      HTTP.WaitForResponse()
      return HTTP.ResponseText
   }
}