Socket pour Serveur/Multiclient
Bjr tt le monde,
j'ai une application client serveur et je souhaite que mon serveur dispatche les données a plusieurs clients au même temps, mais le problème c'est que je n'arrive a envoyer les données qu'a un seul client et l'autre ne reçoit que lorsque j'arrête le premier client,c'est comme ci en mode exclusif
voila mon code:
Code:
1 2 3 4 5 6 7 8 9
| Shared newclient As IPEndPoint
Shared newsock As Socket
Dim ipep As New IPEndPoint(IPAddress.Any, 9050)
newsock = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
newsock.Bind(ipep)
newsock.Listen(999999999)
client = newsock.Accept()
newclient = DirectCast(client.RemoteEndPoint, IPEndPoint) |
donc qu'est ce que je dois changer pour que je puisse accepter tt le monde ensemble et puis-je limiter l'accès a quelques clients, genre donner la permission a certaines adresses IP?