Visual Basic - conectarse al msn con VB6

Hola a todos

alguien sabe como concectarse al msn messenger, con visual basic?

Gracias..

Ariel

Asi

Public WithEvents MSN As MessengerAPI.Messenger

Set MSN = New Messenger
MSN.AutoSignin
o tambien
MSN.Signin 0, "tuNombree", "tupassword"

Este codigo necesita de unas referencias a librerias, cuales son:
tengo entendido que se agrega el "Messenger API Type Library" pero con este no me aparece el tipo de datos MessengerAPI.Messenger
¿Será que no funciona con el MSN 7.0?
¿Me falta alguna libreria?

Messenger Api Type Library

Si la Referencia no te aparece, debes instalar el Windows Messenger.. yo tengo la version 5 (ojo, dije Windows Messenger, no Msn Messenger)

por fa.. estos dias estoy algo estupidina..
el codigo k puse fue asi:
---------------------------------------------------
Public WithEvents MSN As MessengerAPI.Messenger

Private Sub Command1_Click()
Set MSN = New Messenger
MSN.AutoSignin
End Sub
---------------Y EL OTRO TIPO DE CODIGO K PROVE FUE ASI-----------------------
Public WithEvents MSN As MessengerAPI.Messenger

Private Sub Command1_Click()
Set MSN = New Messenger
MSN.Signin 0, trim(text1.text), trim(text2.text)
End Sub
-------------------------------------------------------------

PERO ME SALE UN ERROR DE :
"Este programa efecto una operacion no admitida y sera interumpido"

por fa diganme por k me sale este error......

por fa.. estos dias estoy algo estupidina..
el codigo k puse fue asi:
---------------------------------------------------
Public WithEvents MSN As MessengerAPI.Messenger

Private Sub Command1_Click()
Set MSN = New Messenger
MSN.AutoSignin
End Sub
---------------Y EL OTRO TIPO DE CODIGO K PROVE FUE ASI-----------------------
Public WithEvents MSN As MessengerAPI.Messenger

Private Sub Command1_Click()
Set MSN = New Messenger
MSN.Signin 0, trim(text1.text), trim(text2.text)
End Sub
-------------------------------------------------------------

PERO ME SALE UN ERROR DE :
"Este programa efecto una operacion no admitida y sera interumpido"

por fa diganme por k me sale este error......

por fa.. estos dias estoy algo estupidina..
el codigo k puse fue asi:
---------------------------------------------------
Public WithEvents MSN As MessengerAPI.Messenger

Private Sub Command1_Click()
Set MSN = New Messenger
MSN.AutoSignin
End Sub
---------------Y EL OTRO TIPO DE CODIGO K PROVE FUE ASI-----------------------
Public WithEvents MSN As MessengerAPI.Messenger

Private Sub Command1_Click()
Set MSN = New Messenger
MSN.Signin 0, trim(text1.text), trim(text2.text)
End Sub
-------------------------------------------------------------

PERO ME SALE UN ERROR DE :
"Este programa efecto una operacion no admitida y sera interumpido"

por fa diganme por k me sale este error......
yo tengo el msn 7

La referencia q necesitas es la q indico arriba. fijate si tienes una sesion abierta o alguna referencia a otra lib messenger