socket

[masterlaf]

hello, i have de following error
when use socket1.connect

my movil is galaxy note android version 4,0,3


If successful=False Then
Msgbox(LastException.Message , "Error de conexion")
Return
End If
Dim tr As TextReader
Dim sb As StringBuilder
sb.Initialize
tr.Initialize(socket1.InputStream)
sb.Append(tr.ReadLine) ' lee al menos una linea
Do While tr.Ready
sb.Append(CRLF).Append(tr.ReadLine)
Loop
Msgbox("time recibido: "& CRLF & sb.ToString, "")
socket1.Close

best regard

 

[Erel]

You should use AsyncStreams instead of blocking the main thread.