Sub WebView1_PageFinished (Url As String)
' Now that the web page has loaded we can get the data we want
' see the documentation http://www.b4x.com/forum/additional-libraries-classes-official-updates/12453-webviewextras.html#post70053 for details of the second parameter callUIThread
Dim Javascript As String
For count = 1 To 2
TeamScore = "aj_"&count&"_score"
Javascript="B4A.CallSub('ProcessHTML', true, document.getElementById('"&TeamScore&"').innerHTML, '"&TeamScore&"')"
'Log("PageFinished: "&Javascript)
WebViewExtras1.executeJavascript(WebView1, Javascript)
Next
End Sub
Sub ProcessHTML(Html As String, Team As String)
' This is the Sub that processes the extracted data
'Log(Team & " = " & Html)
Msgbox(Html,Team)
End Sub