Use eval with IEApplication Object

#include <IE.au3>


$oMyError = ObjEvent("AutoIt.Error","MyErrFunc")
$oIE=_IECreate("www.google.de",0,0)
$link=$oIE.document.parentwindow.eval("Object.keys( window );")
for $x in $link
	MsgBox(48,"",$x)
next
_IEQuit($oIE)


Func MyErrFunc()
	ConsoleWrite("Variable at Downloadsite not found! Please tell the Developer following Information: "&@crlf& _
             "err.description is: " & @TAB & $oMyError.description  & @CRLF & _
             "err.windescription:"   & @TAB & $oMyError.windescription & @CRLF & _
             "err.number is: "       & @TAB & hex($oMyError.number,8)  & @CRLF & _
             "err.lastdllerror is: "   & @TAB & $oMyError.lastdllerror   & @CRLF & _
             "err.scriptline is: "   & @TAB & $oMyError.scriptline   & @CRLF & _
             "err.source is: "       & @TAB & $oMyError.source       & @CRLF & _
             "err.helpfile is: "       & @TAB & $oMyError.helpfile     & @CRLF & _
             "err.helpcontext is: " & @TAB & $oMyError.helpcontext _
            )
Endfunc

#include <IE.au3>


$oMyError = ObjEvent("AutoIt.Error","MyErrFunc")


$url="www.google.de"
$oIE=_IECreate($url)
$script='var text="";var keys=Object.keys( window );for (var i in keys){if (typeof window[keys[i]] != '&"'"&'function'&"'"&'){text+=keys[i]+": "+window[keys[i]];text+="<br>";}}document.body.innerHTML=text;'
_IEInsertEventScript($oIE, "document", "onclick", $script)
$obj=_IEGetObjById($oIE,"viewport")
_IEAction($obj,"click")
FileWrite("tmp2.html",_IEBodyReadHTML($oIE))
_IEQuit($oIE)




Func MyErrFunc()
	ConsoleWrite("Variable at Downloadsite not found! Please tell the Developer following Information: "&@crlf& _
             "err.description is: " & @TAB & $oMyError.description  & @CRLF & _
             "err.windescription:"   & @TAB & $oMyError.windescription & @CRLF & _
             "err.number is: "       & @TAB & hex($oMyError.number,8)  & @CRLF & _
             "err.lastdllerror is: "   & @TAB & $oMyError.lastdllerror   & @CRLF & _
             "err.scriptline is: "   & @TAB & $oMyError.scriptline   & @CRLF & _
             "err.source is: "       & @TAB & $oMyError.source       & @CRLF & _
             "err.helpfile is: "       & @TAB & $oMyError.helpfile     & @CRLF & _
             "err.helpcontext is: " & @TAB & $oMyError.helpcontext _
            )
Endfunc


;===============================================================================
;
; Function Name:    _IEInsertEventScript()
; Description:      Inserts a Javascript
; Parameter(s):     $o_object   - object variable for a InternetExplorer.Application, Window or Frame
;                   $s_htmlFor  - the HTML element for event monitoring (e.g. "document" or an element ID)
;                   $s_event    - the event to monitor (e.g. "onclick" or "oncontextmenu")
;                   $s_script   - Javascript to be executed
; Requirement(s):   AutoIt3 Beta with COM support (post 3.1.1)
; Return Value(s):  On Success - 1  and sets @ERROR = 0
;                  On Failure - 0  and sets @ERROR = 1
; Author(s):        Dale Hohm
;
;===============================================================================
;
Func _IEInsertEventScript($o_object, $s_htmlFor, $s_event, $s_script)
    If IsObj($o_object) Then
        SetError(0)
        Local $o_head = $o_object.document.all.tags("HEAD").Item(0)
        Local $o_script = $o_object.document.createElement("script")
        With $o_script
            .defer = True
            .language="jscript"
            .type = "text/javascript"
            .htmlFor = $s_htmlFor
            .event = $s_event
            .text = $s_script
        EndWith
        $o_head.appendChild($o_script)
        Return 1
    Else
        SetError(1)
        Return 0
    EndIf
EndFunc