Android Question Bluetooth

androidvh

Member
Licensed User
Longtime User
open port (Bluetooth) with:

ser_port.connect(PairedDevices.GetValueAt(myDev)) -> Data is coming in, works perfect

Now I want to write a string (dim as string = "Test,Now,ON,1Hz") to the device:

doesn't work with:

Sub ser_port_Connected (Success As Boolean)
'
If Success Then

Dim txt_wr As TextWriter
txt_wr.Initialize(ser_port.OutputStream)
txt_wr.Write(s) -> doesn't work

txt_rd.Initialize(ser_port.InputStream) -> works perfect​

what is to do???


kind regards

Volker
 
Top