Socket server in B4J like Erel example
Three different clients connect to the server
How to keep memory of different clients and send different messages to each client?
B4X:
Sub Process_Globals
Private server As ServerSocket
Private astream As AsyncStreams
End Sub
Sub AppStart (Args() As String)
Log("Hello world!!!")
server.Initialize(61042, "server")
server.Listen
StartMessageLoop
End Sub
Sub server_NewConnection (Successful As Boolean, NewSocket As Socket)
Log("New connection")
If Successful Then
astream.Initialize(NewSocket.InputStream, NewSocket.OutputStream, "astream")
End If
server.Listen
End Sub
Sub astream_NewData (Buffer() As Byte)
Log("New Data")
Log(BytesToString(Buffer, 0, Buffer.Length, "utf8"))
astream.Write("received!".GetBytes("utf8"))
End Sub
Three different clients connect to the server
How to keep memory of different clients and send different messages to each client?