Url = http://site.ru/file.txt
Url = http://www.script-coding.com/WSH.html
Url = http://www.microsoft.com
 
HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1") 
HTTP.Open("GET", Url) 
HTTP.Send()   

Body := HTTP.ResponseBody
pArr := ComObjValue(Body)
cBytes := NumGet(pArr+0, A_PtrSize = 8? 24:16, "uint")
pText := NumGet(pArr+0, A_PtrSize = 8? 16:12, "ptr") 

RegexMatch(HTTP.ResponseText, "`nmi)<meta.*?charset=""*(?<Set>.*?)"".*?>", Char)   
Encode := CharSet = "windows-1251" ? "cp1251" : CharSet

MsgBox, % StrGet(pText, cBytes, Encode)

HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
HTTP.Open("GET", "http://site.ru/file.txt")
HTTP.Send()
Body := HTTP.ResponseBody
pArr := ComObjValue(Body)
cBytes := NumGet(pArr+0, A_PtrSize = 8? 24:16, "uint")
pText := NumGet(pArr+0, A_PtrSize = 8? 16:12, "ptr")
MsgBox, % StrGet(pText, cBytes, "cp1252")

HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
HTTP.Open("GET", "http://site.ru/file.txt")
HTTP.Send()
MsgBox, % HTTP.ResponseText

HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
HTTP.Open("GET", "https://trust-host.ru/")
HTTP.SetRequestHeader("Accept-Language", "ru")
HTTP.SetRequestHeader("Accept-Charset","Windows-1251")
HTTP.setRequestHeader("Content-Language", "ru")
HTTP.setRequestHeader("Content-Charset", "Windows-1251")
HTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded; charset=Windows-1251")
HTTP.Send()
MsgBox, % HTTP.ResponseText

HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
HTTP.Open("GET", "http://site.ru/file.txt")
HTTP.Send()
Body := HTTP.ResponseBody
pArr := ComObjValue(Body)
cBytes := NumGet(pArr+0, A_PtrSize = 8? 24:16, "uint")
pText := NumGet(pArr+0, A_PtrSize = 8? 16:12, "ptr")
MsgBox, % StrGet(pText, cBytes, "utf-8")