Code: Select all
HTTP.Open("POST", SearchURL)
HTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded; charset=UTF-8")
HTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows NT 6.3; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/85.0.4183.83 Safari/537.36")
HTTP.SetRequestHeader("Authorization", "Basic " . basic)
HTTP.SetRequestHeader("Cache-Control", "no-cache, no-store")
HTTP.SetRequestHeader("Pragma", "no-cache")
data := "start=0&limit=20&collection_code=migrants_list_collection¶meters=sSearchWord%253D%2525u041A%2525u0423%2525u041B%2525u0418%2525u0427%2525u041A%2525u041E%2525u0412%252520%2525u0415%2525u041B%2525u0415%2525u041D%2525u0410"
HTTP.Send(data)
HTTP.WaitForResponse()
Code: Select all
TextVar := URIEncode("КУЛИЧКОВ ЕЛЕНА")
data := "start=0&limit=20&collection_code=migrants_list_collection¶meters=sSearchWord" . TextVar
URIEncode(str, encoding := "UTF-8") {
VarSetCapacity(var, StrPut(str, encoding))
StrPut(str, &var, encoding)
While code := NumGet(Var, A_Index - 1, "UChar") {
bool := (code > 0x7F || code < 0x30 || code = 0x3D)
UrlStr .= bool ? "%" . Format("{:02X}", code) : Chr(code)
}
Return UrlStr
}