Bonjour,
J'ai encore un petit souci qui devrait être le dernier j’espère ;)
Actuellement je me co avec la fonction de Toons :
Public Shared socketConnexion As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
Public Shared socketJeu As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
Public Ecoute_Connexion_thread As New Thread(New ThreadStart(AddressOf Ecoute_Connexion))
Public Ecoute_Jeu_thread As New Thread(New ThreadStart(AddressOf Ecoute_Jeu))
Public buffer(8192) As Byte
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If connected = False Then
socketConnexion.Connect("213.248.126.180", 5555)
Ecoute_Connexion_thread.Start()
While Ecoute_Connexion_thread.IsAlive
Application.DoEvents()
End While
socketJeu.Connect(ip, 5555)
Ecoute_Jeu_thread.Start()
End If
RadForm1.statut("connected", id)
connected = True
Button1.Enabled = False
End Sub
Sub Ecoute_Connexion()
While socketConnexion.Connected
Dim i = socketConnexion.Receive(buffer)
Dim data(i - 1) As Byte
Array.Copy(buffer, data, i)
parsing(data)
End While
End Sub
Sub Ecoute_Jeu()
While socketJeu.Connected
Dim i = socketJeu.Receive(buffer)
Dim data(i - 1) As Byte
Array.Copy(buffer, data, i)
parsing(data)
End While
End Sub
Le probleme c'est que pour le multicompte ça passe pas :/
Je crée des forms (form avec le bot, sa connexion, son parser et tout) dans un mdi, le probleme c'est que toute les forms utilisent la même connexion...
Que me conseillez vous pour rendre le truc fonctionnel ?