German ESP8266 vom Tablet ansprechen.

void Ereignis_Get0()
{
  eingang_taster = digitalRead(eingang_taster_gpio0);
  Serial.println(eingang_taster);
  server.send(200, "text/html", String((eingang_taster) ? "0" : "1"));
}

Sub WebView1_PageFinished (Url As String)
    Dim Javascript As String
    Javascript = "B4A.CallSub('ProcessHTML', false, document.documentElement.innerText)"
'    Javascript = "B4A.CallSub('ProcessHTML', false, document.documentElement.outerText)"
'    Javascript = "B4A.CallSub('ProcessHTML', false, document.documentElement.innerHTML)"
'    Javascript = "B4A.CallSub('ProcessHTML', false, document.documentElement.outerHTML)"
'      Log("PageFinished: " & Javascript) 
       WebViewExtras1.executeJavascript(WebView1, Javascript)
End Sub

Sub ProcessHTML(Html As String)
'    Log(Html)
    z = Html
End Sub

Sub Timer1_Tick
       WebView1.LoadUrl("http://192.168.178.44/0")
    If z = "1" Then
        ToggleButton1.Checked = True
    Else If z = "0" Then
        ToggleButton1.Checked = False
    End If
End Sub

Sub Button1_Click
       WebView1.LoadUrl("http://192.168.178.44/")
End Sub