'Dim Javascript As String="B4A.CallSub('GetVarFromWebview', true, document.getElementById('result_status_complete').getAttribute('style'))"
Dim Javascript As String="B4A.CallSub('GetVarFromWebview', true, document.getElementById('div id='result''))"
WebViewExtras1.executeJavascript(WebView1, Javascript)
Sub GetVarFromWebview(WebVar As String)
'Called when the javascript is finished
Log("Web variable has the value => " & WebVar)
Activity.Finish
End Sub