German ESP8266 vom Tablet ansprechen.

[DonManfred]

Wenn ich das richtig sehe (kann kein c) dann benutzt dein Gerät eine SERIAL verbindung.
Du aber sendest http-Requests...
Ich denke, Du musst mit der Serial lib connecten und so die kommunikation laufen lassen. http ist, denke ich, der falsche Weg hier

 

[funker]

So gebe ich es in Purebasic und Freebasic ein :
text = ReceiveHTTPMemory("192.168.2.102","?pin=leer") >>>> Purebasic
text=httpget("192.168.2.102","?pin=leer") >>>>> Freebasic

Das Serial ist nur für eine Weitergabe von Daten an einem Gerät . welches Seriell (Com....) empfangen und senden kann, weiterhin wird darüber der ESP programmiert.

Ansonsten geht der ESP nur über mein WLAN-Gerät zum Medion und zurück.

Danke.
GRuss

 

[andstud]

probier es mal mit webview und ließ den übertragenen text aus, so frage ich den ESP nach werten ab (geht sicher auch eleganter, serial dient hier nur als log):

ESP8266

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

B4A

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

 

[funker]

........................................

 

[funker]

Ja danke für die Hilfe.

Danke.

GRuss

 

[funker]

edit1.text=WebView1.LoadUrl("http://192.168.2.101/?pin=leer")

wird nicht angenommen: Cannot assign void value

Danke.
Gruss

 

[andstud]

ja sorry, das geht so auch nicht, in meinem Beispiel wird bei PageFinished und ProcessHTML der Wert abgefragt, bisschen musst du schon selber machen...

 

[funker]

Ja danke.
Hatte ich jetzt auch ermutet, das der Aufruf nichts bringt.

Ich kenne mich mit der Interna nicht so aus und kann dein Code nicht so richtig umsetzen das ich einen Text/Wert im Textfeld bekommen kann.

Danke.
GRuss

 

[funker]

Ich habe dein Programm zum laufen gebracht.

Danke.
Gruss