Les évènements dans les références de VB

Question

Bonjour,

Afin de cr&#233;er un MSN Messenger qui me dit TOUT ce qui se passe, j'utilise la r&#233;f&#233;rence Messenger API. Je cherche &#224; contr&#244;ler tous les &#233;v&#232;nements produits par cette r&#233;f&#233;rence, mais je n'y arrive pas. Quel est exactement ce qu'il faut faire pour faire marcher un &#233;v&#232;nement ? Je suppose que c'est la m&#234;me chose dans toutes les r&#233;f&#233;rences car j'ai &#233;t&#233; bloqu&#233; aussi par celles de Internet Explorer.

Pouvez-vous m'aider en me pr&#233;cisant les variables &#224; d&#233;finir, la structure de la fonction-&#233;v&#232;nement ?

Merci d'avance,

arkandias

MaxSoldier · Answer

Alors j'ai moi aussi gal&#233;r&#233; donc je vais ( essayer ? :p ) de t'expliquer..

D&#233;j&#224;, il te faut le nom des Events sinon, tu pourra pas.



Une fois que tu les as :

Dans la zone de d&#233;clarartion des API, Constantes ( en haut quoi :p ) :



Private WithEvents NomQuetuDonne&#224;TonObjet As TaClasse



Ex : 

Private WithEvents Msn As MessengerAPI.MessengerNative



Ensuite, tu initialise ta classe :

Set Msn = New MessengerAPI.MessengerNative



C'st fini, tu clique dans la listbox en haut a droite et tu choisis MSN, tu aura toutes ses propri&#233;t&#233;s...



++
-=Ar$&#163;nik=-

MaxSoldier · Answer

Eux, en fait, il y as 2 classe &#224; initialiser et D&#233;clarer :



Option Explicit

Private WithEvents M As MessengerAPI.MessengerNative

Private WithEvents M2 As MessengerAPI.Messenger



Private Sub Form_Load()

Set M2 = New MessengerAPI.Messenger

Set M = New MessengerAPI.MessengerNative

End Sub

-=Ar$&#163;nik=-

MaxSoldier · Answer

PS : 2 classeS <-- :p DSL

-=Ar$&#163;nik=-

cs_arkandias · Answer

Non, &#231;a je sais faire, je parle des &#233;v&#232;nements (deuxi&#232;me mot du sujet), comment faut-il faire pour capter ils sont d&#233;clench&#233;s ?

Exemple : j'aimerais savoir quand je me d&#233;connecte de MSN (&#233;v&#232;nement OnSignout dans MessengerAPI.Messenger)

MaxSoldier · Answer

Ba ouais, c'est &#231;a !:p

-=Ar$&#163;nik=-

cs_arkandias · Answer

En fait, apr&#232;s plusieurs recherches, j'ai trouv&#233;, mais aucun des &#233;v&#232;nements que je teste ne marche. D&#233;j&#224;, quand je mets le :

Set msn = MessengerAPI.Messenger 

Ca plante : "Le composant est d&#233;j&#224; utilis&#233;"

Les évènements dans les références de VB

6 réponses

Discussions similaires