Bonjour,
je voudrais créer un client serveur pour éteindre les PC de mon réseau.
Mais j'ai un soucis, lorsque je crée mon serveur, le formulaire n'est pas visible alors qu'il est bien lancé et le serveur est bien crée.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
        LabelConnecté.Visible = True
        Dim sRemoteAddress As String
        Dim address As IPAddress = IPAddress.Parse("127.0.0.1")
        Dim tcplistener As TcpListener = New TcpListener(address, 8100)
 
        tcplistener.Start()
 
        LabelNonConnecté.Visible = False
        Dim SocketpourClient As Socket = tcplistener.AcceptSocket
        sRemoteAddress = CType(SocketpourClient.RemoteEndPoint, IPEndPoint).Address.ToString
        MsgBox("Un client vient de se connecter." & Microsoft.VisualBasic.Chr(10) & "IP du client : " & sRemoteAddress & "" & Microsoft.VisualBasic.Chr(10) & "")
Lorsque je lance mon client, la connexion se fait mon formulaire réapparait.

Avez vous une explication ?