VB6: RunAnonymousFunctionSync to retrieve the height of page

[wila]

Hi Przemek,

The following works for me:

Code:

  Set myDocumentHTML = New AntViewDocument
  myDocumentHTML.BrowserDispatch EdgeWebBrowser.IDispatchPointer

  Dim strRes As String
  Dim intRes As Integer

  intRes = myDocumentHTML.RunAnonymousFunctionSync(1, "", "() => {return window.innerHeight;}", strRes)

  Debug.Print "Result: " & intRes '22 functon timeout
  Debug.Print "Data result: " & strRes 'String is empty

IOW, you did not write a function.
Sadly it does not completely behave like the javascript console.

The returned error 22 is confusing. I will raise a ticket for that and see if it can be improved somehow.
--
Wil