Help about TWebView class. reading something from website.

[Antonio Linares]

Please try this from the inspector console:

typeof document.getElementById('dosya_listesi_result' )

or

console.log( typeof document.getElementById( 'dosya_listesi_result' ) )

[Horizon]

Please try this from the inspector console:

typeof document.getElementById('dosya_listesi_result' )

or

console.log( typeof document.getElementById( 'dosya_listesi_result' ) )

Hi Antonio,

The result is 'object'

[Antonio Linares]

Dear Hakan,

ok, then please try this:

Code: Select all  Expand view

 aaa := 'document.getElementById("yargiTuru").stringify()'
  oWebView:Eval( "SendToFWH( " + aaa + " )" )

[Horizon]

Dear Hakan,

ok, then please try this:

Code: Select all  Expand view

 aaa := 'document.getElementById("yargiTuru").stringify()'
  oWebView:Eval( "SendToFWH( " + aaa + " )" )

There is not any show. but when I write to console. This error is given.

Code: Select all  Expand view

Uncaught TypeError: document.getElementById(...).stringify is not a function
    at <anonymous>:1:38

My Next try.

Code: Select all  Expand view

JSON.stringify(document.getElementById("yargiTuru"))

Result:

Code: Select all  Expand view

'{"0":{},"1":{},"2":{},"3":{},"4":{},"5":{},"6":{},"jQuery1112018490637981077995":112,"readOnly":false}'

Next try:

Code: Select all  Expand view

JSON.stringify(document.getElementById("dosya_listesi_result"))

Result :

Code: Select all  Expand view

'{}'

[Horizon]

Hi Antonio,

Can you please try this.

Code: Select all  Expand view

#include "FiveWin.ch"

//----------------------------------------------------------------------------//

function Main()

   local oWebView := TWebView():New()

   oWebView:bOnBind = { | cJson, nCalls | MsgInfo( cJson, nCalls ) }
   oWebView:Bind( "SendToFWH" )
   oWebView:Navigate( "https://datatables.net/examples/data_sources/js_array" )
//   Sleep( 400 )
   sysWait(6)
  aaa := "document.getElementById('example' )"
    oWebView:Eval( 'SendToFWH( First : '+aaa+ ' )' )   
    oWebView:Eval('console.log( '+aaa+' )')        
   
    aaa := 'JSON.stringify(document.getElementById("example"))'
    oWebView:Eval( 'SendToFWH( Second : '+aaa+ ' )' )   
    oWebView:Eval('console.log( '+aaa+' )')
            
    oWebView:Run()
   oWebView:Destroy()

return nil

[Antonio Linares]

Please try this:

document.getElementById('dosya_listesi_result' ).constructor.name

Lets know what class of object it is

[Antonio Linares]

We need to find the way to return an object

Tomorrow we will keep trying it

[Antonio Linares]

I am trying using document.getElementById("example").innerHTML and it works from the console, but fails from Bind...

[Antonio Linares]

The strange thing is that this code:

oWebView:Eval('SendToFWH( document.getElementById("example") )' )

returns "null"

why ?

[Antonio Linares]

Solved

oWebView:Eval( 'window.onload = function () { SendToFWH( document.getElementById("example").innerHTML ) }' )

[Horizon]

Solved

oWebView:Eval( 'window.onload = function () { SendToFWH( document.getElementById("example").innerHTML ) }' )

Goodmorning Antonio,

Can you please share full code in sample app? When I insert this line, there is not any messagebox anymore.

[Horizon]

Hi Antonio,

I have changed my code like this.

Code: Select all  Expand view

 aaa := "document.getElementById('dosya_listesi_result' ).innerHTML"
    oWebView:Eval( 'SendToFWH( '+aaa+ ' )' )   

It displays the all record in table.

But your code is more readable than mine.

Code: Select all  Expand view

    oWebView:Eval( 'window.onload = function () { SendToFWH( document.getElementById("dosya_listesi_result").innerHTML ) }' )           
 

There is not any showmessage box.

I want to ask something. We need sleep() function to wait for windows loading web site code. But every customer has different internet speed. We should change seconds every customer in sleep function. I have seen a different "await" command in stackoverflow.com.

Code: Select all  Expand view

await ExecuteScriptAsync("document.getElementById('DropDownList').selectedIndex");

Is your code "window.onload" same as this await command?

[Otto]

Hakan,
can't you use a timer and check document.readyState first?

Best regards,
Otto

[Antonio Linares]

Morning Hakan,

This is the code:

Code: Select all  Expand view

#include "FiveWin.ch"

//----------------------------------------------------------------------------//

function Main()

   local oWebView := TWebView():New(), aaa

   oWebView:bOnBind = { | cJson, nCalls | MsgInfo( cJson, nCalls ) }
   oWebView:Bind( "SendToFWH" )
   oWebView:Navigate( "https://datatables.net/examples/data_sources/js_array" )
   Sleep( 200 )
   oWebView:Eval( 'window.onload = function () { SendToFWH( document.getElementById("example").innerHTML ) }' )
   oWebView:Run()
   oWebView:Destroy()

return nil

Going to check your await command...

[Antonio Linares]

Hakan,

ExecuteScriptAsync() seems to be a method of WebView2 that has not been implemented in webview.dll yet

https://docs.microsoft.com/en-us/dotnet/api/microsoft.web.webview2.wpf.webview2.executescriptasync?view=webview2-dotnet-1.0.1245.22

I am going to ask Steffen...