Code: Select all
url :="https://chrome.google.com/webstore/detail/ferrari-wallpaper-hd-cust/facihnceaoboeoembnbmdlecmkpioacc?hl=en"
HTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
HTTP.Open("GET", url, true)
HTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows NT 6.1; WOW64; Trident/7.0; rv:11.0) like Gecko")
HTTP.Send()
HTTP.WaitForResponse()
respo := http.ResponseText
;msgbox, % respo
html := ComObjCreate("HTMLfile")
html.write("<meta http-equiv=""X-UA-Compatible"" content=""IE=9"">")
html.designMode := "on"
html.write(respo)
msgbox, % html.getElementsByClassName("C-b-p-rc-D-R").length ;;[0].innerText
ExitApp