Серый форум — AHK: Поиск фразы на странице в браузере

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Elliot) — Tue, 31 Jan 2017 17:11:15 +0000

Malcev пишет:

А если пользователь поменяет ник или перейдет в другую группу, то заново функцию писать?
Ваш вариант ненадежный.
Если хочется получать статус с помощью htmlfile:
link := "http://cheat-master.ru/index/8-422195"
req := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
req.Open("GET", link, false)
req.Send()
text := req.responseText

document := ComObjCreate("HTMLfile")
document.Open()
document.Close()
document.body.innerHTML := text
msgbox % document.getElementById("block6").innerText

А как по данному коду связать это с GUI? Пример в шапке темы. Допустим хочется расположить ник пользователей в онлайне по группе (по столбцам). Как это осуществить? И да, если пользователь оффлайн, то его ник отображаться не должен. Как вы поняли я забью так не одну ссылку на профиль, а порядка 50. Эти 50 ссылок программа будет проверять на онлайн.

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sun, 29 Jan 2017 17:46:38 +0000

В смысле, что у другого пользователя, код неправильно находит строку.

Вы неправильно скопировали код.
У меня:

msgbox % document.getElementById("block6").innerText

У вас:

msgbox % document.getElementById("block10").innerText

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Sun, 29 Jan 2017 17:43:36 +0000

В смысле, что у другого пользователя, код неправильно находит строку. Хорошо, буду внимательно наблюдать, чтобы ответы точно совпадали с вопросами.

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sun, 29 Jan 2017 17:22:57 +0000

В смысле?

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Sun, 29 Jan 2017 16:57:25 +0000

Malcev, а это что?

link := "http://cheat-master.ru/index/8-0-PasqualeQQ"
req := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
req.Open("GET", link, false)
req.Send()
text := req.responseText

document := ComObjCreate("HTMLfile")
document.Open()
document.Close()
document.body.innerHTML := text
msgbox % document.getElementById("block10").innerText

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sun, 29 Jan 2017 16:37:05 +0000

Покажет ту же строку, с новым ником, или группой.

global oHttpRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1")
oHtmlDoc := documentFromURL("http://cheat-master.ru/index/8-422195")


var := oHtmlDoc.body.outerText
MsgBox % SubStr(var, 134, 15)
StringReplace, var, var, [CM]Fanat1k, [CM]Fanat1k123456
MsgBox % SubStr(var, 134, 15)



documentFromURL(ByRef sURL) {
    oHttpRequest.open("GET", sURL, false)
    oHttpRequest.send()
    return documentFromHTML(oHttpRequest.responseText, sURL)
}

documentFromHTML(ByRef sHTMLCode, ByRef sBaseURL) {
    oDoc := ComObjCreate("htmlfile")
    oDoc.open()
    oDoc.write("")
    oDoc.close()
    oDoc.body.innerHTML := sHTMLCode
    return oDoc
}

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Sun, 29 Jan 2017 16:10:50 +0000

Зачем заново? Покажет ту же строку, с новым ником или группой. Malcev, а если "HTML" страница поменяется или еще чего, всякое бывает. Сложно сказать, какой вариант действительно надежно работает.

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sun, 29 Jan 2017 15:42:49 +0000

А если пользователь поменяет ник или перейдет в другую группу, то заново функцию писать?
Ваш вариант ненадежный.
Если хочется получать статус с помощью htmlfile:

link := "http://cheat-master.ru/index/8-422195"
req := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
req.Open("GET", link, false)
req.Send()
text := req.responseText

document := ComObjCreate("HTMLfile")
document.Open()
document.Close()
document.body.innerHTML := text
msgbox % document.getElementById("block6").innerText

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Sun, 29 Jan 2017 15:19:54 +0000

Malcev, так, это тоже вариант. Можно для каждого пользователя, написать свою функцию.

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sun, 29 Jan 2017 14:57:28 +0000

Там где вы нашли этот код, эти переменные использовались.
На счет SubStr - вы полагаете, что нужная информация будет находиться у всех пользователей на 134 символе?

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Sun, 29 Jan 2017 14:29:36 +0000

Malcev, я нашел этот код и просто дописал: "SubStr" - это функция, вроде просто показывает нужную строку. А с другими пользователями, а чего не будет работать? Это просто мой вариант, у меня работает.

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sun, 29 Jan 2017 11:21:58 +0000

svoboden, а зачем вы объявляете переменные, которые потом нигде не используете?

global WinHttpRequestOption_EnableRedirects := 6
global WinHttpRequestOption_MaxAutomaticRedirects := 14
global WinHttpRequestOption_EnableHttpsToHttpRedirects := 12

И зачем используете SubStr, если загружаете все в htmlfile?
Вы пробовали свой метод с другими пользователями?

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Sun, 29 Jan 2017 01:57:41 +0000

Вот еще вариант:


global oHttpRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1")

oHtmlDoc := documentFromURL("http://cheat-master.ru/index/8-422195")

MsgBox % SubStr(oHtmlDoc.body.outerText, 134, 15)

documentFromURL(ByRef sURL) {
    oHttpRequest.open("GET", sURL, false)
    oHttpRequest.send()
    return documentFromHTML(oHttpRequest.responseText, sURL)
}

documentFromHTML(ByRef sHTMLCode, ByRef sBaseURL) {
    oDoc := ComObjCreate("htmlfile")
    oDoc.open()
    oDoc.write("")
    oDoc.close()
    oDoc.body.innerHTML := sHTMLCode
    return oDoc
}

Re: AHK: Поиск фразы на странице в браузере

null@example.com (Malcev) — Sat, 28 Jan 2017 01:53:49 +0000

link := "http://cheat-master.ru/index/8-422195"
req := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
req.Open("GET", link, false)
req.Send()
text := req.responseText
If RegexMatch(text, "s)" link "'\)"">(.+?).+?>Группа:

\s*(.+?)\s*<.+Online", match)
   msgbox % match1 "`n" match2

Re: AHK: Поиск фразы на странице в браузере

null@example.com (svoboden) — Fri, 27 Jan 2017 19:02:29 +0000

Тут может.