Discussion :

[toutounesan]

Bonjour,

Je voudrais savoir si j'ai pu me connecter sans avoir dépassé un certain temps.
J'ai essayé ça mais ça ne fonctionne pas comme voulu:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 client = New TcpClient()
            client.Client.ReceiveTimeout = 100
 
            If client.Client.ReceiveTimeout = 100 Then
 
                client.Connect(s_Adresse_IP, i_port_ip)
end if

Merci d'avance.

[Pol63]

avec la méthode aynchrone surement (beginconnect)

les méthodes aynchrones démarrent un thread et appellent un callback fourni (méthode de retour, un peu comme un évènement) une fois l'action faite

[toutounesan]

ok et comment on fait pour ne ne pas dépasser un certain temps

[Pol63]

ne rien faire dans le callback si le callback est appelé après le temps que tu désires en timeout
enfin je pense car normalement il faut appeler endconnect dans le callback

[toutounesan]

je ne vois pas du tout comment faire!

J'ai trouvé ça sur ce site mais il n'y a pas d'exemple.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Lancement de l'attente asynchrone 
Me.SocketServer.BeginAccept(AddressOf ConnectionAcceptCallback, Me.SocketServer) 
 
Le deuxième argument sera passé à la fonction connexionCallback, lorsque celle ci sera appelée, à travers la propriété AsyncState de IAsyncResult. Le premier argument est un objet de type AsyncCallback. AsyncCallback est un délégué, qui est le terme en .NET pour désigner un pointeur de fonction. Le constructeur prend comme argument une fonction ayant cette signature : 
Sub connexionCallback(Dim asyncResult As IAsyncResult) 
 
Retenez bien cette signature car elle servira pour toutes les fonctions de rappel des autres fonctions asynchrones. La fonction connexionCallback s'exécute dans un Thread séparé de celui de l'application principale (thread lancé par le système). Cette fonction prend comme argument un type IAsyncResult. L'interface IAsyncResult nous permet de retrouver l'objet que nous avons passé à la fonction BeginAccept tel qu'il était à travers sa propriété AsyncState. 
object asyncResult.AsyncState 
 
 
 
2. Mettre fin à l'attente
Pour finir l'attente d'une connexion et pour finir d'accepter la connexion d'un client vous devez appeler la fonction EndAccept. 
Fonction de rappel pour la connexion d'un client 
Private Sub connexionAcceptCallback(ByVal asyncResult As IAsyncResult)
	SocketClient = SocketServer.EndAccept(asyncResult)
End Sub

[fab256]

Essai ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim tcp As TcpClient = New TcpClient
Dim wh As System.Threading.WaitHandle = ar.AsyncWaitHandle
Try 
    If Not ar.AsyncWaitHandle.WaitOne(TimeSpan.FromSeconds(5), false) Then
        tcp.Close
        Throw New TimeoutException
    End If
    tcp.EndConnect(ar)
Finally
    wh.Close
End Try