;url := "http://127.0.0.1:8111/indicators"
url := "http://127.0.0.1:8111/state"
HTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
HTTP.Open("GET", url, true)
HTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/7.0)")
HTTP.Send()
HTTP.WaitForResponse()
msgbox % Http.responseTextЕсли в url писать просто "http://127.0.0.1:8111/", то получается html код.
При добавлении "/map_obj.json" и других – ничего.
Если правильно понял, то проблема получается в показе текста.
При .outerText получается эта ошибка.
Как это можно решить?
url := "http://127.0.0.1:8111/"
HTTP := ComObjCreate("WinHttp.WinHttpRequest.5.1")
HTTP.Open("GET", url, true)
;HTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)")
HTTP.Send()
HTTP.WaitForResponse()
msgbox % Http.responseText ; Работает.
oHtmlDoc := documentFromHTML(Http.responseText, url)
msgbox % oHtmlDoc.body.outerText ; Выдает ошибку "Please use a browser with canvas support"
; Функция создания документа из HTML кода
documentFromHTML(ByRef sHTMLCode, ByRef sBaseURL) {
; Создаём объект для парсинга HTML кода
oDoc := ComObjCreate("htmlfile")
oDoc.open()
oDoc.close()
oDoc.body.innerhtml := sHTMLCode
return oDoc
}
url := "site/map_obj.json"
HTTP := ComObjCreate("WinHTTP.WinHTTPRequest.5.1")
HTTP.Open("GET", url, true)
HTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (compatible; MSIE 9.0; Windows NT 6.1; WOW64; Trident/5.0)")
HTTP.Send()
HTTP.WaitForResponse()
msgbox % HTTP.ResponseTextURL-адрес Протокол Метод Результат Тип Получено Затрачено Инициатор Ожидание Начало Запрос Ответ Чтение из кэша Интервал
/map_obj.json HTTP GET 200 application/json 472 Б 16 мс XMLHttpRequest 17753 0 16 0 0 6520
;Константы используемые в WinHttpRequest
global WinHttpRequestOption_EnableRedirects := 6
global WinHttpRequestOption_MaxAutomaticRedirects := 14
global WinHttpRequestOption_EnableHttpsToHttpRedirects := 12
; Создаём объект для запросов по HTTP протоколу
global oHttpRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1")
;Включаем автоматические редиректы
oHttpRequest.Option(WinHttpRequestOption_EnableRedirects) := -1
;Включаем автоматические редиректы с HTTP на HTTPS
oHttpRequest.Option(WinHttpRequestOption_EnableHttpsToHttpRedirects) := -1
;Выставляем максимальное количество редиректов
oHttpRequest.Option(WinHttpRequestOption_MaxAutomaticRedirects) := 20
; Загружаем страницу c сайта РБК
oHtmlDoc := documentFromURL("http://www.rbc.ru/")
MsgBox % oHtmlDoc.body.outerText
; Функция загрузки и построения документа с указанного URL
documentFromURL(ByRef sURL) {
; Отправляем GET запрос на сервер
oHttpRequest.open("GET", sURL, false)
oHttpRequest.send()
; Строим из полученных данных документ и возвращаем из функции
return documentFromHTML(oHttpRequest.responseText, sURL)
}
; Функция создания документа из HTML кода
documentFromHTML(ByRef sHTMLCode, ByRef sBaseURL) {
; Создаём объект для парсинга HTML кода
oDoc := ComObjCreate("htmlfile")
oDoc.open()
; Вставляем базовый тэг чтобы у относительных ссылок была верная адрессация от базового адреса
oDoc.write("<base href=""" . sBaseURL . """>")
oDoc.close()
oDoc.body.innerHTML := sHTMLCode
return oDoc
}Ошибка.
Please use a browser with canvas support
Map/primary_objectives
Map/secondary_objectives
Из проводника.
<script src="/loc/map/primary_objectives?fmt=js"></script>
<script src="/loc/map/secondary_objectives?fmt=js"></script>Я пробовал брать разные скрипты с форума и немного их менять, но это приводило к ошибкам или ничего не возвращало.
]]>text=
(
<li id="ind-bank" style="">bank=0.014672</li>
<li id="ind-clock_hour" style="">clock_hour=3.233333</li>
<li id="ind-clock_min" style="">clock_min=14</li>
<li class="" id="ind-clock_sec" style="">clock_sec=40</li>
<li id="ind-turn2" style="display: list-item;"></li>
)
RegexMatch(text, "clock_sec=(.*?)</li>", match)
msgbox % match1На локальной html странице обновляется (примерно три раза в секунду) текст вида "clock_sec=10".
<li id="ind-bank" style="">bank=0.014672</li>
<li id="ind-clock_hour" style="">clock_hour=3.233333</li>
<li id="ind-clock_min" style="">clock_min=14</li>
<li class="" id="ind-clock_sec" style="">clock_sec=40</li>
<li id="ind-turn2" style="display: list-item;"></li>
Нужно чтобы в переменные постоянно передавались обновляемые числа. С частотой больше трех в секунду и минимальной задержкой.
Возможно ли это? И что еще нужно для разбора задачи?