[Socket] Fonction connect qui se connect pas sans erreur !

Bonjour tout le monde,

J'ai créer une fonction de connexion pour du TCP mais le problème réside qu'il ne sort pas en erreur quand il a personne sur le port où il tente de se connecter.

Pire, Com.connected est à True et je peu envoyer quelque chose sans aucune erreur. Pouvez-vous me dire comment tester que mon programme est effectivement connecté à quelque chose ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub Connect(ByVal IP As IPEndPoint) Implements IClientToComTCPIP.Connect Dim tmp(0) As Byte   Com = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp) Com.Connect(IP) Com.Blocking = False 'True ne change rien au problème Com.Send(tmp, 0, 0) 'Com.ReceiveTimeout = 2000 If Not Scheduler.IsAlive Then Scheduler.Start(Com) End If End Sub

---

Merci d'avance

j'ai cru entendre qu'il fallait envoyer un tableau d'octet vide pour savoir si la connexion était encore bonne
(donc que ca doit planter si c'est pas le cas, et le faire à intervalle assez court)

Je le fait déjà ce test dans le code que j'ai donné :

Code:

---

Com.Send(tmp, 0, 0)

---

et il ne génère pas d'erreur