попробуйте так
С какого перепугу?
StrLen(clp)
Что такое clp?
HttpObj1.Open("GET",_G,true) ;the third parameter means, that it will be working asynchronously
Не проще ли false, т.е. synchronously, и никакой Sleep не нужен?
Sleep, 5000 If (HttpObj1.Status) MsgBox % HttpObj1.ResponseText
И даже, если оставить третьим параметром true, ни в коем случае не пробуйте делать так!
Лучше уж
HttpObj1.WaitForResponse()
MsgBox % HttpObj1.ResponseText
или
while not HttpObj1.Status
Sleep 100
MsgBox % HttpObj1.ResponseText
Are you trying to fire an event on the ajax response body, as if it was loaded into the DOM ? Stop me if I'm wrong, but the ajax request response is not loaded into the current DOM, so you cannot execute scripts on it, event if it has been parsed as a document. Take a look at the XMLHttpRequest spec : point 5-4 says "with scripting disabled"
var sendToLog;
var xhr = new XMLHttpRequest();
xhr.open('GET', '/newsfeed-simulator', true);
xhr.responseType = 'document';
xhr.onload = function(e) {
if (this.status == 200)
{
var event = xhr.response.createEvent("MouseEvents");
event.initMouseEvent("click", true, true, window,
0, 0, 0, 0, 0,
false, false, false, false,
0, null);
xhr.response.getElementById("simulate-button").dispatchEvent(event);
$(xhr.response).ready(function()
{
console.log(xhr.response.body);
sendToLog = xhr.response.getElementsByClassName("story-score");
});
chrome.extension.sendMessage({writeToLog: sendToLog});
}
}
xhr.send();http://stackoverflow.com/questions/1502 … ttprequest
Получается, что если есть кнопка без scripting, то на нее клик послать таки можно?
Проверить на ahk не могу, так как, как заметил wisgest:
Кроме того, по той ссылке немного другой XMLHttpRequest,
HttpObj1 := ComObjCreate("WinHttp.WinHttpRequest.5.1")
_G := "http://GET_URL"
HttpObj1.Open("GET",_G,true) ;the third parameter means, that it will be working asynchronously
HttpObj1.Send()
MsgBox, % "Length: [" . StrLen(clp) . "], Status: [" . HttpObj1.Status . "], GET:`n-------------------`n" . _G
Sleep, 5000
If (HttpObj1.Status) MsgBox % HttpObj1.ResponseTextКроме того, по той ссылке немного другой XMLHttpRequest, чтобы его получить надо действовать как-то так (не проверялось)…
<…>
И даже если сам объект буден создан, не факт что им можно будет воспользоваться, т.к. на такой XMLHttpRequest, вроде бы, распространяется политика одного источника.
Проверилось.
Первый код не работает, т.к. там не хватает new, а чтобы воспользоваться JScript'овым new из AHK, всё-равно нужны костыли с помощью eval() или window.execScript()…
Второй, как и предполагалось, при попытке вызвать метод .open() приводит к ошибке:
Error: 0x80070005 - Отказано в доступе. Source: (null)
Description: Отказано в доступе.
HelpFile: C:\WINDOWS\system32\mshtml.hlp
HelpContext: 0
htmldoc := ComObjCreate("htmlfile")
req := htmldoc.Script.XMLHttpRequest() ; Script - то же, что и parentWindow
или
htmldoc := ComObjCreate("htmlfile")
htmldoc.Script.execScript("var req = new XMLHttpRequest();", "JScript")
req := htmldoc.Script.req
Вполне возможно, что его лучше получать не через htmlfile, а через InternetExplorer.Application… И даже если сам объект буден создан, не факт что им можно будет воспользоваться, т.к. на такой XMLHttpRequest, вроде бы, распространяется политика одного источника.
]]>Кстати, в чём оновные отличия XMLHttpRequest от WinHttpRequest?
Как я понимаю основное отличие проявляется в случае, если получаемый файл представляет собой синтаксически правильный XML-документ, в этом случае становится доступной его DOM без необходимости чтения его сырого кода.
]]>var a = document.createElement('a');
var evt = document.createEvent('MouseEvents');
evt.initEvent("click", true, true);
a.dispatchEvent(evt);А как тогда?
Так тоже не получается:
URL := "http://help.dottoro.com/external/examples/ljwcseaq/onmousedown_4.htm"
xml := ComObjCreate("Msxml2.XMLHTTP.6.0")
xml.open("GET", URL, 0)
xml.send
MsgBox, % IsObject(xml.constructor)Кстати, в чём оновные отличия XMLHttpRequest от WinHttpRequest?
Как я понимаю, с помощью него можно посылать события на элементы. Только не получается пока.
Я им заинтересовался после поста Lexikos:
I started looking into this because using WinHttpRequest in synchronous mode causes the script to hang until the request completes, but it turns out you can get around that by opening the request in asynchronous mode and calling WinHttpRequest.WaitForResponse(). The advantages of XMLHTTP are that the API is well known to many web developers, and the events (like onreadystatechange) are compatible with AutoHotkey.
URL := "http://help.dottoro.com/external/examples/ljwcseaq/onmousedown_4.htm"
xml := ComObjCreate("Msxml2.XMLHTTP.6.0")
xml.open("GET", URL, 0)
xml.send
MsgBox, % IsObject(xml.document)URL := "http://help.dottoro.com/external/examples/ljwcseaq/onmousedown_4.htm"
xml := ComObjCreate("Msxml2.XMLHTTP.6.0")
xml.open("GET", URL, 0)
xml.send
;~ initMouseEvent(eventType, canBubble, cancelable, viewArg, detailArg, screenXArg, screenYArg, clientXArg, clientYArg, ctrlKeyArg, altKeyArg, shiftKeyArg, metaKeyArg, buttonArg, relatedTargetArg)
MouseDownEvent := xml.document.createEvent("MouseEvent")
MouseDownEvent.initMouseEvent("mousedown",true,false, _, _, _, _, _, _, _, _, _, _, _, _)
MouseUpEvent := xml.document.createEvent("MouseEvent")
MouseUpEvent.initMouseEvent("mouseup",true,false, _, _, _, _, _, _, _, _, _, _, _, _)
xml.document.querySelector("BUTTON[Id=""testButton""]").dispatchEvent(MouseDownEvent)
xml.document.querySelector("BUTTON[Id=""testButton""]").dispatchEvent(MouseUpEvent)
MsgBox, % xml.responseText