Gestion des évenements d'un contrôle winsock.

Question

Bonjour, 

Je suis face à un petit probleme, 

J'ai deux forms. Sur une se trouve un controle winsock, je voudrais recuperer l'evenement DataArrival sur l'autre form. Comment faire.

J'ai essayé sur ma deuxieme form

Private WithEvents sck_Main As Winsock

Private Sub Form_Load()

Set sck_Main = Frm_Main.Sck(Client.SOCKET_Main)

End Sub

J'obtiens l'erreur suivante

Erreur 459 : L'objet ou la classe ne gèrent pas le jeu d'évenements.


Une solution ???

Merci d'avance

cs_Jack · Answer

Salut
Que représentent Sck, Client , SOCKET_Main ?
Sck serait-il indexé ?
Ca manque de précision.

Oui, tu peux déclarer un Winsock en WithEvents dans une forme, mais tu ne pourras pas le rattacher à un objet existant.

Tu peux par contre renvoyer vers une Sub appartenant à ta Form2 :
- Tu places ton Winsock sur Form1
- Dans Form2, tu crées une Sub perso :
Public Sub maSub(ByVal BytesTotal As Long)
    Dim sTemp As String
    Form1.Winsock1.GetData sTemp, vbString, BytesTotal
End Sub
- Dans le Winsock1_DataArrival, tu mets ceci :
Call maSub(bytesTotal)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

Gestion des évenements d'un contrôle winsock.

1 réponse

Votre réponse

Discussions similaires